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