git.maemo.org Git - modest/blob - src/dbus_api/modest-dbus-callbacks.c

   1 /* Copyright (c) 2007, 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-dbus-callbacks.h"
  31 #include "modest-runtime.h"
  32 #include "modest-account-mgr.h"
  33 #include "modest-account-mgr-helpers.h"
  34 #include "modest-tny-account.h"
  35 #include "modest-tny-folder.h"
  36 #include "modest-ui-actions.h"
  37 #include "modest-debug.h"
  38 #include "modest-search.h"
  39 #include "widgets/modest-msg-edit-window.h"
  40 #include "modest-tny-msg.h"
  41 #include "modest-platform.h"
  42 #include <libmodest-dbus-client/libmodest-dbus-client.h>
  43 #include <libgnomevfs/gnome-vfs-utils.h>
  44 #include <stdio.h>
  45 #include <string.h>
  46 #include <glib/gstdio.h>
  47 #ifdef MODEST_HAVE_HILDON0_WIDGETS
  48 #include <libgnomevfs/gnome-vfs-mime-utils.h>
  49 #else
  50 #include <libgnomevfs/gnome-vfs-mime.h>
  51 #endif
  52 #include <tny-fs-stream.h>
  53
  54 #include <tny-list.h>
  55 #include <tny-iterator.h>
  56 #include <tny-simple-list.h>
  57 #include <tny-merge-folder.h>
  58 #include <tny-account.h>
  59
  60 #include <modest-text-utils.h>
  61
  62 typedef struct
  63 {
  64         gchar *to;
  65         gchar *cc;
  66         gchar *bcc;
  67         gchar *subject;
  68         gchar *body;
  69         gchar *attachments;
  70 } ComposeMailIdleData;
  71
  72
  73 static gboolean notify_error_in_dbus_callback (gpointer user_data);
  74 static gboolean notify_msg_not_found_in_idle (gpointer user_data);
  75 static gboolean on_idle_compose_mail(gpointer user_data);
  76 static gboolean on_idle_top_application (gpointer user_data);
  77
  78 /** uri_unescape:
  79  * @uri An escaped URI. URIs should always be escaped.
  80  * @len The length of the @uri string, or -1 if the string is null terminated.
  81  *
  82  * Decode a URI, or URI fragment, as per RFC 1738.
  83  * http://www.ietf.org/rfc/rfc1738.txt
  84  *
  85  * Return value: An unescaped string. This should be freed with g_free().
  86  */
  87 static gchar*
  88 uri_unescape(const gchar* uri, size_t len)
  89 {
  90         if (!uri)
  91                 return NULL;
  92
  93         if (len == -1)
  94                 len = strlen (uri);
  95
  96         /* Allocate an extra string so we can be sure that it is null-terminated,
  97          * so we can use gnome_vfs_unescape_string().
  98          * This is not efficient. */
  99         gchar * escaped_nullterminated = g_strndup (uri, len);
 100         gchar *result = gnome_vfs_unescape_string (escaped_nullterminated, NULL);
 101         g_free (escaped_nullterminated);
 102
 103         return result;
 104 }
 105
 106 /** uri_parse_mailto:
 107  * @mailto A mailto URI, with the mailto: prefix.
 108  * @list_items_and_values: A pointer to a list that should be filled with item namesand value strings,
 109  * with each name item being followed by a value item. This list should be freed with g_slist_free) after
 110  * all the string items have been freed. This parameter may be NULL.
 111  * Parse a mailto URI as per RFC2368.
 112  * http://www.ietf.org/rfc/rfc2368.txt
 113  *
 114  * Return value: The to address, unescaped. This should be freed with g_free().
 115  */
 116 static gchar*
 117 uri_parse_mailto (const gchar* mailto, GSList** list_items_and_values)
 118 {
 119         /* The URL must begin with mailto: */
 120         if (strncmp (mailto, "mailto:", 7) != 0) {
 121                 return NULL;
 122         }
 123         const gchar* start_to = mailto + 7;
 124
 125         /* Look for ?, or the end of the string, marking the end of the to address: */
 126         const size_t len_to = strcspn (start_to, "?");
 127         gchar* result_to = uri_unescape (start_to, len_to);
 128         printf("debug: result_to=%s\n", result_to);
 129
 130         if (list_items_and_values == NULL) {
 131                 return result_to;
 132         }
 133
 134         /* Get any other items: */
 135         const size_t len_mailto = strlen (start_to);
 136         const gchar* p = start_to + len_to + 1; /* parsed so far. */
 137         const gchar* end = start_to + len_mailto;
 138         while (p < end) {
 139                 const gchar *name, *value, *name_start, *name_end, *value_start, *value_end;
 140                 name_start = p;
 141                 name_end = strchr (name_start, '='); /* Separator between name and value */
 142                 if (name_end == NULL) {
 143                         g_debug ("Malformed URI: %s\n", mailto);
 144                         return result_to;
 145                 }
 146                 value_start = name_end + 1;
 147                 value_end = strchr (value_start, '&'); /* Separator between value and next parameter */
 148
 149                 name = g_strndup(name_start, name_end - name_start);
 150                 if (value_end != NULL) {
 151                         value = uri_unescape(value_start, value_end - value_start);
 152                         p = value_end + 1;
 153                 } else {
 154                         value = uri_unescape(value_start, -1);
 155                         p = end;
 156                 }
 157                 *list_items_and_values = g_slist_append (*list_items_and_values, (gpointer) name);
 158                 *list_items_and_values = g_slist_append (*list_items_and_values, (gpointer) value);
 159         }
 160
 161         return result_to;
 162 }
 163
 164 static gboolean
 165 check_and_offer_account_creation()
 166 {
 167         gboolean result = TRUE;
 168
 169         /* This is called from idle handlers, so lock gdk: */
 170         gdk_threads_enter ();
 171
 172         if (!modest_account_mgr_has_accounts(modest_runtime_get_account_mgr(), TRUE)) {
 173                 const gboolean created = modest_ui_actions_run_account_setup_wizard (NULL);
 174                 if (!created) {
 175                         g_debug ("modest: %s: no account exists even after offering, "
 176                                  "or account setup was already underway.\n", __FUNCTION__);
 177                         result = FALSE;
 178                 }
 179         }
 180
 181         gdk_threads_leave ();
 182
 183         return result;
 184 }
 185
 186 static gboolean
 187 on_idle_mail_to(gpointer user_data)
 188 {
 189         gchar *uri = (gchar*)user_data;
 190         GSList *list_names_and_values = NULL;
 191         gchar *to = NULL;
 192         const gchar *cc = NULL;
 193         const gchar *bcc = NULL;
 194         const gchar *subject = NULL;
 195         const gchar *body = NULL;
 196
 197         if (!check_and_offer_account_creation ()) {
 198                 g_idle_add (notify_error_in_dbus_callback, NULL);
 199                 goto cleanup;
 200         }
 201
 202         /* Get the relevant items from the list: */
 203         to = uri_parse_mailto (uri, &list_names_and_values);
 204         GSList *list = list_names_and_values;
 205         while (list) {
 206                 GSList *list_value = g_slist_next (list);
 207                 const gchar * name = (const gchar*)list->data;
 208                 const gchar * value = (const gchar*)list_value->data;
 209
 210                 if (strcmp (name, "cc") == 0) {
 211                         cc = value;
 212                 } else if (strcmp (name, "bcc") == 0) {
 213                         bcc = value;
 214                 } else if (strcmp (name, "subject") == 0) {
 215                         subject = value;
 216                 } else if (strcmp (name, "body") == 0) {
 217                         body = value;
 218                 }
 219
 220                 list = g_slist_next (list_value);
 221         }
 222
 223         gdk_threads_enter (); /* CHECKED */
 224         modest_ui_actions_compose_msg(NULL, to, cc, bcc, subject, body, NULL, FALSE);
 225         gdk_threads_leave (); /* CHECKED */
 226
 227 cleanup:
 228         /* Free the to: and the list, as required by uri_parse_mailto() */
 229         g_free(to);
 230         g_slist_foreach (list_names_and_values, (GFunc)g_free, NULL);
 231         g_slist_free (list_names_and_values);
 232
 233         g_free(uri);
 234
 235         return FALSE; /* Do not call this callback again. */
 236 }
 237
 238 static gint
 239 on_mail_to(GArray * arguments, gpointer data, osso_rpc_t * retval)
 240 {
 241         osso_rpc_t val;
 242         gchar *uri;
 243
 244         /* Get arguments */
 245         val = g_array_index(arguments, osso_rpc_t, MODEST_DBUS_MAIL_TO_ARG_URI);
 246         uri = g_strdup (val.value.s);
 247
 248         g_idle_add(on_idle_mail_to, (gpointer)uri);
 249
 250         /* Note that we cannot report failures during sending,
 251          * because that would be asynchronous. */
 252         return OSSO_OK;
 253 }
 254
 255
 256 static gboolean
 257 on_idle_compose_mail(gpointer user_data)
 258 {
 259         GSList *attachments = NULL;
 260         ComposeMailIdleData *idle_data = (ComposeMailIdleData*)user_data;
 261
 262         if (!check_and_offer_account_creation ()) {
 263                 g_idle_add (notify_error_in_dbus_callback, NULL);
 264                 goto cleanup;
 265         }
 266
 267         /* it seems Sketch at least sends a leading ',' -- take that into account,
 268          * ie strip that ,*/
 269         if (idle_data->attachments && idle_data->attachments[0]==',') {
 270                 gchar *tmp = g_strdup (idle_data->attachments + 1);
 271                 g_free(idle_data->attachments);
 272                 idle_data->attachments = tmp;
 273         }
 274
 275         if (idle_data->attachments != NULL) {
 276                 gchar **list = g_strsplit(idle_data->attachments, ",", 0);
 277                 gint i = 0;
 278                 for (i=0; list[i] != NULL; i++) {
 279                         attachments = g_slist_append(attachments, g_strdup(list[i]));
 280                 }
 281                 g_strfreev(list);
 282         }
 283
 284         /* If the message has nothing then mark the buffers as not
 285            modified. This happens in Maemo for example when opening a
 286            new message from Contacts plugin, it sends "" instead of
 287            NULLs */
 288         gdk_threads_enter (); /* CHECKED */
 289         if (!strncmp (idle_data->to, "", 1) &&
 290             !strncmp (idle_data->to, "", 1) &&
 291             !strncmp (idle_data->cc, "", 1) &&
 292             !strncmp (idle_data->bcc, "", 1) &&
 293             !strncmp (idle_data->subject, "", 1) &&
 294             !strncmp (idle_data->body, "", 1) &&
 295             attachments == NULL) {
 296                 modest_ui_actions_compose_msg(NULL, NULL, NULL, NULL, NULL, NULL, NULL, FALSE);
 297         } else {
 298                 modest_ui_actions_compose_msg(NULL, idle_data->to, idle_data->cc,
 299                                               idle_data->bcc, idle_data->subject,
 300                                               idle_data->body, attachments, TRUE);
 301         }
 302         gdk_threads_leave (); /* CHECKED */
 303 cleanup:
 304         g_slist_foreach(attachments, (GFunc)g_free, NULL);
 305         g_slist_free(attachments);
 306         g_free (idle_data->to);
 307         g_free (idle_data->cc);
 308         g_free (idle_data->bcc);
 309         g_free (idle_data->subject);
 310         g_free (idle_data->body);
 311         g_free (idle_data->attachments);
 312         g_free(idle_data);
 313
 314         return FALSE; /* Do not call this callback again. */
 315 }
 316
 317 static gint
 318 on_compose_mail(GArray * arguments, gpointer data, osso_rpc_t * retval)
 319 {
 320         ComposeMailIdleData *idle_data;
 321         osso_rpc_t val;
 322
 323         idle_data = g_new0(ComposeMailIdleData, 1); /* Freed in the idle callback. */
 324
 325         /* Get the arguments: */
 326         val = g_array_index(arguments, osso_rpc_t, MODEST_DBUS_COMPOSE_MAIL_ARG_TO);
 327         idle_data->to = g_strdup (val.value.s);
 328
 329         val = g_array_index(arguments, osso_rpc_t, MODEST_DBUS_COMPOSE_MAIL_ARG_CC);
 330         idle_data->cc = g_strdup (val.value.s);
 331
 332         val = g_array_index(arguments, osso_rpc_t, MODEST_DBUS_COMPOSE_MAIL_ARG_BCC);
 333         idle_data->bcc = g_strdup (val.value.s);
 334
 335         val = g_array_index(arguments, osso_rpc_t, MODEST_DBUS_COMPOSE_MAIL_ARG_SUBJECT);
 336         idle_data->subject = g_strdup (val.value.s);
 337
 338         val = g_array_index(arguments, osso_rpc_t, MODEST_DBUS_COMPOSE_MAIL_ARG_BODY);
 339         idle_data->body = g_strdup (val.value.s);
 340
 341         val = g_array_index(arguments, osso_rpc_t, MODEST_DBUS_COMPOSE_MAIL_ARG_ATTACHMENTS);
 342         idle_data->attachments = g_strdup (val.value.s);
 343
 344         /* Use g_idle to context-switch into the application's thread: */
 345         g_idle_add(on_idle_compose_mail, (gpointer)idle_data);
 346
 347         return OSSO_OK;
 348 }
 349
 350 static TnyMsg *
 351 find_message_by_url (const char *uri,  TnyAccount **ac_out)
 352 {
 353         ModestTnyAccountStore *astore;
 354         TnyAccount *account = NULL;
 355         TnyFolder *folder = NULL;
 356         TnyMsg *msg = NULL;
 357
 358         astore = modest_runtime_get_account_store ();
 359
 360         if (astore == NULL)
 361                 return NULL;
 362
 363         if (uri && g_str_has_prefix (uri, "merge://")) {
 364                 /* we assume we're talking about outbox folder, as this
 365                  * is the only merge folder we work with in modest */
 366                 return modest_tny_account_store_find_msg_in_outboxes (astore, uri, ac_out);
 367         }
 368         account = tny_account_store_find_account (TNY_ACCOUNT_STORE (astore),
 369                                                   uri);
 370
 371         if (account == NULL || !TNY_IS_STORE_ACCOUNT (account))
 372                 goto out;
 373         *ac_out = account;
 374
 375         folder = tny_store_account_find_folder (TNY_STORE_ACCOUNT (account), uri, NULL);
 376
 377         if (folder == NULL)
 378                 goto out;
 379
 380         msg = tny_folder_find_msg (folder, uri, NULL);
 381
 382 out:
 383         if (account && !msg) {
 384                 g_object_unref (account);
 385                 *ac_out = NULL;
 386         }
 387         if (folder)
 388                 g_object_unref (folder);
 389
 390         return msg;
 391 }
 392
 393 typedef struct {
 394         TnyAccount *account;
 395         gchar *uri;
 396         gboolean connect;
 397         guint animation_timeout;
 398         GtkWidget *animation;
 399 } OpenMsgPerformerInfo;
 400
 401 static gboolean
 402 on_show_opening_animation (gpointer userdata)
 403 {
 404         OpenMsgPerformerInfo *info = (OpenMsgPerformerInfo *) userdata;
 405         info->animation = modest_platform_animation_banner (NULL, NULL, _("mail_me_opening"));
 406         info->animation_timeout = 0;
 407
 408         return FALSE;
 409 }
 410
 411 static gboolean
 412 on_find_msg_async_destroy (gpointer userdata)
 413 {
 414         OpenMsgPerformerInfo *info = (OpenMsgPerformerInfo *) userdata;
 415
 416         if (info->animation_timeout>0) {
 417                 g_source_remove (info->animation_timeout);
 418                 info->animation_timeout = 0;
 419         }
 420
 421         if (info->animation) {
 422                 gtk_widget_destroy (info->animation);
 423                 info->animation = NULL;
 424         }
 425
 426         if (info->uri)
 427                 g_free (info->uri);
 428
 429         if (info->account)
 430                 g_object_unref (info->account);
 431
 432         g_slice_free (OpenMsgPerformerInfo, info);
 433         return FALSE;
 434 }
 435
 436 static void
 437 find_msg_async_cb (TnyFolder *folder,
 438                    gboolean cancelled,
 439                    TnyMsg *msg,
 440                    GError *err,
 441                    gpointer user_data)
 442 {
 443         TnyHeader *header;
 444         gchar *msg_uid;
 445         ModestWindowMgr *win_mgr;
 446         ModestWindow *msg_view = NULL;
 447         gboolean is_draft = FALSE;
 448         OpenMsgPerformerInfo *info = (OpenMsgPerformerInfo *) user_data;
 449
 450         if (err || cancelled) {
 451                 g_idle_add (notify_msg_not_found_in_idle, NULL);
 452                 goto end;
 453         }
 454
 455         header = tny_msg_get_header (msg);
 456         if (header && (tny_header_get_flags (header) & TNY_HEADER_FLAG_DELETED)) {
 457                 g_object_unref (header);
 458                 g_object_unref (msg);
 459                 g_idle_add (notify_msg_not_found_in_idle, NULL);
 460                 goto end;
 461         }
 462
 463         msg_uid =  modest_tny_folder_get_header_unique_id (header);
 464         win_mgr = modest_runtime_get_window_mgr ();
 465
 466         if (modest_tny_folder_is_local_folder (folder) &&
 467             (modest_tny_folder_get_local_or_mmc_folder_type (folder) == TNY_FOLDER_TYPE_DRAFTS)) {
 468                 is_draft = TRUE;
 469         }
 470
 471         if (modest_window_mgr_find_registered_header (win_mgr, header, &msg_view)) {
 472                 gtk_window_present (GTK_WINDOW(msg_view));
 473         } else {
 474                 const gchar *modest_account_name;
 475                 TnyAccount *account;
 476
 477                 modest_window_mgr_register_header (win_mgr, header, NULL);
 478
 479                 account = tny_folder_get_account (folder);
 480                 if (account) {
 481                         modest_account_name =
 482                                 modest_tny_account_get_parent_modest_account_name_for_server_account (account);
 483                 } else {
 484                         modest_account_name = NULL;
 485                 }
 486
 487                 /* Drafts will be opened in the editor, and others will be opened in the viewer */
 488                 if (is_draft) {
 489                         gchar *modest_account_name = NULL;
 490                         gchar *from_header;
 491
 492                         /* we cannot edit without a valid account... */
 493                         if (!modest_account_mgr_has_accounts(modest_runtime_get_account_mgr (), TRUE)) {
 494                                 if (!modest_ui_actions_run_account_setup_wizard(NULL)) {
 495                                         modest_window_mgr_unregister_header (win_mgr,
 496                                                                              header);
 497                                         goto cleanup;
 498                                 }
 499                         }
 500
 501                         from_header = tny_header_dup_from (header);
 502                         if (from_header) {
 503                                 GSList *accounts = modest_account_mgr_account_names (modest_runtime_get_account_mgr (), TRUE);
 504                                 GSList *node = NULL;
 505                                 for (node = accounts; node != NULL; node = g_slist_next (node)) {
 506                                         gchar *from = modest_account_mgr_get_from_string (modest_runtime_get_account_mgr (), node->data);
 507
 508                                         if (from && (strcmp (from_header, from) == 0)) {
 509                                                 g_free (modest_account_name);
 510                                                 modest_account_name = g_strdup (node->data);
 511                                                 g_free (from);
 512                                                 break;
 513                                         }
 514                                         g_free (from);
 515                                }
 516                                 g_slist_foreach (accounts, (GFunc) g_free, NULL);
 517                                 g_slist_free (accounts);
 518                                 g_free (from_header);
 519                         }
 520
 521                         if (modest_account_name == NULL) {
 522                                 modest_account_name = modest_account_mgr_get_default_account (modest_runtime_get_account_mgr ());
 523                         }
 524                         msg_view = modest_msg_edit_window_new (msg, modest_account_name, TRUE);
 525                         g_free (modest_account_name);
 526                 } else {
 527                         TnyHeader *header;
 528                         const gchar *modest_account_name;
 529
 530                         if (account) {
 531                                 modest_account_name =
 532                                         modest_tny_account_get_parent_modest_account_name_for_server_account (account);
 533                         } else {
 534                                 modest_account_name = NULL;
 535                         }
 536
 537                         header = tny_msg_get_header (msg);
 538                         msg_view = modest_msg_view_window_new_for_search_result (msg, modest_account_name, msg_uid);
 539                         if (! (tny_header_get_flags (header) & TNY_HEADER_FLAG_SEEN)) {
 540                                 ModestMailOperation *mail_op;
 541
 542                                 tny_header_set_flag (header, TNY_HEADER_FLAG_SEEN);
 543                                 /* Sync folder, we need this to save the seen flag */
 544                                 mail_op = modest_mail_operation_new (NULL);
 545                                 modest_mail_operation_queue_add (modest_runtime_get_mail_operation_queue (),
 546                                                                  mail_op);
 547                                 modest_mail_operation_sync_folder (mail_op, folder, FALSE);
 548                                 g_object_unref (mail_op);
 549                         }
 550                         g_object_unref (header);
 551                 }
 552
 553                 if (msg_view != NULL) {
 554                         modest_window_mgr_register_window (win_mgr, msg_view);
 555                         gtk_widget_show_all (GTK_WIDGET (msg_view));
 556                 }
 557         }
 558
 559 cleanup:
 560         g_object_unref (header);
 561         g_object_unref (msg);
 562
 563 end:
 564         on_find_msg_async_destroy (info);
 565 }
 566
 567
 568 static void
 569 on_open_message_performer (gboolean canceled,
 570                            GError *err,
 571                            GtkWindow *parent_window,
 572                            TnyAccount *account,
 573                            gpointer user_data)
 574 {
 575         OpenMsgPerformerInfo *info;
 576         TnyFolder *folder = NULL;
 577
 578         info = (OpenMsgPerformerInfo *) user_data;
 579         if (canceled || err) {
 580                 g_idle_add (notify_msg_not_found_in_idle, NULL);
 581                 on_find_msg_async_destroy (info);
 582                 return;
 583         }
 584
 585         /* Get folder */
 586         if (!account) {
 587                 ModestTnyAccountStore *account_store;
 588                 ModestTnyLocalFoldersAccount *local_folders_account;
 589
 590                 account_store = modest_runtime_get_account_store ();
 591                 local_folders_account = MODEST_TNY_LOCAL_FOLDERS_ACCOUNT (
 592                         modest_tny_account_store_get_local_folders_account (account_store));
 593                 folder = modest_tny_local_folders_account_get_merged_outbox (local_folders_account);
 594                 g_object_unref (local_folders_account);
 595         } else {
 596                 folder = tny_store_account_find_folder (TNY_STORE_ACCOUNT (account), info->uri, NULL);
 597         }
 598         if (!folder) {
 599                 g_idle_add (notify_msg_not_found_in_idle, NULL);
 600                 on_find_msg_async_destroy (info);
 601                 return;
 602         }
 603
 604         info->animation_timeout = g_timeout_add (1000, on_show_opening_animation, info);
 605         /* Get message */
 606         tny_folder_find_msg_async (folder, info->uri, find_msg_async_cb, NULL, info);
 607         g_object_unref (folder);
 608 }
 609
 610 static gboolean
 611 on_idle_open_message_performer (gpointer user_data)
 612 {
 613         ModestWindow *main_win = NULL;
 614         OpenMsgPerformerInfo *info = (OpenMsgPerformerInfo *) user_data;
 615
 616         main_win = modest_window_mgr_get_main_window (modest_runtime_get_window_mgr(),
 617                                                       FALSE); /* don't create */
 618
 619         /* Lock before the call as we're in an idle handler */
 620         gdk_threads_enter ();
 621         if (info->connect) {
 622                 modest_platform_connect_and_perform (GTK_WINDOW (main_win), TRUE, info->account,
 623                                                      on_open_message_performer, info);
 624         } else {
 625                 on_open_message_performer (FALSE, NULL, GTK_WINDOW (main_win), info->account, info);
 626         }
 627         gdk_threads_leave ();
 628
 629         return FALSE;
 630 }
 631
 632 static gint
 633 on_open_message (GArray * arguments, gpointer data, osso_rpc_t * retval)
 634 {
 635         osso_rpc_t val;
 636         gchar *uri;
 637         TnyAccount *account = NULL;
 638         gint osso_retval;
 639         gboolean is_merge;
 640
 641         /* Get the arguments: */
 642         val = g_array_index(arguments, osso_rpc_t, MODEST_DBUS_OPEN_MESSAGE_ARG_URI);
 643         uri = g_strdup (val.value.s);
 644
 645         is_merge = g_str_has_prefix (uri, "merge:");
 646
 647         /* Get the account */
 648         if (!is_merge)
 649                 account = tny_account_store_find_account (TNY_ACCOUNT_STORE (modest_runtime_get_account_store ()),
 650                                                           uri);
 651
 652
 653         if (is_merge || account) {
 654                 OpenMsgPerformerInfo *info;
 655                 TnyFolder *folder = NULL;
 656
 657                 info = g_slice_new0 (OpenMsgPerformerInfo);
 658                 if (account)
 659                         info->account = g_object_ref (account);
 660                 info->uri = uri;
 661                 info->connect = TRUE;
 662                 info->animation = NULL;
 663                 info->animation_timeout = 0;
 664
 665                 /* Try to get the message, if it's already downloaded
 666                    we don't need to connect */
 667                 if (account) {
 668                         folder = tny_store_account_find_folder (TNY_STORE_ACCOUNT (account), uri, NULL);
 669                 } else {
 670                         ModestTnyAccountStore *account_store;
 671                         ModestTnyLocalFoldersAccount *local_folders_account;
 672
 673                         account_store = modest_runtime_get_account_store ();
 674                         local_folders_account = MODEST_TNY_LOCAL_FOLDERS_ACCOUNT (
 675                                 modest_tny_account_store_get_local_folders_account (account_store));
 676                         folder = modest_tny_local_folders_account_get_merged_outbox (local_folders_account);
 677                         g_object_unref (local_folders_account);
 678                 }
 679                 if (folder) {
 680                         TnyDevice *device;
 681                         gboolean device_online;
 682
 683                         device = modest_runtime_get_device();
 684                         device_online = tny_device_is_online (device);
 685                         if (device_online) {
 686                                 info->connect = TRUE;
 687                         } else {
 688                                 TnyMsg *msg = tny_folder_find_msg (folder, uri, NULL);
 689                                 if (msg) {
 690                                         info->connect = FALSE;
 691                                         g_object_unref (msg);
 692                                 } else {
 693                                         info->connect = TRUE;
 694                                 }
 695                         }
 696                         g_object_unref (folder);
 697                 }
 698
 699                 /* We need to call it into an idle to get
 700                    modest_platform_connect_and_perform into the main
 701                    loop */
 702                 g_idle_add (on_idle_open_message_performer, info);
 703                 osso_retval = OSSO_OK;
 704         } else {
 705                 g_free (uri);
 706                 osso_retval = OSSO_ERROR;
 707                 g_idle_add (notify_error_in_dbus_callback, NULL);
 708         }
 709
 710         if (account)
 711                 g_object_unref (account);
 712         return osso_retval;
 713 }
 714
 715 static void
 716 on_remove_msgs_finished (ModestMailOperation *mail_op,
 717                          gpointer user_data)
 718 {
 719         TnyHeader *header;
 720         ModestWindow *main_win = NULL, *msg_view = NULL;
 721         ModestHeaderView *header_view;
 722
 723         header = (TnyHeader *) user_data;
 724
 725         /* Get the main window if exists */
 726         main_win = modest_window_mgr_get_main_window (modest_runtime_get_window_mgr(),
 727                                                       FALSE); /* don't create */
 728         if (!main_win) {
 729                 g_object_unref (header);
 730                 return;
 731         }
 732
 733         if (modest_window_mgr_find_registered_header (modest_runtime_get_window_mgr(),
 734                                                       header, &msg_view)) {
 735                 if (MODEST_IS_MSG_VIEW_WINDOW (msg_view))
 736                         modest_ui_actions_refresh_message_window_after_delete (MODEST_MSG_VIEW_WINDOW (msg_view));
 737         }
 738         g_object_unref (header);
 739
 740         /* Refilter the header view explicitly */
 741         header_view = (ModestHeaderView *)
 742                 modest_main_window_get_child_widget (MODEST_MAIN_WINDOW(main_win),
 743                                                      MODEST_MAIN_WINDOW_WIDGET_TYPE_HEADER_VIEW);
 744         if (header_view && MODEST_IS_HEADER_VIEW (header_view))
 745                 modest_header_view_refilter (header_view);
 746 }
 747
 748 static gboolean
 749 on_idle_delete_message (gpointer user_data)
 750 {
 751         TnyList *headers = NULL, *tmp_headers = NULL;
 752         TnyFolder *folder = NULL;
 753         TnyIterator *iter = NULL;
 754         TnyHeader *header = NULL, *msg_header = NULL;
 755         TnyMsg *msg = NULL;
 756         TnyAccount *account = NULL;
 757         const char *uri = NULL;
 758         gchar *uid = NULL;
 759         ModestMailOperation *mail_op = NULL;
 760         ModestWindow *main_win = NULL;
 761
 762         uri = (char *) user_data;
 763
 764         msg = find_message_by_url (uri, &account);
 765         if (account)
 766                 g_object_unref (account);
 767
 768         if (!msg) {
 769                 g_warning ("%s: Could not find message '%s'", __FUNCTION__, uri);
 770                 g_idle_add (notify_error_in_dbus_callback, NULL);
 771                 return FALSE;
 772         }
 773
 774         main_win = modest_window_mgr_get_main_window (modest_runtime_get_window_mgr(),
 775                                                       FALSE); /* don't create */
 776
 777         folder = tny_msg_get_folder (msg);
 778         if (!folder) {
 779                 g_warning ("%s: Could not find folder (uri:'%s')", __FUNCTION__, uri);
 780                 g_object_unref (msg);
 781                 g_idle_add (notify_error_in_dbus_callback, NULL);
 782                 return FALSE;
 783         }
 784
 785         /* Get UID */
 786         msg_header = tny_msg_get_header (msg);
 787         uid = tny_header_dup_uid (msg_header);
 788         g_object_unref (msg);
 789         g_object_unref (msg_header);
 790
 791         headers = tny_simple_list_new ();
 792         tny_folder_get_headers (folder, headers, TRUE, NULL);
 793         iter = tny_list_create_iterator (headers);
 794
 795         while (!tny_iterator_is_done (iter)) {
 796                 gchar *cur_id = NULL;
 797
 798                 header = TNY_HEADER (tny_iterator_get_current (iter));
 799                 if (header)
 800                         cur_id = tny_header_dup_uid (header);
 801
 802                 if (cur_id && uid && g_str_equal (cur_id, uid)) {
 803                         g_free (cur_id);
 804                         /* g_debug ("Found corresponding header from folder"); */
 805                         break;
 806                 }
 807                 g_free (cur_id);
 808
 809                 if (header) {
 810                         g_object_unref (header);
 811                         header = NULL;
 812                 }
 813
 814                 tny_iterator_next (iter);
 815         }
 816         g_free (uid);
 817         g_object_unref (iter);
 818         g_object_unref (headers);
 819
 820         if (header == NULL) {
 821                 if (folder)
 822                         g_object_unref (folder);
 823                 g_idle_add (notify_error_in_dbus_callback, NULL);
 824                 return FALSE;
 825         }
 826
 827         /* This is a GDK lock because we are an idle callback and
 828          * the code below is or does Gtk+ code */
 829         gdk_threads_enter (); /* CHECKED */
 830
 831         mail_op = modest_mail_operation_new (main_win ? G_OBJECT(main_win) : NULL);
 832         modest_mail_operation_queue_add (modest_runtime_get_mail_operation_queue (), mail_op);
 833
 834         g_signal_connect (G_OBJECT (mail_op),
 835                           "operation-finished",
 836                           G_CALLBACK (on_remove_msgs_finished),
 837                           g_object_ref (header));
 838
 839         tmp_headers = tny_simple_list_new ();
 840         tny_list_append (tmp_headers, (GObject *) header);
 841
 842         modest_mail_operation_remove_msgs (mail_op, tmp_headers, FALSE);
 843
 844         g_object_unref (tmp_headers);
 845         g_object_unref (G_OBJECT (mail_op));
 846         gdk_threads_leave (); /* CHECKED */
 847
 848         /* Clean */
 849         if (header)
 850                 g_object_unref (header);
 851
 852         return FALSE;
 853 }
 854
 855
 856
 857
 858 static gint
 859 on_delete_message (GArray *arguments, gpointer data, osso_rpc_t *retval)
 860 {
 861         /* Get the arguments: */
 862         osso_rpc_t val = g_array_index (arguments,
 863                              osso_rpc_t,
 864                              MODEST_DBUS_DELETE_MESSAGE_ARG_URI);
 865         gchar *uri = g_strdup (val.value.s);
 866
 867         /* Use g_idle to context-switch into the application's thread: */
 868         g_idle_add(on_idle_delete_message, (gpointer)uri);
 869
 870         return OSSO_OK;
 871 }
 872
 873 static gboolean
 874 on_idle_send_receive(gpointer user_data)
 875 {
 876         gboolean auto_update;
 877         ModestWindow *main_win = NULL;
 878
 879         main_win =
 880                 modest_window_mgr_get_main_window (modest_runtime_get_window_mgr (),
 881                                                    FALSE); /* don't create */
 882
 883         gdk_threads_enter (); /* CHECKED */
 884
 885         /* Check if the autoupdate feature is on */
 886         auto_update = modest_conf_get_bool (modest_runtime_get_conf (),
 887                                             MODEST_CONF_AUTO_UPDATE, NULL);
 888
 889         if (auto_update)
 890                 /* Do send receive */
 891                 modest_ui_actions_do_send_receive_all (main_win, FALSE, FALSE, FALSE);
 892         else
 893                 /* Disable auto update */
 894                 modest_platform_set_update_interval (0);
 895
 896         gdk_threads_leave (); /* CHECKED */
 897
 898         return FALSE;
 899 }
 900
 901
 902
 903 static gint
 904 on_dbus_method_dump_send_queues (DBusConnection *con, DBusMessage *message)
 905 {
 906         gchar *str;
 907
 908         DBusMessage *reply;
 909         dbus_uint32_t serial = 0;
 910
 911         GSList *account_names, *cursor;
 912
 913         str = g_strdup("\nsend queues\n"
 914                        "===========\n");
 915
 916         cursor = account_names = modest_account_mgr_account_names
 917                 (modest_runtime_get_account_mgr(), TRUE); /* only enabled accounts */
 918
 919         while (cursor) {
 920                 TnyAccount *acc;
 921                 gchar *tmp, *accname = (gchar*)cursor->data;
 922
 923                 tmp = g_strdup_printf ("%s", str);
 924                 g_free (str);
 925                 str = tmp;
 926
 927                 /* transport */
 928                 acc = modest_tny_account_store_get_server_account (
 929                         modest_runtime_get_account_store(), accname,
 930                         TNY_ACCOUNT_TYPE_TRANSPORT);
 931                 if (TNY_IS_ACCOUNT(acc)) {
 932                         gchar *tmp, *url = tny_account_get_url_string (acc);
 933                         ModestTnySendQueue *sendqueue =
 934                                 modest_runtime_get_send_queue (TNY_TRANSPORT_ACCOUNT(acc), TRUE);
 935                         gchar *queue_str = modest_tny_send_queue_to_string (sendqueue);
 936
 937                         tmp = g_strdup_printf ("%s[%s]: '%s': %s\n%s",
 938                                                str, accname, tny_account_get_id (acc), url,
 939                                                queue_str);
 940                         g_free(queue_str);
 941                         g_free (url);
 942                         g_free (str);
 943                         str = tmp;
 944
 945                         g_object_unref (acc);
 946                 }
 947
 948                 cursor = g_slist_next (cursor);
 949         }
 950         modest_account_mgr_free_account_names (account_names);
 951
 952         g_printerr (str);
 953
 954         reply = dbus_message_new_method_return (message);
 955         if (reply) {
 956                 dbus_message_append_args (reply,
 957                                           DBUS_TYPE_STRING, &str,
 958                                           DBUS_TYPE_INVALID);
 959                 dbus_connection_send (con, reply, &serial);
 960                 dbus_connection_flush (con);
 961                 dbus_message_unref (reply);
 962         }
 963         g_free (str);
 964
 965         /* Let modest die */
 966         g_idle_add (notify_error_in_dbus_callback, NULL);
 967
 968         return OSSO_OK;
 969 }
 970
 971
 972 static gint
 973 on_dbus_method_dump_operation_queue (DBusConnection *con, DBusMessage *message)
 974 {
 975         gchar *str;
 976         gchar *op_queue_str;
 977
 978         DBusMessage *reply;
 979         dbus_uint32_t serial = 0;
 980
 981         /* operations queue; */
 982         op_queue_str = modest_mail_operation_queue_to_string
 983                 (modest_runtime_get_mail_operation_queue ());
 984
 985         str = g_strdup_printf ("\noperation queue\n"
 986                                "===============\n"
 987                                "status: %s\n"
 988                                "%s\n",
 989                                tny_device_is_online (modest_runtime_get_device ()) ? "online" : "offline",
 990                                op_queue_str);
 991         g_free (op_queue_str);
 992
 993         g_printerr (str);
 994
 995         reply = dbus_message_new_method_return (message);
 996         if (reply) {
 997                 dbus_message_append_args (reply,
 998                                           DBUS_TYPE_STRING, &str,
 999                                           DBUS_TYPE_INVALID);
1000                 dbus_connection_send (con, reply, &serial);
1001                 dbus_connection_flush (con);
1002                 dbus_message_unref (reply);
1003         }
1004         g_free (str);
1005
1006         /* Let modest die */
1007         g_idle_add (notify_error_in_dbus_callback, NULL);
1008
1009         return OSSO_OK;
1010 }
1011
1012
1013
1014 static gint
1015 on_dbus_method_dump_accounts (DBusConnection *con, DBusMessage *message)
1016 {
1017         gchar *str;
1018
1019         DBusMessage *reply;
1020         dbus_uint32_t serial = 0;
1021
1022         GSList *account_names, *cursor;
1023
1024         str = g_strdup ("\naccounts\n========\n");
1025
1026         cursor = account_names = modest_account_mgr_account_names
1027                 (modest_runtime_get_account_mgr(), TRUE); /* only enabled accounts */
1028
1029         while (cursor) {
1030                 TnyAccount *acc;
1031                 gchar *tmp, *accname = (gchar*)cursor->data;
1032
1033                 tmp = g_strdup_printf ("%s[%s]\n", str, accname);
1034                 g_free (str);
1035                 str = tmp;
1036
1037                 /* store */
1038                 acc = modest_tny_account_store_get_server_account (
1039                         modest_runtime_get_account_store(), accname,
1040                         TNY_ACCOUNT_TYPE_STORE);
1041                 if (TNY_IS_ACCOUNT(acc)) {
1042                         gchar *tmp, *url = tny_account_get_url_string (acc);
1043                         tmp = g_strdup_printf ("%sstore    : '%s': %s (refs: %d)\n",
1044                                                str, tny_account_get_id (acc), url,
1045                                                ((GObject*)acc)->ref_count-1);
1046                         g_free (str);
1047                         str = tmp;
1048                         g_free (url);
1049                         g_object_unref (acc);
1050                 }
1051
1052                 /* transport */
1053                 acc = modest_tny_account_store_get_server_account (
1054                         modest_runtime_get_account_store(), accname,
1055                         TNY_ACCOUNT_TYPE_TRANSPORT);
1056                 if (TNY_IS_ACCOUNT(acc)) {
1057                         gchar *tmp, *url = tny_account_get_url_string (acc);
1058                         tmp = g_strdup_printf ("%stransport: '%s': %s (refs: %d)\n",
1059                                                str, tny_account_get_id (acc), url,
1060                                                ((GObject*)acc)->ref_count-1);
1061                         g_free (str);
1062                         str = tmp;
1063                         g_free (url);
1064                         g_object_unref (acc);
1065                 }
1066
1067                 cursor = g_slist_next (cursor);
1068         }
1069
1070         modest_account_mgr_free_account_names (account_names);
1071
1072         g_printerr (str);
1073
1074         reply = dbus_message_new_method_return (message);
1075         if (reply) {
1076                 dbus_message_append_args (reply,
1077                                           DBUS_TYPE_STRING, &str,
1078                                           DBUS_TYPE_INVALID);
1079                 dbus_connection_send (con, reply, &serial);
1080                 dbus_connection_flush (con);
1081                 dbus_message_unref (reply);
1082         }
1083         g_free (str);
1084
1085         /* Let modest die */
1086         g_idle_add (notify_error_in_dbus_callback, NULL);
1087
1088         return OSSO_OK;
1089 }
1090
1091 static void
1092 on_send_receive_performer(gboolean canceled,
1093                           GError *err,
1094                           GtkWindow *parent_window,
1095                           TnyAccount *account,
1096                           gpointer user_data)
1097 {
1098         ModestConnectedVia connect_when;
1099
1100         if (err || canceled) {
1101                 g_idle_add (notify_error_in_dbus_callback, NULL);
1102                 return;
1103         }
1104
1105         connect_when = modest_conf_get_int (modest_runtime_get_conf (),
1106                                             MODEST_CONF_UPDATE_WHEN_CONNECTED_BY, NULL);
1107
1108         /* Perform a send and receive if the user selected to connect
1109            via any mean or if the current connection method is the
1110            same as the one specified by the user */
1111         if (connect_when == MODEST_CONNECTED_VIA_ANY ||
1112             connect_when == modest_platform_get_current_connection ()) {
1113                 g_idle_add (on_idle_send_receive, NULL);
1114         } else {
1115                 /* We need this to allow modest to finish */
1116                 g_idle_add (notify_error_in_dbus_callback, NULL);
1117         }
1118 }
1119
1120
1121 static gint
1122 on_send_receive(GArray *arguments, gpointer data, osso_rpc_t * retval)
1123 {
1124         TnyDevice *device = modest_runtime_get_device ();
1125
1126         if (!tny_device_is_online (device))
1127                 modest_platform_connect_and_perform (NULL, FALSE, NULL, on_send_receive_performer, NULL);
1128         else
1129                 on_send_receive_performer (FALSE, NULL, NULL, NULL, NULL);
1130
1131         return OSSO_OK;
1132 }
1133
1134 static gint
1135 on_open_default_inbox(GArray * arguments, gpointer data, osso_rpc_t * retval)
1136 {
1137         g_idle_add(on_idle_top_application, NULL);
1138
1139         return OSSO_OK;
1140 }
1141
1142
1143 static gboolean
1144 on_idle_top_application (gpointer user_data)
1145 {
1146         ModestWindow *main_win;
1147
1148         /* This is a GDK lock because we are an idle callback and
1149          * the code below is or does Gtk+ code */
1150
1151         gdk_threads_enter (); /* CHECKED */
1152
1153         main_win = modest_window_mgr_get_main_window (modest_runtime_get_window_mgr (),
1154                                                       TRUE); /* create if non-existent */
1155         if (main_win) {
1156                 /* Ideally, we would just use gtk_widget_show(),
1157                  * but this widget is not coded correctly to support that: */
1158                 gtk_widget_show_all (GTK_WIDGET (main_win));
1159                 gtk_window_present (GTK_WINDOW (main_win));
1160         } else
1161                 g_warning ("%s: BUG: no main window", __FUNCTION__);
1162
1163         gdk_threads_leave (); /* CHECKED */
1164
1165         return FALSE; /* Do not call this callback again. */
1166 }
1167
1168 static gint
1169 on_top_application(GArray * arguments, gpointer data, osso_rpc_t * retval)
1170 {
1171         /* Use g_idle to context-switch into the application's thread: */
1172         g_idle_add(on_idle_top_application, NULL);
1173
1174         return OSSO_OK;
1175 }
1176
1177 /* Callback for normal D-BUS messages */
1178 gint
1179 modest_dbus_req_handler(const gchar * interface, const gchar * method,
1180                         GArray * arguments, gpointer data,
1181                         osso_rpc_t * retval)
1182 {
1183         if (g_ascii_strcasecmp (method, MODEST_DBUS_METHOD_MAIL_TO) == 0) {
1184                 if (arguments->len != MODEST_DBUS_MAIL_TO_ARGS_COUNT)
1185                         goto param_error;
1186                 return on_mail_to (arguments, data, retval);
1187         } else if (g_ascii_strcasecmp (method, MODEST_DBUS_METHOD_OPEN_MESSAGE) == 0) {
1188                 if (arguments->len != MODEST_DBUS_OPEN_MESSAGE_ARGS_COUNT)
1189                         goto param_error;
1190                 return on_open_message (arguments, data, retval);
1191         } else if (g_ascii_strcasecmp (method, MODEST_DBUS_METHOD_SEND_RECEIVE) == 0) {
1192                 if (arguments->len != 0)
1193                         goto param_error;
1194                 return on_send_receive (arguments, data, retval);
1195         } else if (g_ascii_strcasecmp (method, MODEST_DBUS_METHOD_COMPOSE_MAIL) == 0) {
1196                 if (arguments->len != MODEST_DBUS_COMPOSE_MAIL_ARGS_COUNT)
1197                         goto param_error;
1198                 return on_compose_mail (arguments, data, retval);
1199         } else if (g_ascii_strcasecmp (method, MODEST_DBUS_METHOD_DELETE_MESSAGE) == 0) {
1200                 if (arguments->len != MODEST_DBUS_DELETE_MESSAGE_ARGS_COUNT)
1201                         goto param_error;
1202                 return on_delete_message (arguments,data, retval);
1203         } else if (g_ascii_strcasecmp (method, MODEST_DBUS_METHOD_OPEN_DEFAULT_INBOX) == 0) {
1204                 if (arguments->len != 0)
1205                         goto param_error;
1206                 return on_open_default_inbox (arguments, data, retval);
1207         } else if (g_ascii_strcasecmp (method, MODEST_DBUS_METHOD_TOP_APPLICATION) == 0) {
1208                 if (arguments->len != 0)
1209                         goto param_error;
1210                 return on_top_application (arguments, data, retval);
1211         } else {
1212                 /* We need to return INVALID here so
1213                  * libosso will return DBUS_HANDLER_RESULT_NOT_YET_HANDLED,
1214                  * so that our modest_dbus_req_filter will then be tried instead.
1215                  * */
1216                 return OSSO_INVALID;
1217         }
1218  param_error:
1219         /* Notify error in D-Bus method */
1220         g_idle_add (notify_error_in_dbus_callback, NULL);
1221         return OSSO_ERROR;
1222 }
1223
1224 /* A complex D-Bus type (like a struct),
1225  * used to return various information about a search hit.
1226  */
1227 #define SEARCH_HIT_DBUS_TYPE \
1228         DBUS_STRUCT_BEGIN_CHAR_AS_STRING \
1229         DBUS_TYPE_STRING_AS_STRING /* msgid */ \
1230         DBUS_TYPE_STRING_AS_STRING /* subject */ \
1231         DBUS_TYPE_STRING_AS_STRING /* folder */ \
1232         DBUS_TYPE_STRING_AS_STRING /* sender */ \
1233         DBUS_TYPE_UINT64_AS_STRING /* msize */ \
1234         DBUS_TYPE_BOOLEAN_AS_STRING /* has_attachment */ \
1235         DBUS_TYPE_BOOLEAN_AS_STRING /* is_unread */ \
1236         DBUS_TYPE_INT64_AS_STRING /* timestamp */ \
1237         DBUS_STRUCT_END_CHAR_AS_STRING
1238
1239 static DBusMessage *
1240 search_result_to_message (DBusMessage *reply,
1241                            GList       *hits)
1242 {
1243         DBusMessageIter iter;
1244         DBusMessageIter array_iter;
1245         GList          *hit_iter;
1246
1247         dbus_message_iter_init_append (reply, &iter);
1248         dbus_message_iter_open_container (&iter,
1249                                           DBUS_TYPE_ARRAY,
1250                                           SEARCH_HIT_DBUS_TYPE,
1251                                           &array_iter);
1252
1253         for (hit_iter = hits; hit_iter; hit_iter = hit_iter->next) {
1254                 DBusMessageIter  struct_iter;
1255                 ModestSearchResultHit *hit;
1256                 char            *msg_url;
1257                 const char      *subject;
1258                 const char      *folder;
1259                 const char      *sender;
1260                 guint64          size;
1261                 gboolean         has_attachment;
1262                 gboolean         is_unread;
1263                 gint64           ts;
1264
1265                 hit = (ModestSearchResultHit *) hit_iter->data;
1266
1267                 msg_url = hit->msgid;
1268                 subject = hit->subject;
1269                 folder  = hit->folder;
1270                 sender  = hit->sender;
1271                 size           = hit->msize;
1272                 has_attachment = hit->has_attachment;
1273                 is_unread      = hit->is_unread;
1274                 ts             = hit->timestamp;
1275
1276                 g_debug ("DEBUG: %s: Adding hit: %s", __FUNCTION__, msg_url);
1277
1278                 dbus_message_iter_open_container (&array_iter,
1279                                                   DBUS_TYPE_STRUCT,
1280                                                   NULL,
1281                                                   &struct_iter);
1282
1283                 dbus_message_iter_append_basic (&struct_iter,
1284                                                 DBUS_TYPE_STRING,
1285                                                 &msg_url);
1286
1287                 dbus_message_iter_append_basic (&struct_iter,
1288                                                 DBUS_TYPE_STRING,
1289                                                 &subject);
1290
1291                 dbus_message_iter_append_basic (&struct_iter,
1292                                                 DBUS_TYPE_STRING,
1293                                                 &folder);
1294
1295                 dbus_message_iter_append_basic (&struct_iter,
1296                                                 DBUS_TYPE_STRING,
1297                                                 &sender);
1298
1299                 dbus_message_iter_append_basic (&struct_iter,
1300                                                 DBUS_TYPE_UINT64,
1301                                                 &size);
1302
1303                 dbus_message_iter_append_basic (&struct_iter,
1304                                                 DBUS_TYPE_BOOLEAN,
1305                                                 &has_attachment);
1306
1307                 dbus_message_iter_append_basic (&struct_iter,
1308                                                 DBUS_TYPE_BOOLEAN,
1309                                                 &is_unread);
1310
1311                 dbus_message_iter_append_basic (&struct_iter,
1312                                                 DBUS_TYPE_INT64,
1313                                                 &ts);
1314
1315                 dbus_message_iter_close_container (&array_iter,
1316                                                    &struct_iter);
1317
1318                 g_free (hit->msgid);
1319                 g_free (hit->subject);
1320                 g_free (hit->folder);
1321                 g_free (hit->sender);
1322
1323                 g_slice_free (ModestSearchResultHit, hit);
1324         }
1325
1326         dbus_message_iter_close_container (&iter, &array_iter);
1327
1328         return reply;
1329 }
1330
1331 typedef struct
1332 {
1333         DBusConnection *con;
1334         DBusMessage *message;
1335         ModestSearch *search;
1336 } SearchHelper;
1337
1338 static void
1339 search_all_cb (GList *hits, gpointer user_data)
1340 {
1341         DBusMessage  *reply;
1342         SearchHelper *helper = (SearchHelper *) user_data;
1343
1344         reply = dbus_message_new_method_return (helper->message);
1345
1346         if (reply) {
1347                 dbus_uint32_t serial = 0;
1348
1349                 search_result_to_message (reply, hits);
1350
1351                 dbus_connection_send (helper->con, reply, &serial);
1352                 dbus_connection_flush (helper->con);
1353                 dbus_message_unref (reply);
1354         }
1355
1356         /* Free the helper */
1357         dbus_message_unref (helper->message);
1358         modest_search_free (helper->search);
1359         g_slice_free (ModestSearch, helper->search);
1360         g_slice_free (SearchHelper, helper);
1361 }
1362
1363 static void
1364 on_dbus_method_search (DBusConnection *con, DBusMessage *message)
1365 {
1366         ModestDBusSearchFlags dbus_flags;
1367         dbus_bool_t  res;
1368         dbus_int64_t sd_v;
1369         dbus_int64_t ed_v;
1370         dbus_int32_t flags_v;
1371         dbus_uint32_t size_v;
1372         const char *folder;
1373         const char *query;
1374         time_t start_date;
1375         time_t end_date;
1376         ModestSearch *search;
1377         DBusError error;
1378
1379         dbus_error_init (&error);
1380
1381         sd_v = ed_v = 0;
1382         flags_v = 0;
1383
1384         res = dbus_message_get_args (message,
1385                                      &error,
1386                                      DBUS_TYPE_STRING, &query,
1387                                      DBUS_TYPE_STRING, &folder, /* e.g. "INBOX/drafts": TODO: Use both an ID and a display name. */
1388                                      DBUS_TYPE_INT64, &sd_v,
1389                                      DBUS_TYPE_INT64, &ed_v,
1390                                      DBUS_TYPE_INT32, &flags_v,
1391                                      DBUS_TYPE_UINT32, &size_v,
1392                                      DBUS_TYPE_INVALID);
1393
1394         dbus_flags = (ModestDBusSearchFlags) flags_v;
1395         start_date = (time_t) sd_v;
1396         end_date = (time_t) ed_v;
1397
1398         search = g_slice_new0 (ModestSearch);
1399
1400         if (folder && g_str_has_prefix (folder, "MAND:")) {
1401                 search->folder = g_strdup (folder + strlen ("MAND:"));
1402         } else if (folder && g_str_has_prefix (folder, "USER:")) {
1403                 search->folder = g_strdup (folder + strlen ("USER:"));
1404         } else if (folder && g_str_has_prefix (folder, "MY:")) {
1405                 search->folder = g_strdup (folder + strlen ("MY:"));
1406         } else {
1407                 search->folder = g_strdup (folder);
1408         }
1409
1410    /* Remember the text to search for: */
1411 #ifdef MODEST_HAVE_OGS
1412         search->query  = g_strdup (query);
1413 #endif
1414
1415         /* Other criteria: */
1416         search->start_date = start_date;
1417         search->end_date  = end_date;
1418         search->flags = 0;
1419
1420         /* Text to serach for in various parts of the message: */
1421         if (dbus_flags & MODEST_DBUS_SEARCH_SUBJECT) {
1422                 search->flags |= MODEST_SEARCH_SUBJECT;
1423                 search->subject = g_strdup (query);
1424         }
1425
1426         if (dbus_flags & MODEST_DBUS_SEARCH_SENDER) {
1427                 search->flags |=  MODEST_SEARCH_SENDER;
1428                 search->from = g_strdup (query);
1429         }
1430
1431         if (dbus_flags & MODEST_DBUS_SEARCH_RECIPIENT) {
1432                 search->flags |= MODEST_SEARCH_RECIPIENT;
1433                 search->recipient = g_strdup (query);
1434         }
1435
1436         if (dbus_flags & MODEST_DBUS_SEARCH_BODY) {
1437                 search->flags |=  MODEST_SEARCH_BODY;
1438                 search->body = g_strdup (query);
1439         }
1440
1441         if (sd_v > 0) {
1442                 search->flags |= MODEST_SEARCH_BEFORE;
1443                 search->start_date = start_date;
1444         }
1445
1446         if (ed_v > 0) {
1447                 search->flags |= MODEST_SEARCH_AFTER;
1448                 search->end_date = end_date;
1449         }
1450
1451         if (size_v > 0) {
1452                 search->flags |= MODEST_SEARCH_SIZE;
1453                 search->minsize = size_v;
1454         }
1455
1456 #ifdef MODEST_HAVE_OGS
1457         search->flags |= MODEST_SEARCH_USE_OGS;
1458         g_debug ("%s: Starting search for %s", __FUNCTION__, search->query);
1459 #endif
1460
1461         SearchHelper *helper = g_slice_new (SearchHelper);
1462         helper->search = search;
1463         dbus_message_ref (message);
1464         helper->message = message;
1465         helper->con = con;
1466
1467         /* Search asynchronously */
1468         modest_search_all_accounts (search, search_all_cb, helper);
1469 }
1470
1471
1472 /* A complex D-Bus type (like a struct),
1473  * used to return various information about a folder.
1474  */
1475 #define GET_FOLDERS_RESULT_DBUS_TYPE \
1476         DBUS_STRUCT_BEGIN_CHAR_AS_STRING \
1477         DBUS_TYPE_STRING_AS_STRING /* Folder Name */ \
1478         DBUS_TYPE_STRING_AS_STRING /* Folder URI */ \
1479         DBUS_STRUCT_END_CHAR_AS_STRING
1480
1481 static DBusMessage *
1482 get_folders_result_to_message (DBusMessage *reply,
1483                            GList *folder_ids)
1484 {
1485         DBusMessageIter iter;
1486         dbus_message_iter_init_append (reply, &iter);
1487
1488         DBusMessageIter array_iter;
1489         dbus_message_iter_open_container (&iter,
1490                                           DBUS_TYPE_ARRAY,
1491                                           GET_FOLDERS_RESULT_DBUS_TYPE,
1492                                           &array_iter);
1493
1494         GList *list_iter = folder_ids;
1495         for (list_iter = folder_ids; list_iter; list_iter = list_iter->next) {
1496
1497                 const gchar *folder_name = (const gchar*)list_iter->data;
1498                 if (folder_name) {
1499                         /* g_debug ("DEBUG: %s: Adding folder: %s", __FUNCTION__, folder_name); */
1500
1501                         DBusMessageIter struct_iter;
1502                         dbus_message_iter_open_container (&array_iter,
1503                                                           DBUS_TYPE_STRUCT,
1504                                                           NULL,
1505                                                           &struct_iter);
1506
1507                         /* name: */
1508                         dbus_message_iter_append_basic (&struct_iter,
1509                                                         DBUS_TYPE_STRING,
1510                                                         &folder_name); /* The string will be copied. */
1511
1512                         /* URI: This is maybe not needed by osso-global-search: */
1513                         const gchar *folder_uri = "TODO:unimplemented";
1514                         dbus_message_iter_append_basic (&struct_iter,
1515                                                         DBUS_TYPE_STRING,
1516                                                         &folder_uri); /* The string will be copied. */
1517
1518                         dbus_message_iter_close_container (&array_iter,
1519                                                            &struct_iter);
1520                 }
1521         }
1522
1523         dbus_message_iter_close_container (&iter, &array_iter);
1524
1525         return reply;
1526 }
1527
1528 static void
1529 add_single_folder_to_list (TnyFolder *folder, GList** list)
1530 {
1531         if (!folder)
1532                 return;
1533
1534         if (TNY_IS_MERGE_FOLDER (folder)) {
1535                 const gchar * folder_name;
1536                 /* Ignore these because their IDs ares
1537                  * a) not always unique or sensible.
1538                  * b) not human-readable, and currently need a human-readable
1539                  *    ID here, because the osso-email-interface API does not allow
1540                  *    us to return both an ID and a display name.
1541                  *
1542                  * This is actually the merged outbox folder.
1543                  * We could hack our D-Bus API to understand "outbox" as the merged outboxes,
1544                  * but that seems unwise. murrayc.
1545                  */
1546                 folder_name = tny_folder_get_name (folder);
1547                 if (folder_name && !strcmp (folder_name, "Outbox")) {
1548                         *list = g_list_append(*list, g_strdup ("MAND:outbox"));
1549                 }
1550                 return;
1551         }
1552
1553         /* Add this folder to the list: */
1554         /*
1555         const gchar * folder_name = tny_folder_get_name (folder);
1556         if (folder_name)
1557                 *list = g_list_append(*list, g_strdup (folder_name));
1558         else {
1559         */
1560                 /* osso-global-search only uses one string,
1561                  * so ID is the only thing that could possibly identify a folder.
1562                  * TODO: osso-global search should probably be changed to
1563                  * take an ID and a Name.
1564                  */
1565         const gchar * id =  tny_folder_get_id (folder);
1566         if (id && strlen(id)) {
1567                 const gchar *prefix = NULL;
1568                 TnyFolderType folder_type;
1569
1570                 /* dbus global search api expects a prefix identifying the type of
1571                  * folder here. Mandatory folders should have MAND: prefix, and
1572                  * other user created folders should have USER: prefix
1573                  */
1574                 folder_type = modest_tny_folder_guess_folder_type (folder);
1575                 switch (folder_type) {
1576                 case TNY_FOLDER_TYPE_INBOX:
1577                         prefix = "MY:";
1578                         break;
1579                 case TNY_FOLDER_TYPE_OUTBOX:
1580                 case TNY_FOLDER_TYPE_DRAFTS:
1581                 case TNY_FOLDER_TYPE_SENT:
1582                 case TNY_FOLDER_TYPE_ARCHIVE:
1583                         prefix = "MAND:";
1584                         break;
1585                 case TNY_FOLDER_TYPE_INVALID:
1586                         g_warning ("%s: BUG: TNY_FOLDER_TYPE_INVALID", __FUNCTION__);
1587                         return; /* don't add it */
1588                 default:
1589                         prefix = "USER:";
1590
1591                 }
1592
1593
1594                 *list = g_list_append(*list, g_strdup_printf ("%s%s", prefix, id));
1595         }
1596 }
1597
1598 static void
1599 add_folders_to_list (TnyFolderStore *folder_store, GList** list)
1600 {
1601         if (!folder_store)
1602                 return;
1603
1604         /* Add this folder to the list: */
1605         if (TNY_IS_FOLDER (folder_store)) {
1606                 add_single_folder_to_list (TNY_FOLDER (folder_store), list);
1607         }
1608
1609         /* Recurse into child folders: */
1610
1611         /* Get the folders list: */
1612         /*
1613         TnyFolderStoreQuery *query = tny_folder_store_query_new ();
1614         tny_folder_store_query_add_item (query, NULL,
1615                 TNY_FOLDER_STORE_QUERY_OPTION_SUBSCRIBED);
1616         */
1617         TnyList *all_folders = tny_simple_list_new ();
1618         tny_folder_store_get_folders (folder_store,
1619                                       all_folders,
1620                                       NULL /* query */,
1621                                       NULL /* error */);
1622
1623         TnyIterator *iter = tny_list_create_iterator (all_folders);
1624         while (!tny_iterator_is_done (iter)) {
1625
1626                 /* Do not recurse, because the osso-global-search UI specification
1627                  * does not seem to want the sub-folders, though that spec seems to
1628                  * be generally unsuitable for Modest.
1629                  */
1630                 TnyFolder *folder = TNY_FOLDER (tny_iterator_get_current (iter));
1631                 if (folder) {
1632                         add_single_folder_to_list (TNY_FOLDER (folder), list);
1633
1634                         #if 0
1635                         if (TNY_IS_FOLDER_STORE (folder))
1636                                 add_folders_to_list (TNY_FOLDER_STORE (folder), list);
1637                         else {
1638                                 add_single_folder_to_list (TNY_FOLDER (folder), list);
1639                         }
1640                         #endif
1641
1642                         /* tny_iterator_get_current() gave us a reference. */
1643                         g_object_unref (folder);
1644                 }
1645
1646                 tny_iterator_next (iter);
1647         }
1648         g_object_unref (G_OBJECT (iter));
1649 }
1650
1651
1652 /* return >1 for a special folder, 0 for a user-folder */
1653 static gint
1654 get_rank (const gchar *folder)
1655 {
1656         if (strcmp (folder, "INBOX") == 0)
1657                 return 1;
1658         if (strcmp (folder, modest_local_folder_info_get_type_name(TNY_FOLDER_TYPE_SENT)) == 0)
1659                 return 2;
1660         if (strcmp (folder, modest_local_folder_info_get_type_name(TNY_FOLDER_TYPE_DRAFTS)) == 0)
1661                 return 3;
1662         if (strcmp (folder, modest_local_folder_info_get_type_name(TNY_FOLDER_TYPE_OUTBOX)) == 0)
1663                 return 4;
1664         return 0;
1665 }
1666
1667 static gint
1668 folder_name_compare_func (const gchar* folder1, const gchar* folder2)
1669 {
1670         gint r1 = get_rank (folder1);
1671         gint r2 = get_rank (folder2);
1672
1673         if (r1 > 0 && r2 > 0)
1674                 return r1 - r2;
1675         if (r1 > 0 && r2 == 0)
1676                 return -1;
1677         if (r1 == 0 && r2 > 0)
1678                 return 1;
1679         else
1680                 return  modest_text_utils_utf8_strcmp (folder1, folder2, TRUE);
1681 }
1682
1683 /* FIXME: */
1684 /*   - we're still missing the outbox */
1685 /*   - we need to take care of localization (urgh) */
1686 /*   - what about 'All mail folders'? */
1687 static void
1688 on_dbus_method_get_folders (DBusConnection *con, DBusMessage *message)
1689 {
1690         DBusMessage  *reply = NULL;
1691         ModestAccountMgr *account_mgr = NULL;
1692         gchar *account_name = NULL;
1693         GList *folder_names = NULL;
1694         TnyAccount *account_local = NULL;
1695         TnyAccount *account_mmc = NULL;
1696
1697         /* Get the TnyStoreAccount so we can get the folders: */
1698         account_mgr = modest_runtime_get_account_mgr();
1699         account_name = modest_account_mgr_get_default_account (account_mgr);
1700         if (!account_name) {
1701                 g_printerr ("modest: no account found\n");
1702         }
1703
1704         if (account_name) {
1705                 TnyAccount *account = NULL;
1706                 if (account_mgr) {
1707                         account = modest_tny_account_store_get_server_account (
1708                                 modest_runtime_get_account_store(), account_name,
1709                                 TNY_ACCOUNT_TYPE_STORE);
1710                 }
1711
1712                 if (!account) {
1713                         g_printerr ("modest: failed to get tny account folder'%s'\n", account_name);
1714                 }
1715
1716                 printf("DEBUG: %s: Getting folders for account name=%s\n", __FUNCTION__, account_name);
1717                 g_free (account_name);
1718                 account_name = NULL;
1719
1720                 add_folders_to_list (TNY_FOLDER_STORE (account), &folder_names);
1721
1722                 g_object_unref (account);
1723                 account = NULL;
1724         }
1725
1726         /* Also add the folders from the local folders account,
1727          * because they are (currently) used with all accounts:
1728          * TODO: This is not working. It seems to get only the Merged Folder (with an ID of "" (not NULL)).
1729          */
1730         account_local =
1731                 modest_tny_account_store_get_local_folders_account (modest_runtime_get_account_store());
1732         add_folders_to_list (TNY_FOLDER_STORE (account_local), &folder_names);
1733
1734         g_object_unref (account_local);
1735         account_local = NULL;
1736
1737         /* Obtain the mmc account */
1738         account_mmc =
1739                 modest_tny_account_store_get_mmc_folders_account (modest_runtime_get_account_store());
1740         if (account_mmc) {
1741                 add_folders_to_list (TNY_FOLDER_STORE (account_mmc), &folder_names);
1742                 g_object_unref (account_mmc);
1743                 account_mmc = NULL;
1744         }
1745
1746         /* specs require us to sort the folder names, although
1747          * this is really not the place to do that...
1748          */
1749         folder_names = g_list_sort (folder_names,
1750                                     (GCompareFunc)folder_name_compare_func);
1751
1752         /* Put the result in a DBus reply: */
1753         reply = dbus_message_new_method_return (message);
1754
1755         get_folders_result_to_message (reply, folder_names);
1756
1757         if (reply == NULL) {
1758                 g_warning ("%s: Could not create reply.", __FUNCTION__);
1759         }
1760
1761         if (reply) {
1762                 dbus_uint32_t serial = 0;
1763                 dbus_connection_send (con, reply, &serial);
1764         dbus_connection_flush (con);
1765         dbus_message_unref (reply);
1766         }
1767
1768         g_list_foreach (folder_names, (GFunc)g_free, NULL);
1769         g_list_free (folder_names);
1770 }
1771
1772
1773 static void
1774 reply_empty_results (DBusConnection *con, DBusMessage *msg)
1775 {
1776         DBusMessage *reply = dbus_message_new_method_return (msg);
1777         if (reply) {
1778                 dbus_uint32_t serial = 0;
1779                 /* we simply return an empty list, otherwise
1780                    global-search gets confused */
1781                 search_result_to_message (reply, NULL);
1782
1783                 dbus_connection_send (con, reply, &serial);
1784                 dbus_connection_flush (con);
1785                 dbus_message_unref (reply);
1786         } else
1787                 g_warning ("%s: failed to send reply",
1788                         __FUNCTION__);
1789 }
1790
1791
1792 /** This D-Bus handler is used when the main osso-rpc
1793  * D-Bus handler has not handled something.
1794  * We use this for D-Bus methods that need to use more complex types
1795  * than osso-rpc supports.
1796  */
1797 DBusHandlerResult
1798 modest_dbus_req_filter (DBusConnection *con,
1799                         DBusMessage    *message,
1800                         void           *user_data)
1801 {
1802         gboolean handled = FALSE;
1803
1804         if (dbus_message_is_method_call (message,
1805                                          MODEST_DBUS_IFACE,
1806                                          MODEST_DBUS_METHOD_SEARCH)) {
1807
1808         /* don't try to search when there not enough mem */
1809                 if (modest_platform_check_memory_low (NULL, TRUE)) {
1810                         g_warning ("%s: not enough memory for searching",
1811                                    __FUNCTION__);
1812                         reply_empty_results (con, message);
1813                         handled = TRUE;
1814
1815                 } else {
1816                         on_dbus_method_search (con, message);
1817                         handled = TRUE;
1818                 }
1819
1820         } else if (dbus_message_is_method_call (message,
1821                                                 MODEST_DBUS_IFACE,
1822                                                 MODEST_DBUS_METHOD_GET_FOLDERS)) {
1823                 on_dbus_method_get_folders (con, message);
1824                 handled = TRUE;
1825         } else if (dbus_message_is_method_call (message,
1826                                                 MODEST_DBUS_IFACE,
1827                                                 MODEST_DBUS_METHOD_DUMP_OPERATION_QUEUE)) {
1828                 on_dbus_method_dump_operation_queue (con, message);
1829                 handled = TRUE;
1830         } else if (dbus_message_is_method_call (message,
1831                                                 MODEST_DBUS_IFACE,
1832                                                 MODEST_DBUS_METHOD_DUMP_ACCOUNTS)) {
1833                 on_dbus_method_dump_accounts (con, message);
1834                 handled = TRUE;
1835         } else if (dbus_message_is_method_call (message,
1836                                                 MODEST_DBUS_IFACE,
1837                                                 MODEST_DBUS_METHOD_DUMP_SEND_QUEUES)) {
1838                 on_dbus_method_dump_send_queues (con, message);
1839                 handled = TRUE;
1840         } else {
1841                 /* Note that this mentions methods that were already handled in modest_dbus_req_handler(). */
1842                 /*
1843                 g_debug ("  debug: %s: Unexpected (maybe already handled) D-Bus method:\n   Interface=%s, Member=%s\n",
1844                         __FUNCTION__, dbus_message_get_interface (message),
1845                         dbus_message_get_member(message));
1846                 */
1847         }
1848
1849         return (handled ?
1850                 DBUS_HANDLER_RESULT_HANDLED :
1851                 DBUS_HANDLER_RESULT_NOT_YET_HANDLED);
1852 }
1853
1854 static gboolean
1855 notify_error_in_dbus_callback (gpointer user_data)
1856 {
1857         ModestMailOperation *mail_op;
1858         ModestMailOperationQueue *mail_op_queue;
1859
1860         mail_op = modest_mail_operation_new (NULL);
1861         mail_op_queue = modest_runtime_get_mail_operation_queue ();
1862
1863         /* Issues a noop operation in order to force the queue to emit
1864            the "queue-empty" signal to allow modest to quit */
1865         modest_mail_operation_queue_add (mail_op_queue, mail_op);
1866         modest_mail_operation_noop (mail_op);
1867         g_object_unref (mail_op);
1868
1869         return FALSE;
1870 }
1871
1872 static gboolean
1873 notify_msg_not_found_in_idle (gpointer user_data)
1874 {
1875         modest_platform_run_information_dialog (NULL, _("mail_ni_ui_folder_get_msg_folder_error"), FALSE);
1876
1877         g_idle_add (notify_error_in_dbus_callback, NULL);
1878
1879         return FALSE;
1880 }