Bugfix for 82760
[modest] / 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_hide_opening_animation (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         g_slice_free (OpenMsgPerformerInfo, info);
427         return FALSE;
428 }
429
430 static void 
431 on_open_message_performer (gboolean canceled, 
432                            GError *err,
433                            GtkWindow *parent_window, 
434                            TnyAccount *account, 
435                            gpointer user_data)
436 {
437         OpenMsgPerformerInfo *info;
438         gchar *uri;
439         TnyHeader *header;
440         gchar *msg_uid;
441         ModestWindowMgr *win_mgr;
442         ModestWindow *msg_view = NULL;
443         gboolean is_draft = FALSE;
444         TnyFolder *folder = NULL;
445         TnyMsg *msg = NULL;
446
447         info = (OpenMsgPerformerInfo *) user_data;
448         uri = info->uri;
449
450         if (canceled || err) {
451                 goto frees;
452         }
453
454         /* Get folder */
455         if (!account) {
456                 ModestTnyAccountStore *account_store;
457                 ModestTnyLocalFoldersAccount *local_folders_account;
458                 
459                 account_store = modest_runtime_get_account_store ();
460                 local_folders_account = MODEST_TNY_LOCAL_FOLDERS_ACCOUNT (
461                         modest_tny_account_store_get_local_folders_account (account_store));
462                 folder = modest_tny_local_folders_account_get_merged_outbox (local_folders_account);
463                 g_object_unref (local_folders_account);
464         } else {
465                 folder = tny_store_account_find_folder (TNY_STORE_ACCOUNT (account), uri, NULL);
466         }
467
468
469         if (!folder) {
470                 g_idle_add (notify_msg_not_found_in_idle, NULL);
471                 goto frees;
472         }
473         
474         if (modest_tny_folder_is_local_folder (folder) &&
475             (modest_tny_folder_get_local_or_mmc_folder_type (folder) == TNY_FOLDER_TYPE_DRAFTS)) {
476                 is_draft = TRUE;
477         }
478
479         /* Get message */
480         msg = tny_folder_find_msg (folder, uri, NULL);
481         if (!msg) {
482                 g_idle_add (notify_msg_not_found_in_idle, NULL);
483                 goto frees;
484         }
485
486         header = tny_msg_get_header (msg);
487         if (header && (tny_header_get_flags (header)&TNY_HEADER_FLAG_DELETED)) {
488                 g_object_unref (header);
489                 g_object_unref (msg);
490                 g_idle_add (notify_msg_not_found_in_idle, NULL);
491                 goto frees;
492         }
493         msg_uid =  modest_tny_folder_get_header_unique_id (header); 
494         win_mgr = modest_runtime_get_window_mgr ();
495
496         if (modest_window_mgr_find_registered_header (win_mgr, header, &msg_view)) {
497                 gtk_window_present (GTK_WINDOW(msg_view));
498         } else {
499                 const gchar *modest_account_name;
500
501                 /* g_debug ("creating new window for this msg"); */
502                 modest_window_mgr_register_header (win_mgr, header, NULL);
503
504                 if (account) {
505                         modest_account_name = 
506                                 modest_tny_account_get_parent_modest_account_name_for_server_account (account);
507                 } else {
508                         modest_account_name = NULL;
509                 }
510                         
511                 /* Drafts will be opened in the editor, and others will be opened in the viewer */
512                 if (is_draft) {
513                         msg_view = modest_msg_edit_window_new (msg, modest_account_name, TRUE);
514                 } else {
515                         TnyHeader *header;
516                         header = tny_msg_get_header (msg);
517                         msg_view = modest_msg_view_window_new_for_search_result (msg, modest_account_name, msg_uid);
518                         if (! (tny_header_get_flags (header) & TNY_HEADER_FLAG_SEEN))
519                                 tny_header_set_flag (header, TNY_HEADER_FLAG_SEEN);
520                         g_object_unref (header);
521                         
522                 }               
523                 modest_window_mgr_register_window (win_mgr, msg_view);
524                 gtk_widget_show_all (GTK_WIDGET (msg_view));
525         }
526         g_object_unref (header);
527         g_object_unref (msg);
528         g_object_unref (folder);
529
530  frees:
531         g_free (info->uri);
532         if (info->account)
533                 g_object_unref (info->account);
534         g_idle_add (on_hide_opening_animation, info);
535 }
536
537 static gboolean
538 on_idle_open_message_performer (gpointer user_data)
539 {
540         ModestWindow *main_win = NULL;
541         OpenMsgPerformerInfo *info = (OpenMsgPerformerInfo *) user_data;
542
543         main_win = modest_window_mgr_get_main_window (modest_runtime_get_window_mgr(),
544                                                       FALSE); /* don't create */
545
546         /* Lock before the call as we're in an idle handler */
547         gdk_threads_enter ();
548         if (info->connect) {
549                 modest_platform_connect_and_perform (GTK_WINDOW (main_win), TRUE, info->account, 
550                                                      on_open_message_performer, info);
551         } else {
552                 on_open_message_performer (FALSE, NULL, GTK_WINDOW (main_win), info->account, info);
553         }
554         gdk_threads_leave ();
555
556         return FALSE;
557 }
558
559 static gint 
560 on_open_message (GArray * arguments, gpointer data, osso_rpc_t * retval)
561 {
562         osso_rpc_t val;
563         gchar *uri;
564         TnyAccount *account = NULL;
565         gint osso_retval;
566         gboolean is_merge;
567
568         /* Get the arguments: */
569         val = g_array_index(arguments, osso_rpc_t, MODEST_DBUS_OPEN_MESSAGE_ARG_URI);
570         uri = g_strdup (val.value.s);
571
572         is_merge = g_str_has_prefix (uri, "merge:");
573
574         /* Get the account */
575         if (!is_merge)
576                 account = tny_account_store_find_account (TNY_ACCOUNT_STORE (modest_runtime_get_account_store ()),
577                                                           uri);
578
579         
580         if (is_merge || account) {
581                 OpenMsgPerformerInfo *info;
582                 TnyFolder *folder = NULL;
583
584                 info = g_slice_new0 (OpenMsgPerformerInfo);
585                 if (account) 
586                         info->account = g_object_ref (account);
587                 info->uri = uri;
588                 info->connect = TRUE;
589                 info->animation_timeout = g_timeout_add (1000, on_show_opening_animation, info);
590
591                 /* Try to get the message, if it's already downloaded
592                    we don't need to connect */
593                 if (account) {
594                         folder = tny_store_account_find_folder (TNY_STORE_ACCOUNT (account), uri, NULL);
595                 } else {
596                         ModestTnyAccountStore *account_store;
597                         ModestTnyLocalFoldersAccount *local_folders_account;
598
599                         account_store = modest_runtime_get_account_store ();
600                         local_folders_account = MODEST_TNY_LOCAL_FOLDERS_ACCOUNT (
601                                 modest_tny_account_store_get_local_folders_account (account_store));
602                         folder = modest_tny_local_folders_account_get_merged_outbox (local_folders_account);
603                         g_object_unref (local_folders_account);
604                 }
605                 if (folder) {
606                         TnyMsg *msg = tny_folder_find_msg (folder, uri, NULL);
607                         if (msg) {
608                                 info->connect = FALSE;
609                                 g_object_unref (msg);
610                         }
611                         g_object_unref (folder);
612                 }
613
614                 /* We need to call it into an idle to get
615                    modest_platform_connect_and_perform into the main
616                    loop */
617                 g_idle_add (on_idle_open_message_performer, info);
618                 osso_retval = OSSO_OK;
619         } else {
620                 g_free (uri);
621                 osso_retval = OSSO_ERROR; 
622                 g_idle_add (notify_error_in_dbus_callback, NULL);
623         }
624
625         if (account)
626                 g_object_unref (account);
627         return osso_retval;
628 }
629
630 static gboolean
631 on_idle_delete_message (gpointer user_data)
632 {
633         TnyList *headers = NULL;
634         TnyFolder *folder = NULL;
635         TnyIterator *iter = NULL; 
636         TnyHeader *header = NULL, *msg_header = NULL;
637         TnyMsg *msg = NULL;
638         TnyAccount *account = NULL;
639         const char *uri = NULL, *uid = NULL;
640         gint res = 0;
641         ModestMailOperation *mail_op = NULL;
642         ModestWindow *main_win = NULL, *msg_view = NULL;
643
644         uri = (char *) user_data;
645         
646         msg = find_message_by_url (uri, &account);
647
648         if (!msg) {
649                 g_warning ("%s: Could not find message '%s'", __FUNCTION__, uri);
650                 g_idle_add (notify_error_in_dbus_callback, NULL);
651                 return OSSO_ERROR; 
652         }
653         
654         main_win = modest_window_mgr_get_main_window (modest_runtime_get_window_mgr(),
655                                                       FALSE); /* don't create */
656         
657         msg_header = tny_msg_get_header (msg);
658         uid = tny_header_get_uid (msg_header);
659         folder = tny_msg_get_folder (msg);
660
661         if (!folder) {
662                 g_warning ("%s: Could not find folder (uri:'%s')", __FUNCTION__, uri);
663                 g_object_unref (msg);
664                 g_idle_add (notify_error_in_dbus_callback, NULL);
665                 return OSSO_ERROR; 
666         }
667
668         headers = tny_simple_list_new ();
669         tny_folder_get_headers (folder, headers, TRUE, NULL);
670         iter = tny_list_create_iterator (headers);
671         header = NULL;
672
673         while (!tny_iterator_is_done (iter)) {
674                 const char *cur_id = NULL;
675
676                 header = TNY_HEADER (tny_iterator_get_current (iter));
677                 if (header)
678                         cur_id = tny_header_get_uid (header);
679                 
680                 if (cur_id && uid && g_str_equal (cur_id, uid)) {
681                         /* g_debug ("Found corresponding header from folder"); */
682                         break;
683                 }
684
685                 if (header) {
686                         g_object_unref (header);
687                         header = NULL;
688                 }
689                 
690                 tny_iterator_next (iter);
691         }
692
693         g_object_unref (iter);
694         iter = NULL;
695         g_object_unref (headers);
696         headers = NULL;
697         
698         g_object_unref (msg_header);
699         msg_header = NULL;
700         g_object_unref (msg);
701         msg = NULL;
702
703         if (header == NULL) {
704                 if (folder)
705                         g_object_unref (folder);
706                 g_idle_add (notify_error_in_dbus_callback, NULL);                       
707                 return OSSO_ERROR;
708         }
709                 
710         res = OSSO_OK;
711
712         /* This is a GDK lock because we are an idle callback and
713          * the code below is or does Gtk+ code */
714         gdk_threads_enter (); /* CHECKED */
715
716         mail_op = modest_mail_operation_new (main_win ? G_OBJECT(main_win) : NULL);
717         modest_mail_operation_queue_add (modest_runtime_get_mail_operation_queue (), mail_op);
718         modest_mail_operation_remove_msg (mail_op, header, FALSE);
719         g_object_unref (G_OBJECT (mail_op));
720         
721         if (main_win) { /* no need if there's no window */ 
722                 if (modest_window_mgr_find_registered_header (modest_runtime_get_window_mgr(),
723                                                               header, &msg_view)) {
724                         if (MODEST_IS_MSG_VIEW_WINDOW (msg_view))
725                                 modest_ui_actions_refresh_message_window_after_delete (MODEST_MSG_VIEW_WINDOW (msg_view));
726                 }
727         }
728         gdk_threads_leave (); /* CHECKED */
729         
730         if (header)
731                 g_object_unref (header);
732         
733         if (folder) {
734                 /* Trick: do a poke status in order to speed up the signaling
735                    of observers.
736                    A delete via the menu does this, in do_headers_action(), 
737                    though I don't know why.
738                  */
739                 tny_folder_poke_status (folder);
740         
741                 g_object_unref (folder);
742         }
743         
744         if (account)
745                 g_object_unref (account);
746                 
747         /* Refilter the header view explicitly, to make sure that 
748          * deleted emails are really removed from view. 
749          * (They are not really deleted until contact is made with the server, 
750          * so they would appear with a strike-through until then):
751          */
752         if (main_win) { /* only needed when there's a mainwindow / UI */
753
754                 /* This is a GDK lock because we are an idle callback and
755                  * the code below is or does Gtk+ code */
756                 gdk_threads_enter (); /* CHECKED */
757                 ModestHeaderView *header_view = (ModestHeaderView *)
758                         modest_main_window_get_child_widget (MODEST_MAIN_WINDOW(main_win),
759                                                              MODEST_MAIN_WINDOW_WIDGET_TYPE_HEADER_VIEW);
760                 if (header_view && MODEST_IS_HEADER_VIEW (header_view))
761                         modest_header_view_refilter (header_view);
762                 gdk_threads_leave ();
763         }
764         
765         return res;
766 }
767
768
769
770
771 static gint
772 on_delete_message (GArray *arguments, gpointer data, osso_rpc_t *retval)
773 {
774         /* Get the arguments: */
775         osso_rpc_t val = g_array_index (arguments,
776                              osso_rpc_t,
777                              MODEST_DBUS_DELETE_MESSAGE_ARG_URI);
778         gchar *uri = g_strdup (val.value.s);
779         
780         /* Use g_idle to context-switch into the application's thread: */
781         g_idle_add(on_idle_delete_message, (gpointer)uri);
782         
783         return OSSO_OK;
784 }
785
786 static gboolean
787 on_idle_send_receive(gpointer user_data)
788 {
789         gboolean auto_update;
790         ModestWindow *main_win = NULL;
791
792         main_win =
793                 modest_window_mgr_get_main_window (modest_runtime_get_window_mgr (),
794                                                    FALSE); /* don't create */
795
796         gdk_threads_enter (); /* CHECKED */
797
798         /* Check if the autoupdate feature is on */
799         auto_update = modest_conf_get_bool (modest_runtime_get_conf (), 
800                                             MODEST_CONF_AUTO_UPDATE, NULL);
801
802         if (auto_update)
803                 /* Do send receive */
804                 modest_ui_actions_do_send_receive_all (main_win, FALSE, FALSE, FALSE);
805         else
806                 /* Disable auto update */
807                 modest_platform_set_update_interval (0);
808
809         gdk_threads_leave (); /* CHECKED */
810         
811         return FALSE;
812 }
813
814
815
816 static gint 
817 on_dbus_method_dump_send_queues (DBusConnection *con, DBusMessage *message)
818 {
819         gchar *str;
820         
821         DBusMessage *reply;
822         dbus_uint32_t serial = 0;
823
824         GSList *account_names, *cursor;
825
826         str = g_strdup("\nsend queues\n"
827                        "===========\n");
828
829         cursor = account_names = modest_account_mgr_account_names
830                 (modest_runtime_get_account_mgr(), TRUE); /* only enabled accounts */
831
832         while (cursor) {
833                 TnyAccount *acc;
834                 gchar *tmp, *accname = (gchar*)cursor->data;
835                 
836                 tmp = g_strdup_printf ("%s", str);
837                 g_free (str);
838                 str = tmp;
839                 
840                 /* transport */
841                 acc = modest_tny_account_store_get_server_account (
842                         modest_runtime_get_account_store(), accname,
843                         TNY_ACCOUNT_TYPE_TRANSPORT);
844                 if (TNY_IS_ACCOUNT(acc)) {
845                         gchar *tmp, *url = tny_account_get_url_string (acc);
846                         ModestTnySendQueue *sendqueue =
847                                 modest_runtime_get_send_queue (TNY_TRANSPORT_ACCOUNT(acc));
848                         gchar *queue_str = modest_tny_send_queue_to_string (sendqueue);
849                         
850                         tmp = g_strdup_printf ("%s[%s]: '%s': %s\n%s",
851                                                str, accname, tny_account_get_id (acc), url,
852                                                queue_str);
853                         g_free(queue_str);
854                         g_free (url);
855                         g_free (str);
856                         str = tmp;
857
858                         g_object_unref (acc);
859                 }
860                 
861                 cursor = g_slist_next (cursor);
862         }
863         modest_account_mgr_free_account_names (account_names);
864                                                          
865         g_printerr (str);
866         
867         reply = dbus_message_new_method_return (message);
868         if (reply) {
869                 dbus_message_append_args (reply,
870                                           DBUS_TYPE_STRING, &str,
871                                           DBUS_TYPE_INVALID);
872                 dbus_connection_send (con, reply, &serial);
873                 dbus_connection_flush (con);
874                 dbus_message_unref (reply);
875         }
876         
877         g_free (str);
878         return OSSO_OK;
879 }
880
881
882 static gint 
883 on_dbus_method_dump_operation_queue (DBusConnection *con, DBusMessage *message)
884 {
885         gchar *str;
886         gchar *op_queue_str;
887         
888         DBusMessage *reply;
889         dbus_uint32_t serial = 0;
890
891         /* operations queue; */
892         op_queue_str = modest_mail_operation_queue_to_string
893                 (modest_runtime_get_mail_operation_queue ());
894                 
895         str = g_strdup_printf ("\noperation queue\n"
896                                "===============\n"
897                                "status: %s\n"
898                                "%s\n",
899                                tny_device_is_online (modest_runtime_get_device ()) ? "online" : "offline",
900                                op_queue_str);
901         g_free (op_queue_str);
902         
903         g_printerr (str);
904         
905         reply = dbus_message_new_method_return (message);
906         if (reply) {
907                 dbus_message_append_args (reply,
908                                           DBUS_TYPE_STRING, &str,
909                                           DBUS_TYPE_INVALID);
910                 dbus_connection_send (con, reply, &serial);
911                 dbus_connection_flush (con);
912                 dbus_message_unref (reply);
913         }
914         
915         g_free (str);
916         return OSSO_OK;
917 }
918
919
920
921 static gint 
922 on_dbus_method_dump_accounts (DBusConnection *con, DBusMessage *message)
923 {
924         gchar *str;
925         
926         DBusMessage *reply;
927         dbus_uint32_t serial = 0;
928
929         GSList *account_names, *cursor;
930
931         str = g_strdup ("\naccounts\n========\n");
932
933         cursor = account_names = modest_account_mgr_account_names
934                 (modest_runtime_get_account_mgr(), TRUE); /* only enabled accounts */
935
936         while (cursor) {
937                 TnyAccount *acc;
938                 gchar *tmp, *accname = (gchar*)cursor->data;
939
940                 tmp = g_strdup_printf ("%s[%s]\n", str, accname);
941                 g_free (str);
942                 str = tmp;
943                 
944                 /* store */
945                 acc = modest_tny_account_store_get_server_account (
946                         modest_runtime_get_account_store(), accname,
947                         TNY_ACCOUNT_TYPE_STORE);
948                 if (TNY_IS_ACCOUNT(acc)) {
949                         gchar *tmp, *url = tny_account_get_url_string (acc);
950                         tmp = g_strdup_printf ("%sstore    : '%s': %s\n",
951                                                str, tny_account_get_id (acc), url);
952                         g_free (str);
953                         str = tmp;
954                         g_free (url);
955                         g_object_unref (acc);
956                 }
957                 
958                 /* transport */
959                 acc = modest_tny_account_store_get_server_account (
960                         modest_runtime_get_account_store(), accname,
961                         TNY_ACCOUNT_TYPE_TRANSPORT);
962                 if (TNY_IS_ACCOUNT(acc)) {
963                         gchar *tmp, *url = tny_account_get_url_string (acc);
964                         tmp = g_strdup_printf ("%stransport: '%s': %s\n",
965                                                str, tny_account_get_id (acc), url);
966                         g_free (str);
967                         str = tmp;
968                         g_free (url);
969                         g_object_unref (acc);
970                 }
971                 
972                 cursor = g_slist_next (cursor);
973         }
974         
975         modest_account_mgr_free_account_names (account_names);
976                                                          
977         g_printerr (str);
978         
979         reply = dbus_message_new_method_return (message);
980         if (reply) {
981                 dbus_message_append_args (reply,
982                                           DBUS_TYPE_STRING, &str,
983                                           DBUS_TYPE_INVALID);
984                 dbus_connection_send (con, reply, &serial);
985                 dbus_connection_flush (con);
986                 dbus_message_unref (reply);
987         }
988         
989         g_free (str);
990         return OSSO_OK;
991 }
992
993 static void
994 on_send_receive_performer(gboolean canceled, 
995                           GError *err,
996                           GtkWindow *parent_window,
997                           TnyAccount *account,
998                           gpointer user_data)
999 {
1000         ModestConnectedVia connect_when;
1001
1002         if (err || canceled) {
1003                 g_idle_add (notify_error_in_dbus_callback, NULL);
1004                 return;
1005         }
1006
1007         connect_when = modest_conf_get_int (modest_runtime_get_conf (), 
1008                                             MODEST_CONF_UPDATE_WHEN_CONNECTED_BY, NULL);
1009         
1010         /* Perform a send and receive if the user selected to connect
1011            via any mean or if the current connection method is the
1012            same as the one specified by the user */
1013         if (connect_when == MODEST_CONNECTED_VIA_ANY ||
1014             connect_when == modest_platform_get_current_connection ()) {
1015                 g_idle_add (on_idle_send_receive, NULL);
1016         } else {
1017                 /* We need this to allow modest to finish */
1018                 g_idle_add (notify_error_in_dbus_callback, NULL);
1019         }
1020 }
1021
1022
1023 static gint 
1024 on_send_receive(GArray *arguments, gpointer data, osso_rpc_t * retval)
1025 {       
1026         TnyDevice *device = modest_runtime_get_device ();
1027
1028         if (!tny_device_is_online (device))
1029                 modest_platform_connect_and_perform (NULL, FALSE, NULL, on_send_receive_performer, NULL);
1030         else
1031                 on_send_receive_performer (FALSE, NULL, NULL, NULL, NULL);
1032         
1033         return OSSO_OK;
1034 }
1035
1036 static gboolean
1037 on_idle_open_default_inbox(gpointer user_data)
1038 {
1039         ModestWindow *main_win;
1040         GtkWidget *folder_view;
1041         
1042         if (!check_and_offer_account_creation ()) /* this has it's only lock already */
1043                 return FALSE;
1044
1045         /* This is a GDK lock because we are an idle callback and
1046          * the code below is or does Gtk+ code */
1047         gdk_threads_enter (); /* CHECKED */
1048
1049         main_win = modest_window_mgr_get_main_window (modest_runtime_get_window_mgr (),
1050                                                       TRUE); /* create if non-existent */
1051         if (!main_win) {
1052                 g_warning ("%s: BUG: no main window", __FUNCTION__);
1053                 gdk_threads_leave (); /* CHECKED */
1054                 return FALSE; /* don't call me again */
1055         }
1056                 
1057         /* Get the folder view */
1058         folder_view = modest_main_window_get_child_widget (MODEST_MAIN_WINDOW (main_win),
1059                                                            MODEST_MAIN_WINDOW_WIDGET_TYPE_FOLDER_VIEW);
1060         modest_folder_view_select_first_inbox_or_local (MODEST_FOLDER_VIEW (folder_view));
1061         
1062         gdk_threads_leave (); /* CHECKED */
1063         
1064         /* This D-Bus method is obviously meant to result in the UI being visible,
1065          * so show it, by calling this idle handler directly: */
1066         on_idle_top_application(user_data);
1067         
1068         return FALSE; /* Do not call this callback again. */
1069 }
1070
1071 static gint 
1072 on_open_default_inbox(GArray * arguments, gpointer data, osso_rpc_t * retval)
1073 {
1074         /* Use g_idle to context-switch into the application's thread: */
1075         g_idle_add(on_idle_open_default_inbox, NULL);
1076         
1077         return OSSO_OK;
1078 }
1079
1080
1081 static gboolean 
1082 on_idle_top_application (gpointer user_data)
1083 {
1084         ModestWindow *main_win;
1085         
1086         /* This is a GDK lock because we are an idle callback and
1087          * the code below is or does Gtk+ code */
1088
1089         gdk_threads_enter (); /* CHECKED */
1090         
1091         main_win = modest_window_mgr_get_main_window (modest_runtime_get_window_mgr (),
1092                                                       TRUE); /* create if non-existent */
1093         if (main_win) {
1094                 /* Ideally, we would just use gtk_widget_show(), 
1095                  * but this widget is not coded correctly to support that: */
1096                 gtk_widget_show_all (GTK_WIDGET (main_win));
1097                 gtk_window_present (GTK_WINDOW (main_win));
1098         } else
1099                 g_warning ("%s: BUG: no main window", __FUNCTION__);
1100
1101         gdk_threads_leave (); /* CHECKED */
1102         
1103         return FALSE; /* Do not call this callback again. */
1104 }
1105
1106 static gint 
1107 on_top_application(GArray * arguments, gpointer data, osso_rpc_t * retval)
1108 {
1109         /* Use g_idle to context-switch into the application's thread: */
1110         g_idle_add(on_idle_top_application, NULL);
1111         
1112         return OSSO_OK;
1113 }
1114                       
1115 /* Callback for normal D-BUS messages */
1116 gint 
1117 modest_dbus_req_handler(const gchar * interface, const gchar * method,
1118                         GArray * arguments, gpointer data,
1119                         osso_rpc_t * retval)
1120 {
1121         if (g_ascii_strcasecmp (method, MODEST_DBUS_METHOD_MAIL_TO) == 0) {
1122                 if (arguments->len != MODEST_DBUS_MAIL_TO_ARGS_COUNT)
1123                         goto param_error;
1124                 return on_mail_to (arguments, data, retval);            
1125         } else if (g_ascii_strcasecmp (method, MODEST_DBUS_METHOD_OPEN_MESSAGE) == 0) {
1126                 if (arguments->len != MODEST_DBUS_OPEN_MESSAGE_ARGS_COUNT)
1127                         goto param_error;
1128                 return on_open_message (arguments, data, retval);
1129         } else if (g_ascii_strcasecmp (method, MODEST_DBUS_METHOD_SEND_RECEIVE) == 0) {
1130                 if (arguments->len != 0)
1131                         goto param_error;
1132                 return on_send_receive (arguments, data, retval);
1133         } else if (g_ascii_strcasecmp (method, MODEST_DBUS_METHOD_COMPOSE_MAIL) == 0) {
1134                 if (arguments->len != MODEST_DBUS_COMPOSE_MAIL_ARGS_COUNT)
1135                         goto param_error;
1136                 return on_compose_mail (arguments, data, retval);
1137         } else if (g_ascii_strcasecmp (method, MODEST_DBUS_METHOD_DELETE_MESSAGE) == 0) {
1138                 if (arguments->len != MODEST_DBUS_DELETE_MESSAGE_ARGS_COUNT)
1139                         goto param_error;
1140                 return on_delete_message (arguments,data, retval);
1141         } else if (g_ascii_strcasecmp (method, MODEST_DBUS_METHOD_OPEN_DEFAULT_INBOX) == 0) {
1142                 if (arguments->len != 0)
1143                         goto param_error;
1144                 return on_open_default_inbox (arguments, data, retval);
1145         } else if (g_ascii_strcasecmp (method, MODEST_DBUS_METHOD_TOP_APPLICATION) == 0) {
1146                 if (arguments->len != 0)
1147                         goto param_error;
1148                 return on_top_application (arguments, data, retval); 
1149         } else { 
1150                 /* We need to return INVALID here so
1151                  * libosso will return DBUS_HANDLER_RESULT_NOT_YET_HANDLED,
1152                  * so that our modest_dbus_req_filter will then be tried instead.
1153                  * */
1154                 return OSSO_INVALID;
1155         }
1156  param_error:
1157         /* Notify error in D-Bus method */
1158         g_idle_add (notify_error_in_dbus_callback, NULL);
1159         return OSSO_ERROR;
1160 }
1161                                          
1162 /* A complex D-Bus type (like a struct),
1163  * used to return various information about a search hit.
1164  */
1165 #define SEARCH_HIT_DBUS_TYPE \
1166         DBUS_STRUCT_BEGIN_CHAR_AS_STRING \
1167         DBUS_TYPE_STRING_AS_STRING /* msgid */ \
1168         DBUS_TYPE_STRING_AS_STRING /* subject */ \
1169         DBUS_TYPE_STRING_AS_STRING /* folder */ \
1170         DBUS_TYPE_STRING_AS_STRING /* sender */ \
1171         DBUS_TYPE_UINT64_AS_STRING /* msize */ \
1172         DBUS_TYPE_BOOLEAN_AS_STRING /* has_attachment */ \
1173         DBUS_TYPE_BOOLEAN_AS_STRING /* is_unread */ \
1174         DBUS_TYPE_INT64_AS_STRING /* timestamp */ \
1175         DBUS_STRUCT_END_CHAR_AS_STRING
1176
1177 static DBusMessage *
1178 search_result_to_message (DBusMessage *reply,
1179                            GList       *hits)
1180 {
1181         DBusMessageIter iter;
1182         DBusMessageIter array_iter;
1183         GList          *hit_iter;
1184
1185         dbus_message_iter_init_append (reply, &iter); 
1186         dbus_message_iter_open_container (&iter,
1187                                           DBUS_TYPE_ARRAY,
1188                                           SEARCH_HIT_DBUS_TYPE,
1189                                           &array_iter); 
1190
1191         for (hit_iter = hits; hit_iter; hit_iter = hit_iter->next) {
1192                 DBusMessageIter  struct_iter;
1193                 ModestSearchResultHit *hit;
1194                 char            *msg_url;
1195                 const char      *subject;
1196                 const char      *folder;
1197                 const char      *sender;
1198                 guint64          size;
1199                 gboolean         has_attachment;
1200                 gboolean         is_unread;
1201                 gint64           ts;
1202
1203                 hit = (ModestSearchResultHit *) hit_iter->data;
1204
1205                 msg_url = hit->msgid;
1206                 subject = hit->subject;
1207                 folder  = hit->folder;
1208                 sender  = hit->sender;
1209                 size           = hit->msize;
1210                 has_attachment = hit->has_attachment;
1211                 is_unread      = hit->is_unread;
1212                 ts             = hit->timestamp;
1213
1214                 g_debug ("DEBUG: %s: Adding hit: %s", __FUNCTION__, msg_url);   
1215                 
1216                 dbus_message_iter_open_container (&array_iter,
1217                                                   DBUS_TYPE_STRUCT,
1218                                                   NULL,
1219                                                   &struct_iter);
1220
1221                 dbus_message_iter_append_basic (&struct_iter,
1222                                                 DBUS_TYPE_STRING,
1223                                                 &msg_url);
1224
1225                 dbus_message_iter_append_basic (&struct_iter,
1226                                                 DBUS_TYPE_STRING,
1227                                                 &subject); 
1228
1229                 dbus_message_iter_append_basic (&struct_iter,
1230                                                 DBUS_TYPE_STRING,
1231                                                 &folder);
1232
1233                 dbus_message_iter_append_basic (&struct_iter,
1234                                                 DBUS_TYPE_STRING,
1235                                                 &sender);
1236
1237                 dbus_message_iter_append_basic (&struct_iter,
1238                                                 DBUS_TYPE_UINT64,
1239                                                 &size);
1240
1241                 dbus_message_iter_append_basic (&struct_iter,
1242                                                 DBUS_TYPE_BOOLEAN,
1243                                                 &has_attachment);
1244
1245                 dbus_message_iter_append_basic (&struct_iter,
1246                                                 DBUS_TYPE_BOOLEAN,
1247                                                 &is_unread);
1248                 
1249                 dbus_message_iter_append_basic (&struct_iter,
1250                                                 DBUS_TYPE_INT64,
1251                                                 &ts);
1252
1253                 dbus_message_iter_close_container (&array_iter,
1254                                                    &struct_iter); 
1255
1256                 g_free (hit->msgid);
1257                 g_free (hit->subject);
1258                 g_free (hit->folder);
1259                 g_free (hit->sender);
1260
1261                 g_slice_free (ModestSearchResultHit, hit);
1262         }
1263
1264         dbus_message_iter_close_container (&iter, &array_iter);
1265
1266         return reply;
1267 }
1268
1269 typedef struct
1270 {
1271         DBusConnection *con;
1272         DBusMessage *message;
1273         ModestSearch *search;
1274 } SearchHelper;
1275
1276 static void
1277 search_all_cb (GList *hits, gpointer user_data)
1278 {
1279         DBusMessage  *reply;
1280         SearchHelper *helper = (SearchHelper *) user_data;
1281
1282         reply = dbus_message_new_method_return (helper->message);
1283
1284         if (reply) {
1285                 dbus_uint32_t serial = 0;
1286                 
1287                 search_result_to_message (reply, hits);
1288
1289                 dbus_connection_send (helper->con, reply, &serial);
1290                 dbus_connection_flush (helper->con);
1291                 dbus_message_unref (reply);
1292         }
1293
1294         /* Free the helper */
1295         dbus_message_unref (helper->message);
1296         modest_search_free (helper->search);
1297         g_slice_free (ModestSearch, helper->search);
1298         g_slice_free (SearchHelper, helper);
1299 }
1300
1301 static void
1302 on_dbus_method_search (DBusConnection *con, DBusMessage *message)
1303 {
1304         ModestDBusSearchFlags dbus_flags;
1305         dbus_bool_t  res;
1306         dbus_int64_t sd_v;
1307         dbus_int64_t ed_v;
1308         dbus_int32_t flags_v;
1309         dbus_uint32_t size_v;
1310         const char *folder;
1311         const char *query;
1312         time_t start_date;
1313         time_t end_date;
1314         ModestSearch *search;
1315         DBusError error;
1316
1317         dbus_error_init (&error);
1318
1319         sd_v = ed_v = 0;
1320         flags_v = 0;
1321
1322         res = dbus_message_get_args (message,
1323                                      &error,
1324                                      DBUS_TYPE_STRING, &query,
1325                                      DBUS_TYPE_STRING, &folder, /* e.g. "INBOX/drafts": TODO: Use both an ID and a display name. */
1326                                      DBUS_TYPE_INT64, &sd_v,
1327                                      DBUS_TYPE_INT64, &ed_v,
1328                                      DBUS_TYPE_INT32, &flags_v,
1329                                      DBUS_TYPE_UINT32, &size_v,
1330                                      DBUS_TYPE_INVALID);
1331
1332         dbus_flags = (ModestDBusSearchFlags) flags_v;
1333         start_date = (time_t) sd_v;
1334         end_date = (time_t) ed_v;
1335
1336         search = g_slice_new0 (ModestSearch);
1337         
1338         if (folder && g_str_has_prefix (folder, "MAND:")) {
1339                 search->folder = g_strdup (folder + strlen ("MAND:"));
1340         } else if (folder && g_str_has_prefix (folder, "USER:")) {
1341                 search->folder = g_strdup (folder + strlen ("USER:"));
1342         } else if (folder && g_str_has_prefix (folder, "MY:")) {
1343                 search->folder = g_strdup (folder + strlen ("MY:"));
1344         } else {
1345                 search->folder = g_strdup (folder);
1346         }
1347
1348    /* Remember the text to search for: */
1349 #ifdef MODEST_HAVE_OGS
1350         search->query  = g_strdup (query);
1351 #endif
1352
1353         /* Other criteria: */
1354         search->start_date = start_date;
1355         search->end_date  = end_date;
1356         search->flags = 0;
1357
1358         /* Text to serach for in various parts of the message: */
1359         if (dbus_flags & MODEST_DBUS_SEARCH_SUBJECT) {
1360                 search->flags |= MODEST_SEARCH_SUBJECT;
1361                 search->subject = g_strdup (query);
1362         }
1363
1364         if (dbus_flags & MODEST_DBUS_SEARCH_SENDER) {
1365                 search->flags |=  MODEST_SEARCH_SENDER;
1366                 search->from = g_strdup (query);
1367         }
1368
1369         if (dbus_flags & MODEST_DBUS_SEARCH_RECIPIENT) {
1370                 search->flags |= MODEST_SEARCH_RECIPIENT; 
1371                 search->recipient = g_strdup (query);
1372         }
1373
1374         if (dbus_flags & MODEST_DBUS_SEARCH_BODY) {
1375                 search->flags |=  MODEST_SEARCH_BODY; 
1376                 search->body = g_strdup (query);
1377         }
1378
1379         if (sd_v > 0) {
1380                 search->flags |= MODEST_SEARCH_BEFORE;
1381                 search->start_date = start_date;
1382         }
1383
1384         if (ed_v > 0) {
1385                 search->flags |= MODEST_SEARCH_AFTER;
1386                 search->end_date = end_date;
1387         }
1388
1389         if (size_v > 0) {
1390                 search->flags |= MODEST_SEARCH_SIZE;
1391                 search->minsize = size_v;
1392         }
1393
1394 #ifdef MODEST_HAVE_OGS
1395         search->flags |= MODEST_SEARCH_USE_OGS;
1396         g_debug ("%s: Starting search for %s", __FUNCTION__, search->query);
1397 #endif
1398
1399         SearchHelper *helper = g_slice_new (SearchHelper);
1400         helper->search = search;
1401         dbus_message_ref (message);
1402         helper->message = message;
1403         helper->con = con;
1404
1405         /* Search asynchronously */
1406         modest_search_all_accounts (search, search_all_cb, helper);
1407 }
1408
1409
1410 /* A complex D-Bus type (like a struct),
1411  * used to return various information about a folder.
1412  */
1413 #define GET_FOLDERS_RESULT_DBUS_TYPE \
1414         DBUS_STRUCT_BEGIN_CHAR_AS_STRING \
1415         DBUS_TYPE_STRING_AS_STRING /* Folder Name */ \
1416         DBUS_TYPE_STRING_AS_STRING /* Folder URI */ \
1417         DBUS_STRUCT_END_CHAR_AS_STRING
1418
1419 static DBusMessage *
1420 get_folders_result_to_message (DBusMessage *reply,
1421                            GList *folder_ids)
1422 {
1423         DBusMessageIter iter;   
1424         dbus_message_iter_init_append (reply, &iter); 
1425         
1426         DBusMessageIter array_iter;
1427         dbus_message_iter_open_container (&iter,
1428                                           DBUS_TYPE_ARRAY,
1429                                           GET_FOLDERS_RESULT_DBUS_TYPE,
1430                                           &array_iter); 
1431
1432         GList *list_iter = folder_ids;
1433         for (list_iter = folder_ids; list_iter; list_iter = list_iter->next) {
1434                 
1435                 const gchar *folder_name = (const gchar*)list_iter->data;
1436                 if (folder_name) {
1437                         /* g_debug ("DEBUG: %s: Adding folder: %s", __FUNCTION__, folder_name); */
1438                         
1439                         DBusMessageIter struct_iter;
1440                         dbus_message_iter_open_container (&array_iter,
1441                                                           DBUS_TYPE_STRUCT,
1442                                                           NULL,
1443                                                           &struct_iter);
1444         
1445                         /* name: */
1446                         dbus_message_iter_append_basic (&struct_iter,
1447                                                         DBUS_TYPE_STRING,
1448                                                         &folder_name); /* The string will be copied. */
1449                                                         
1450                         /* URI: This is maybe not needed by osso-global-search: */
1451                         const gchar *folder_uri = "TODO:unimplemented";
1452                         dbus_message_iter_append_basic (&struct_iter,
1453                                                         DBUS_TYPE_STRING,
1454                                                         &folder_uri); /* The string will be copied. */
1455         
1456                         dbus_message_iter_close_container (&array_iter,
1457                                                            &struct_iter); 
1458                 }
1459         }
1460
1461         dbus_message_iter_close_container (&iter, &array_iter);
1462
1463         return reply;
1464 }
1465
1466 static void
1467 add_single_folder_to_list (TnyFolder *folder, GList** list)
1468 {
1469         if (!folder)
1470                 return;
1471                 
1472         if (TNY_IS_MERGE_FOLDER (folder)) {
1473                 const gchar * folder_name;
1474                 /* Ignore these because their IDs ares
1475                  * a) not always unique or sensible.
1476                  * b) not human-readable, and currently need a human-readable 
1477                  *    ID here, because the osso-email-interface API does not allow 
1478                  *    us to return both an ID and a display name.
1479                  * 
1480                  * This is actually the merged outbox folder.
1481                  * We could hack our D-Bus API to understand "outbox" as the merged outboxes, 
1482                  * but that seems unwise. murrayc.
1483                  */
1484                 folder_name = tny_folder_get_name (folder);
1485                 if (folder_name && !strcmp (folder_name, "Outbox")) {
1486                         *list = g_list_append(*list, g_strdup ("MAND:outbox"));
1487                 }
1488                 return; 
1489         }
1490                 
1491         /* Add this folder to the list: */
1492         /*
1493         const gchar * folder_name = tny_folder_get_name (folder);
1494         if (folder_name)
1495                 *list = g_list_append(*list, g_strdup (folder_name));
1496         else {
1497         */
1498                 /* osso-global-search only uses one string,
1499                  * so ID is the only thing that could possibly identify a folder.
1500                  * TODO: osso-global search should probably be changed to 
1501                  * take an ID and a Name.
1502                  */
1503         const gchar * id =  tny_folder_get_id (folder);
1504         if (id && strlen(id)) {
1505                 const gchar *prefix = NULL;
1506                 TnyFolderType folder_type;
1507                         
1508                 /* dbus global search api expects a prefix identifying the type of
1509                  * folder here. Mandatory folders should have MAND: prefix, and
1510                  * other user created folders should have USER: prefix
1511                  */
1512                 folder_type = modest_tny_folder_guess_folder_type (folder);
1513                 switch (folder_type) {
1514                 case TNY_FOLDER_TYPE_INBOX:
1515                         prefix = "MY:";
1516                         break;
1517                 case TNY_FOLDER_TYPE_OUTBOX:
1518                 case TNY_FOLDER_TYPE_DRAFTS:
1519                 case TNY_FOLDER_TYPE_SENT:
1520                 case TNY_FOLDER_TYPE_ARCHIVE:
1521                         prefix = "MAND:";
1522                         break;
1523                 case TNY_FOLDER_TYPE_INVALID:
1524                         g_warning ("%s: BUG: TNY_FOLDER_TYPE_INVALID", __FUNCTION__);
1525                         return; /* don't add it */
1526                 default:
1527                         prefix = "USER:";
1528                         
1529                 }
1530                 
1531
1532                 *list = g_list_append(*list, g_strdup_printf ("%s%s", prefix, id));
1533         }
1534 }
1535
1536 static void
1537 add_folders_to_list (TnyFolderStore *folder_store, GList** list)
1538 {
1539         if (!folder_store)
1540                 return;
1541         
1542         /* Add this folder to the list: */
1543         if (TNY_IS_FOLDER (folder_store)) {
1544                 add_single_folder_to_list (TNY_FOLDER (folder_store), list);
1545         }       
1546                 
1547         /* Recurse into child folders: */
1548                 
1549         /* Get the folders list: */
1550         /*
1551         TnyFolderStoreQuery *query = tny_folder_store_query_new ();
1552         tny_folder_store_query_add_item (query, NULL, 
1553                 TNY_FOLDER_STORE_QUERY_OPTION_SUBSCRIBED);
1554         */
1555         TnyList *all_folders = tny_simple_list_new ();
1556         tny_folder_store_get_folders (folder_store,
1557                                       all_folders,
1558                                       NULL /* query */,
1559                                       NULL /* error */);
1560
1561         TnyIterator *iter = tny_list_create_iterator (all_folders);
1562         while (!tny_iterator_is_done (iter)) {
1563                 
1564                 /* Do not recurse, because the osso-global-search UI specification 
1565                  * does not seem to want the sub-folders, though that spec seems to 
1566                  * be generally unsuitable for Modest.
1567                  */
1568                 TnyFolder *folder = TNY_FOLDER (tny_iterator_get_current (iter));
1569                 if (folder) {
1570                         add_single_folder_to_list (TNY_FOLDER (folder), list);
1571                          
1572                         #if 0
1573                         if (TNY_IS_FOLDER_STORE (folder))
1574                                 add_folders_to_list (TNY_FOLDER_STORE (folder), list);
1575                         else {
1576                                 add_single_folder_to_list (TNY_FOLDER (folder), list);
1577                         }
1578                         #endif
1579                         
1580                         /* tny_iterator_get_current() gave us a reference. */
1581                         g_object_unref (folder);
1582                 }
1583                 
1584                 tny_iterator_next (iter);
1585         }
1586         g_object_unref (G_OBJECT (iter));
1587 }
1588
1589
1590 /* return >1 for a special folder, 0 for a user-folder */
1591 static gint
1592 get_rank (const gchar *folder)
1593 {
1594         if (strcmp (folder, "INBOX") == 0)
1595                 return 1;
1596         if (strcmp (folder, modest_local_folder_info_get_type_name(TNY_FOLDER_TYPE_SENT)) == 0)
1597                 return 2;
1598         if (strcmp (folder, modest_local_folder_info_get_type_name(TNY_FOLDER_TYPE_DRAFTS)) == 0)
1599                 return 3;
1600         if (strcmp (folder, modest_local_folder_info_get_type_name(TNY_FOLDER_TYPE_OUTBOX)) == 0)
1601                 return 4;
1602         return 0;
1603 }
1604
1605 static gint
1606 folder_name_compare_func (const gchar* folder1, const gchar* folder2)
1607 {
1608         gint r1 = get_rank (folder1);
1609         gint r2 = get_rank (folder2);
1610
1611         if (r1 > 0 && r2 > 0)
1612                 return r1 - r2;
1613         if (r1 > 0 && r2 == 0)
1614                 return -1;
1615         if (r1 == 0 && r2 > 0)
1616                 return 1;
1617         else
1618                 return  modest_text_utils_utf8_strcmp (folder1, folder2, TRUE);
1619 }
1620
1621 /* FIXME: */
1622 /*   - we're still missing the outbox */
1623 /*   - we need to take care of localization (urgh) */
1624 /*   - what about 'All mail folders'? */
1625 static void
1626 on_dbus_method_get_folders (DBusConnection *con, DBusMessage *message)
1627 {
1628         DBusMessage  *reply = NULL;
1629         ModestAccountMgr *account_mgr = NULL;
1630         gchar *account_name = NULL;
1631         GList *folder_names = NULL;     
1632         TnyAccount *account_local = NULL;
1633         TnyAccount *account_mmc = NULL;
1634         
1635         /* Get the TnyStoreAccount so we can get the folders: */
1636         account_mgr = modest_runtime_get_account_mgr();
1637         account_name = modest_account_mgr_get_default_account (account_mgr);
1638         if (!account_name) {
1639                 g_printerr ("modest: no account found\n");
1640         }
1641         
1642         if (account_name) {
1643                 TnyAccount *account = NULL;
1644                 if (account_mgr) {
1645                         account = modest_tny_account_store_get_server_account (
1646                                 modest_runtime_get_account_store(), account_name, 
1647                                 TNY_ACCOUNT_TYPE_STORE);
1648                 }
1649                 
1650                 if (!account) {
1651                         g_printerr ("modest: failed to get tny account folder'%s'\n", account_name);
1652                 } 
1653                 
1654                 printf("DEBUG: %s: Getting folders for account name=%s\n", __FUNCTION__, account_name);
1655                 g_free (account_name);
1656                 account_name = NULL;
1657                 
1658                 add_folders_to_list (TNY_FOLDER_STORE (account), &folder_names);
1659         
1660                 g_object_unref (account);
1661                 account = NULL;
1662         }
1663         
1664         /* Also add the folders from the local folders account,
1665          * because they are (currently) used with all accounts:
1666          * TODO: This is not working. It seems to get only the Merged Folder (with an ID of "" (not NULL)).
1667          */
1668         account_local = 
1669                 modest_tny_account_store_get_local_folders_account (modest_runtime_get_account_store());
1670         add_folders_to_list (TNY_FOLDER_STORE (account_local), &folder_names);
1671
1672         g_object_unref (account_local);
1673         account_local = NULL;
1674
1675         /* Obtain the mmc account */
1676         account_mmc = 
1677                 modest_tny_account_store_get_mmc_folders_account (modest_runtime_get_account_store());
1678         if (account_mmc) {
1679                 add_folders_to_list (TNY_FOLDER_STORE (account_mmc), &folder_names);
1680                 g_object_unref (account_mmc);
1681                 account_mmc = NULL;
1682         }
1683
1684         /* specs require us to sort the folder names, although
1685          * this is really not the place to do that...
1686          */
1687         folder_names = g_list_sort (folder_names,
1688                                     (GCompareFunc)folder_name_compare_func);
1689
1690         /* Put the result in a DBus reply: */
1691         reply = dbus_message_new_method_return (message);
1692
1693         get_folders_result_to_message (reply, folder_names);
1694
1695         if (reply == NULL) {
1696                 g_warning ("%s: Could not create reply.", __FUNCTION__);
1697         }
1698
1699         if (reply) {
1700                 dbus_uint32_t serial = 0;
1701                 dbus_connection_send (con, reply, &serial);
1702         dbus_connection_flush (con);
1703         dbus_message_unref (reply);
1704         }
1705
1706         g_list_foreach (folder_names, (GFunc)g_free, NULL);
1707         g_list_free (folder_names);
1708 }
1709
1710
1711 /** This D-Bus handler is used when the main osso-rpc 
1712  * D-Bus handler has not handled something.
1713  * We use this for D-Bus methods that need to use more complex types 
1714  * than osso-rpc supports.
1715  */
1716 DBusHandlerResult
1717 modest_dbus_req_filter (DBusConnection *con,
1718                         DBusMessage    *message,
1719                         void           *user_data)
1720 {
1721         gboolean handled = FALSE;
1722
1723         if (dbus_message_is_method_call (message,
1724                                          MODEST_DBUS_IFACE,
1725                                          MODEST_DBUS_METHOD_SEARCH)) {
1726                 on_dbus_method_search (con, message);
1727                 handled = TRUE;                         
1728         } else if (dbus_message_is_method_call (message,
1729                                                 MODEST_DBUS_IFACE,
1730                                                 MODEST_DBUS_METHOD_GET_FOLDERS)) {
1731                 on_dbus_method_get_folders (con, message);
1732                 handled = TRUE;                         
1733         } else if (dbus_message_is_method_call (message,
1734                                                 MODEST_DBUS_IFACE,
1735                                                 MODEST_DBUS_METHOD_DUMP_OPERATION_QUEUE)) {
1736                 on_dbus_method_dump_operation_queue (con, message);
1737                 handled = TRUE;
1738         } else if (dbus_message_is_method_call (message,
1739                                                 MODEST_DBUS_IFACE,
1740                                                 MODEST_DBUS_METHOD_DUMP_ACCOUNTS)) {
1741                 on_dbus_method_dump_accounts (con, message);
1742                 handled = TRUE;
1743         } else if (dbus_message_is_method_call (message,
1744                                                 MODEST_DBUS_IFACE,
1745                                                 MODEST_DBUS_METHOD_DUMP_SEND_QUEUES)) {
1746                 on_dbus_method_dump_send_queues (con, message);
1747                 handled = TRUE;
1748         } else {
1749                 /* Note that this mentions methods that were already handled in modest_dbus_req_handler(). */
1750                 /* 
1751                 g_debug ("  debug: %s: Unexpected (maybe already handled) D-Bus method:\n   Interface=%s, Member=%s\n", 
1752                         __FUNCTION__, dbus_message_get_interface (message),
1753                         dbus_message_get_member(message));
1754                 */
1755         }
1756         
1757         return (handled ? 
1758                 DBUS_HANDLER_RESULT_HANDLED :
1759                 DBUS_HANDLER_RESULT_NOT_YET_HANDLED);
1760 }
1761
1762 static gboolean
1763 notify_error_in_dbus_callback (gpointer user_data)
1764 {
1765         ModestMailOperation *mail_op;
1766         ModestMailOperationQueue *mail_op_queue;
1767
1768         mail_op = modest_mail_operation_new (NULL);
1769         mail_op_queue = modest_runtime_get_mail_operation_queue ();
1770
1771         /* Issues a noop operation in order to force the queue to emit
1772            the "queue-empty" signal to allow modest to quit */
1773         modest_mail_operation_queue_add (mail_op_queue, mail_op);
1774         modest_mail_operation_noop (mail_op);
1775         g_object_unref (mail_op);
1776
1777         return FALSE;
1778 }
1779
1780 static gboolean
1781 notify_msg_not_found_in_idle (gpointer user_data)
1782 {
1783         modest_platform_run_information_dialog (NULL, _("mail_ni_ui_folder_get_msg_folder_error"));
1784
1785         return FALSE;
1786 }