2007-06-26 Murray Cumming <murrayc@murrayc.com>
[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-ui-actions.h"
36
37 #include "modest-search.h"
38 #include "widgets/modest-msg-edit-window.h"
39 #include "modest-tny-msg.h"
40 #include <libmodest-dbus-client/libmodest-dbus-client.h>
41 #include <libgnomevfs/gnome-vfs-utils.h>
42 #include <stdio.h>
43 #include <string.h>
44 #include <glib/gstdio.h>
45 #ifdef MODEST_HAVE_HILDON0_WIDGETS
46 #include <libgnomevfs/gnome-vfs-mime-utils.h>
47 #else
48 #include <libgnomevfs/gnome-vfs-mime.h>
49 #endif
50 #include <tny-fs-stream.h>
51
52 #include <tny-list.h>
53 #include <tny-iterator.h>
54 #include <tny-simple-list.h>
55
56 typedef struct 
57 {
58         gchar *to;
59         gchar *cc;
60         gchar *bcc;
61         gchar *subject;
62         gchar *body;
63         gchar *attachments;
64 } SendMailIdleData;
65
66 typedef struct 
67 {
68         gchar *to;
69         gchar *cc;
70         gchar *bcc;
71         gchar *subject;
72         gchar *body;
73         gchar *attachments;
74 } ComposeMailIdleData;
75
76 /** uri_unescape:
77  * @uri An escaped URI. URIs should always be escaped.
78  * @len The length of the @uri string, or -1 if the string is null terminated.
79  * 
80  * Decode a URI, or URI fragment, as per RFC 1738.
81  * http://www.ietf.org/rfc/rfc1738.txt
82  * 
83  * Return value: An unescaped string. This should be freed with g_free().
84  */
85 static gchar* uri_unescape(const gchar* uri, size_t len)
86 {
87         if (!uri)
88                 return NULL;
89                 
90         if (len == -1)
91                 len = strlen (uri);
92         
93         /* Allocate an extra string so we can be sure that it is null-terminated,
94          * so we can use gnome_vfs_unescape_string().
95          * This is not efficient. */
96         gchar * escaped_nullterminated = g_strndup (uri, len);
97         gchar *result = gnome_vfs_unescape_string (escaped_nullterminated, NULL);
98         g_free (escaped_nullterminated);
99         
100         return result;
101 }
102
103 /** uri_parse_mailto:
104  * @mailto A mailto URI, with the mailto: prefix.
105  * @list_items_and_values: A pointer to a list that should be filled with item namesand value strings, 
106  * with each name item being followed by a value item. This list should be freed with g_slist_free) after 
107  * all the string items have been freed. This parameter may be NULL.
108  * Parse a mailto URI as per RFC2368.
109  * http://www.ietf.org/rfc/rfc2368.txt
110  * 
111  * Return value: The to address, unescaped. This should be freed with g_free().
112  */
113 static gchar* uri_parse_mailto (const gchar* mailto, GSList** list_items_and_values)
114 {
115         const gchar* start_to = NULL;
116         /* Remove the mailto: prefix: 
117          * 7 is the length of "mailto:": */
118         if (strncmp (mailto, "mailto:", 7) == 0) {
119                 start_to = mailto + 7;
120         }
121         
122         if (!start_to)
123                 return NULL;
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         /* Get any other items: */
131         const size_t len_mailto = strlen (start_to);
132         const gchar* p = start_to + len_to + 1; /* parsed so far. */
133         const gchar* end = start_to + len_mailto;
134         /* GSList *items = NULL; */
135         const gchar* start_item_name = p;
136         size_t len_item_name = 0;
137         const gchar* start_item_value = NULL;
138         while (p < end) {
139                 
140                 /* Looking for the end of a name; */
141                 if (start_item_name) {
142                         const size_t len = strcspn (p, "="); /* Returns whole string if none found. */
143                         if (len) {
144                                 /* This marks the end of a name and the start of the value: */
145                                 len_item_name = len;
146                                 
147                                 /* Skip over the name and mark the start of the value: */
148                                 p += (len + 1); /* Skip over the = */
149                                 start_item_value = p;
150                         }
151                 }
152                 
153                 /* Looking for the end of a value: */
154                 if (start_item_value) {
155                         const size_t len = strcspn (p, "?"); /* Returns whole string if none found. */
156                         /* ? marks the start of a new item: */
157                         if (len) {
158                                 if (start_item_name && len_item_name) {
159                                         /* Finish the previously-started item: */
160                                         gchar *item_value = uri_unescape (start_item_value, len);
161                                         gchar *item_name = g_strndup (start_item_name, len_item_name);
162                                         /* printf ("debug: item name=%s, value=%s\n", item_name, item_value); */
163                                         
164                                         /* Append the items to the list */
165                                         if(list_items_and_values) {
166                                                 *list_items_and_values = g_slist_append (*list_items_and_values, item_name);
167                                                 *list_items_and_values = g_slist_append (*list_items_and_values, item_value);
168                                         }
169                                 }
170                                 
171                                 /* Skip over the value and mark the start of a possible new name/value pair: */
172                                 p += (len + 1); /* Skip over the ? */
173                                 start_item_name = p;
174                                 len_item_name = 0;
175                                 start_item_value = NULL;
176                         }
177                 }
178                 
179         }
180         
181         return result_to;
182 }
183
184
185 static gboolean
186 on_idle_mail_to(gpointer user_data)
187 {
188         gdk_threads_enter ();
189         
190         /* This is based on the implemenation of main.c:start_uil(): */
191         
192         gchar *uri = (gchar*)user_data;
193         GSList *list_names_and_values = NULL;
194         gchar *to = uri_parse_mailto (uri, &list_names_and_values);
195         
196         /* Get the TnyTransportAccount so we can instantiate a mail operation: */
197         ModestAccountMgr *account_mgr = modest_runtime_get_account_mgr();
198         gchar *account_name = modest_account_mgr_get_default_account (account_mgr);
199         if (!account_name) {
200                 g_printerr ("modest: no account found\n");
201         }
202         
203         TnyAccount *account = NULL;
204         if (account_mgr) {
205                 account = modest_tny_account_store_get_transport_account_for_open_connection (
206                         modest_runtime_get_account_store(), account_name);
207         }
208         
209         if (!account) {
210                 g_printerr ("modest: failed to get tny account folder'\n", account_name);
211         } else {
212                 gchar * from = modest_account_mgr_get_from_string (account_mgr,
213                                                                   account_name);
214                 if (!from) {
215                         g_printerr ("modest: no from address for account '%s'\n", account_name);
216                 } else {
217                         const gchar *cc = NULL;
218                         const gchar *bcc = NULL;
219                         const gchar *subject = NULL;
220                         const gchar *body = NULL;
221                         
222                         /* Get the relevant items from the list: */
223                         GSList *list = list_names_and_values;
224                         while (list) {
225                                 const gchar * name = (const gchar*)list->data;
226                                 GSList *list_value = g_slist_next (list);
227                                 const gchar * value = (const gchar*)list_value->data;
228                                 
229                                 if (strcmp (name, "cc") == 0) {
230                                         cc = value;
231                                 } else if (strcmp (name, "bcc") == 0) {
232                                         bcc = value;
233                                 } else if (strcmp (name, "subject") == 0) {
234                                         subject = value;
235                                 } else if (strcmp (name, "body") == 0) {
236                                         body = value;
237                                 }
238                                 
239                                 /* Go to the next pair: */
240                                 if (list_value) {
241                                         list = g_slist_next (list_value);
242                                 } else 
243                                         list = NULL;
244                         }
245                         
246                         /* Create the message: */
247                         TnyMsg *msg  = modest_tny_msg_new (to, from, 
248                                 cc, bcc, subject, body, 
249                                 NULL /* attachments */);
250                                 
251                         if (!msg) {
252                                 g_printerr ("modest: failed to create message\n");
253                         } else
254                         {
255                                 /* Add the message to a folder and show its UI for editing: */
256                                 TnyFolder *folder = modest_tny_account_get_special_folder (account,
257                                                                         TNY_FOLDER_TYPE_DRAFTS);
258                                 if (!folder) {
259                                         g_printerr ("modest: failed to find Drafts folder\n");
260                                 } else {
261                         
262                                         tny_folder_add_msg (folder, msg, NULL); /* TODO: check err */
263                 
264                                         ModestWindow *win = modest_msg_edit_window_new (msg, account_name);
265                                         gtk_widget_show_all (GTK_WIDGET (win));
266                                 
267                                         g_object_unref (G_OBJECT(folder));
268                                 }
269                         
270                                 g_object_unref (G_OBJECT(msg));
271                         }
272                         
273                         g_object_unref (G_OBJECT(account));
274                 }
275         }
276         
277         g_free (account_name);
278         
279         /* Free the list, as required by the uri_parse_mailto() documentation: */
280         if (list_names_and_values)
281                 g_slist_foreach (list_names_and_values, (GFunc)g_free, NULL);
282         g_slist_free (list_names_and_values);
283         
284         g_free(to);
285                 
286         g_free(uri);
287
288         gdk_threads_leave ();
289         
290         return FALSE; /* Do not call this callback again. */
291 }
292
293 static gint on_mail_to(GArray * arguments, gpointer data, osso_rpc_t * retval)
294 {
295         if (arguments->len != MODEST_DEBUS_MAIL_TO_ARGS_COUNT)
296         return OSSO_ERROR;
297         
298     /* Use g_idle to context-switch into the application's thread: */
299  
300     /* Get the arguments: */
301         osso_rpc_t val = g_array_index(arguments, osso_rpc_t, MODEST_DEBUS_MAIL_TO_ARG_URI);
302         gchar *uri = g_strdup (val.value.s);
303         
304         /* printf("  debug: to=%s\n", idle_data->to); */
305         g_idle_add(on_idle_mail_to, (gpointer)uri);
306         
307         /* Note that we cannot report failures during sending, 
308          * because that would be asynchronous. */
309         return OSSO_OK;
310 }
311
312
313
314
315
316 static gboolean
317 on_idle_compose_mail(gpointer user_data)
318 {
319         gdk_threads_enter ();
320         
321         ComposeMailIdleData *idle_data = (ComposeMailIdleData*)user_data;
322         gchar **list = NULL;
323         gint i = 0;
324
325         /* Get the TnyTransportAccount so we can instantiate a mail operation: */
326         ModestAccountMgr *account_mgr = modest_runtime_get_account_mgr();
327         gchar *account_name = modest_account_mgr_get_default_account (account_mgr);
328         if (!account_name) {
329                 g_printerr ("modest: no account found\n");
330         }
331         
332         TnyAccount *account = NULL;
333         if (account_mgr) {
334                 account = modest_tny_account_store_get_transport_account_for_open_connection (
335                         modest_runtime_get_account_store(), account_name);
336         }
337         
338         if (!account) {
339                 g_printerr ("modest: failed to get tny account folder'%s'\n", account_name);
340         } else {
341                 gchar * from = modest_account_mgr_get_from_string (account_mgr,
342                                                                   account_name);
343                 if (!from) {
344                         g_printerr ("modest: no from address for account '%s'\n", account_name);
345                 } else {
346         
347                         /* Create the message: */
348                         TnyMsg *msg  = modest_tny_msg_new (idle_data->to, from, 
349                                 idle_data->cc, idle_data->bcc, idle_data->subject, idle_data->body, 
350                                 NULL); /* NULL because m_t_m_n doesn't use it */
351                                 
352                         if (!msg) {
353                                 g_printerr ("modest: failed to create message\n");
354                         } else
355                         {
356                                 /* Add the message to a folder and show its UI for editing: */
357                                 TnyFolder *folder = modest_tny_account_get_special_folder (account,
358                                                                         TNY_FOLDER_TYPE_DRAFTS);
359                                 if (!folder) {
360                                         g_printerr ("modest: failed to find Drafts folder\n");
361                                 } else {
362                         
363                                         tny_folder_add_msg (folder, msg, NULL); /* TODO: check err */
364                 
365                                         ModestWindow *win = modest_msg_edit_window_new (msg, account_name);
366
367                                         list = g_strsplit(idle_data->attachments, ",", 0);
368                                         for (i=0; list[i] != NULL; i++) {
369                                                 modest_msg_edit_window_attach_file_noninteractive(
370                                                                 (ModestMsgEditWindow *)win, list[i]);
371                                         }
372                                         g_strfreev(list);
373                                         
374                                         gtk_widget_show_all (GTK_WIDGET (win));
375                                 
376                                         g_object_unref (G_OBJECT(folder));
377                                 }
378                         
379                                 g_object_unref (G_OBJECT(msg));
380                         }
381                         
382                         g_object_unref (G_OBJECT(account));
383                 }
384         }
385
386         /* Free the idle data: */
387         g_free (idle_data->to);
388         g_free (idle_data->cc);
389         g_free (idle_data->bcc);
390         g_free (idle_data->subject);
391         g_free (idle_data->body);
392         g_free (idle_data->attachments);
393         g_free (idle_data);
394         
395         g_free (account_name);
396         
397         gdk_threads_leave ();
398         
399         return FALSE; /* Do not call this callback again. */
400 }
401
402 static gint on_compose_mail(GArray * arguments, gpointer data, osso_rpc_t * retval)
403 {
404         if (arguments->len != MODEST_DEBUS_COMPOSE_MAIL_ARGS_COUNT)
405         return OSSO_ERROR;
406         
407         /* Use g_idle to context-switch into the application's thread: */
408         ComposeMailIdleData *idle_data = g_new0(ComposeMailIdleData, 1); /* Freed in the idle callback. */
409         
410         /* Get the arguments: */
411         osso_rpc_t val = g_array_index(arguments, osso_rpc_t, MODEST_DEBUS_COMPOSE_MAIL_ARG_TO);
412         idle_data->to = g_strdup (val.value.s);
413         
414         val = g_array_index(arguments, osso_rpc_t, MODEST_DEBUS_COMPOSE_MAIL_ARG_CC);
415         idle_data->cc = g_strdup (val.value.s);
416         
417         val = g_array_index(arguments, osso_rpc_t, MODEST_DEBUS_COMPOSE_MAIL_ARG_BCC);
418         idle_data->bcc = g_strdup (val.value.s);
419         
420         val = g_array_index(arguments, osso_rpc_t, MODEST_DEBUS_COMPOSE_MAIL_ARG_SUBJECT);
421         idle_data->subject = g_strdup (val.value.s);
422         
423         val = g_array_index(arguments, osso_rpc_t, MODEST_DEBUS_COMPOSE_MAIL_ARG_BODY);
424         idle_data->body = g_strdup (val.value.s);
425         
426         val = g_array_index(arguments, osso_rpc_t, MODEST_DEBUS_COMPOSE_MAIL_ARG_ATTACHMENTS);
427         idle_data->attachments = g_strdup (val.value.s);
428
429         g_idle_add(on_idle_compose_mail, (gpointer)idle_data);
430         
431         /* Note that we cannot report failures during sending, 
432          * because that would be asynchronous. */
433         return OSSO_OK;
434 }
435
436
437 static TnyMsg *
438 find_message_by_url (const char *uri, TnyAccount **ac_out)
439 {
440         ModestTnyAccountStore *astore;
441         TnyAccount            *account;
442         TnyFolder             *folder;
443         TnyMsg                *msg;
444         GError *err = NULL;
445         account = NULL;
446         msg = NULL;
447         folder = NULL;
448
449         astore = modest_runtime_get_account_store ();
450         
451         if (astore == NULL) {
452                 return NULL;
453         }
454
455         account = tny_account_store_find_account (TNY_ACCOUNT_STORE (astore),
456                                                   uri);
457         
458         if (account == NULL) {
459                 g_debug ("%s: tny_account_store_find_account() failed.\n", __FUNCTION__);
460                 return NULL;
461         }
462
463         g_debug ("%s: Found account.\n", __FUNCTION__);
464
465         if ( ! TNY_IS_STORE_ACCOUNT (account)) {
466                 goto out;
467         }
468
469         g_debug ("%s: Account is store account.\n", __FUNCTION__);
470
471         *ac_out = account;
472
473         folder = tny_store_account_find_folder (TNY_STORE_ACCOUNT (account),
474                                                 uri,
475                                                 &err);
476
477         if (folder == NULL) {
478                 g_debug ("%s: tny_store_account_find_folder() failed\naccount=%s, uri=%s.\n", __FUNCTION__, 
479                         tny_account_get_id (TNY_ACCOUNT(account)), uri);
480                 goto out;
481         }
482         g_debug ("%s: Found folder. (%s)\n",  __FUNCTION__, uri);
483         
484
485         msg = tny_folder_find_msg (folder, uri, &err);
486         
487         if (!msg) {
488                 g_debug ("%s: tny_folder_find_msg() failed for folder %s\n  with error=%s.\n",
489                          __FUNCTION__, tny_folder_get_id (folder), err->message);
490         }
491
492 out:
493         if (err)
494                 g_error_free (err);
495
496         if (account && !msg) {
497                 g_object_unref (account);
498                 *ac_out = NULL;
499         }
500
501         if (folder) {
502                 g_object_unref (folder);
503         }
504
505         return msg;
506 }
507
508 static gboolean
509 on_idle_open_message (gpointer user_data)
510 {
511         gdk_threads_enter ();
512         
513         ModestWindow *msg_view;
514         TnyMsg       *msg;
515         TnyAccount   *account;
516         TnyHeader    *header; 
517         const char   *msg_uid;
518         const char   *account_name;
519         char         *uri;
520        
521         uri = (char *) user_data;
522
523         g_debug ("%s: Trying to find msg by url: %s", __FUNCTION__, uri);       
524         msg = find_message_by_url (uri, &account);
525         g_free (uri);
526
527         if (msg == NULL) {
528                 g_debug ("  %s: message not found.", __FUNCTION__);
529                 gdk_threads_leave ();
530                 return FALSE;
531         }
532         g_debug ("  %s: Found message.", __FUNCTION__);
533
534         header = tny_msg_get_header (msg);
535         account_name = tny_account_get_name (account);
536         msg_uid = tny_header_get_uid (header);
537         
538         msg_view = modest_msg_view_window_new (msg,
539                                                account_name,
540                                                msg_uid);
541         /* TODO: does that leak the msg_view ?! */
542
543         gtk_widget_show_all (GTK_WIDGET (msg_view));
544
545         g_object_unref (header);
546         g_object_unref (account);
547         
548         gdk_threads_leave ();
549         
550         return FALSE; /* Do not call this callback again. */
551 }
552
553 static gint on_open_message(GArray * arguments, gpointer data, osso_rpc_t * retval)
554 {
555         if (arguments->len != MODEST_DEBUS_OPEN_MESSAGE_ARGS_COUNT)
556         return OSSO_ERROR;
557         
558     /* Use g_idle to context-switch into the application's thread: */
559
560     /* Get the arguments: */
561         osso_rpc_t val = g_array_index(arguments, osso_rpc_t, MODEST_DEBUS_OPEN_MESSAGE_ARG_URI);
562         gchar *uri = g_strdup (val.value.s);
563         
564         /* printf("  debug: to=%s\n", idle_data->to); */
565         g_idle_add(on_idle_open_message, (gpointer)uri);
566         
567         /* Note that we cannot report failures during sending, 
568          * because that would be asynchronous. */
569         return OSSO_OK;
570 }
571
572
573 static gint
574 on_delete_message (GArray *arguments, gpointer data, osso_rpc_t *retval)
575 {
576         TnyList      *headers;
577         TnyFolder    *folder;
578         TnyIterator  *iter; 
579         TnyHeader    *header;
580         TnyHeader    *msg_header;
581         TnyMsg       *msg;
582         TnyAccount   *account;
583         GError       *error;
584         osso_rpc_t    val;
585         const char   *uri;
586         const char   *uid;
587         gint          res;
588
589         if (arguments->len != MODEST_DEBUS_DELETE_MESSAGE_ARGS_COUNT) {
590                 return OSSO_ERROR;
591         }
592
593         val = g_array_index (arguments,
594                              osso_rpc_t,
595                              MODEST_DEBUS_DELETE_MESSAGE_ARG_URI);
596
597         uri = (const char *) val.value.s;
598
599         g_debug ("Searching message (delete message)");
600         
601         msg = find_message_by_url (uri, &account);
602
603         if (msg == NULL) {
604                 return OSSO_ERROR;
605         }
606
607         g_debug ("Found message");
608         
609         msg_header = tny_msg_get_header (msg);
610         uid = tny_header_get_uid (msg_header);
611         folder = tny_msg_get_folder (msg);
612
613
614         /* tny_msg_get_header () flaw:
615          * From tinythingy doc: You can't use the returned instance with the
616          * TnyFolder operations
617          *
618          * To get a header instance that will work with these folder methods,
619          * you can use tny_folder_get_headers.
620          *
621          * Ok, we will do so then. Sigh.
622          * */
623         headers = tny_simple_list_new ();
624
625         tny_folder_get_headers (folder, headers, TRUE, NULL);
626         iter = tny_list_create_iterator (headers);
627         header = NULL;
628
629         g_debug ("Searching header for msg in folder");
630         while (!tny_iterator_is_done (iter)) {
631                 const char *cur_id;
632
633                 header = TNY_HEADER (tny_iterator_get_current (iter));
634                 cur_id = tny_header_get_uid (header);
635                 
636                 if (cur_id && uid && g_str_equal (cur_id, uid)) {
637                         g_debug ("Found correspoding header from folder");
638                         break;
639                 }
640
641                 header = NULL;
642                 g_object_unref (header);
643                 tny_iterator_next (iter);
644         }
645
646         g_object_unref (iter);
647         g_object_unref (headers);
648         
649         g_object_unref (msg_header);
650         g_object_unref (msg);
651
652         if (header == NULL) {
653                 g_object_unref (folder);
654                 return OSSO_ERROR;
655         }
656
657
658         error = NULL;
659         res = OSSO_OK;
660         tny_folder_remove_msg (folder, header, &error);
661
662         if (error != NULL) {
663                 res = OSSO_ERROR;
664                 g_error_free (error);
665         }
666
667         g_object_unref (folder);
668         return res;
669 }
670
671 static gboolean
672 on_idle_send_receive(gpointer user_data)
673 {
674         gdk_threads_enter ();
675         ModestWindow *win;
676
677         /* Pick the main window if it exists */
678         win = modest_window_mgr_get_main_window (modest_runtime_get_window_mgr ());
679
680         /* Send & receive all if "Update automatically" is set */
681         /* TODO: check the auto-update parameter in the configuration */
682         modest_ui_actions_do_send_receive_all (win);
683         
684         gdk_threads_leave ();
685         
686         return FALSE; /* Do not call this callback again. */
687 }
688
689 static gint on_send_receive(GArray * arguments, gpointer data, osso_rpc_t * retval)
690 {       
691     /* Use g_idle to context-switch into the application's thread: */
692
693     /* This method has no arguments. */
694         
695         /* printf("  debug: to=%s\n", idle_data->to); */
696         g_idle_add(on_idle_send_receive, NULL);
697         
698         /* Note that we cannot report failures during send/receive, 
699          * because that would be asynchronous. */
700         return OSSO_OK;
701 }
702
703 static gboolean
704 on_idle_open_default_inbox(gpointer user_data)
705 {
706         gdk_threads_enter ();
707         
708         ModestWindow *win = 
709                 modest_window_mgr_get_main_window (modest_runtime_get_window_mgr ());
710
711         /* Get the folder view */
712         GtkWidget *folder_view = modest_main_window_get_child_widget (MODEST_MAIN_WINDOW (win),
713                                                            MODEST_WIDGET_TYPE_FOLDER_VIEW);
714         modest_folder_view_select_first_inbox_or_local (
715                 MODEST_FOLDER_VIEW (folder_view));
716         
717         gdk_threads_leave ();
718         
719         return FALSE; /* Do not call this callback again. */
720 }
721
722 static gint on_open_default_inbox(GArray * arguments, gpointer data, osso_rpc_t * retval)
723 {
724     /* Use g_idle to context-switch into the application's thread: */
725
726     /* This method has no arguments. */
727         
728         g_idle_add(on_idle_open_default_inbox, NULL);
729         
730         /* Note that we cannot report failures during send/receive, 
731          * because that would be asynchronous. */
732         return OSSO_OK;
733 }
734                       
735 /* Callback for normal D-BUS messages */
736 gint modest_dbus_req_handler(const gchar * interface, const gchar * method,
737                       GArray * arguments, gpointer data,
738                       osso_rpc_t * retval)
739 {
740         
741         g_debug ("debug: %s\n", __FUNCTION__);
742         g_debug ("debug: %s: method received: %s\n", __FUNCTION__, method);
743         
744         if (g_ascii_strcasecmp(method, MODEST_DBUS_METHOD_MAIL_TO) == 0) {
745                 return on_mail_to (arguments, data, retval);
746         } else if (g_ascii_strcasecmp(method, MODEST_DBUS_METHOD_OPEN_MESSAGE) == 0) {
747                 return on_open_message (arguments, data, retval);
748         } else if (g_ascii_strcasecmp(method, MODEST_DBUS_METHOD_SEND_RECEIVE) == 0) {
749                 return on_send_receive (arguments, data, retval);
750         } else if (g_ascii_strcasecmp(method, MODEST_DBUS_METHOD_COMPOSE_MAIL) == 0) {
751                 return on_compose_mail (arguments, data, retval);
752         } else if (g_ascii_strcasecmp(method, MODEST_DBUS_METHOD_DELETE_MESSAGE) == 0) {
753                 return on_delete_message (arguments,data, retval);
754         } else if (g_ascii_strcasecmp(method, MODEST_DBUS_METHOD_OPEN_DEFAULT_INBOX) == 0) {
755                 return on_open_default_inbox (arguments, data, retval);
756         }
757         else { 
758                 /* We need to return INVALID here so
759                  * libosso will return DBUS_HANDLER_RESULT_NOT_YET_HANDLED,
760                  * so that our modest_dbus_req_filter will then be tried instead.
761                  * */
762                 return OSSO_INVALID;
763         }
764 }
765                                          
766 /* A complex D-Bus type (like a struct),
767  * used to return various information about a search hit.
768  */
769 #define SEARCH_HIT_DBUS_TYPE \
770         DBUS_STRUCT_BEGIN_CHAR_AS_STRING \
771         DBUS_TYPE_STRING_AS_STRING /* msgid */ \
772         DBUS_TYPE_STRING_AS_STRING /* subject */ \
773         DBUS_TYPE_STRING_AS_STRING /* folder */ \
774         DBUS_TYPE_STRING_AS_STRING /* sender */ \
775         DBUS_TYPE_UINT64_AS_STRING /* msize */ \
776         DBUS_TYPE_BOOLEAN_AS_STRING /* has_attachment */ \
777         DBUS_TYPE_BOOLEAN_AS_STRING /* is_unread */ \
778         DBUS_TYPE_INT64_AS_STRING /* timestamp */ \
779         DBUS_STRUCT_END_CHAR_AS_STRING
780
781 static DBusMessage *
782 search_result_to_message (DBusMessage *reply,
783                            GList       *hits)
784 {
785         DBusMessageIter iter;
786         DBusMessageIter array_iter;
787         GList          *hit_iter;
788
789         dbus_message_iter_init_append (reply, &iter); 
790         dbus_message_iter_open_container (&iter,
791                                           DBUS_TYPE_ARRAY,
792                                           SEARCH_HIT_DBUS_TYPE,
793                                           &array_iter); 
794
795         for (hit_iter = hits; hit_iter; hit_iter = hit_iter->next) {
796                 DBusMessageIter  struct_iter;
797                 ModestSearchHit *hit;
798                 char            *msg_url;
799                 const char      *subject;
800                 const char      *folder;
801                 const char      *sender;
802                 guint64          size;
803                 gboolean         has_attachment;
804                 gboolean         is_unread;
805                 gint64           ts;
806
807                 hit = (ModestSearchHit *) hit_iter->data;
808
809                 msg_url = hit->msgid;
810                 subject = hit->subject;
811                 folder  = hit->folder;
812                 sender  = hit->sender;
813                 size           = hit->msize;
814                 has_attachment = hit->has_attachment;
815                 is_unread      = hit->is_unread;
816                 ts             = hit->timestamp;
817
818                 g_debug ("DEBUG: %s: Adding hit: %s", __FUNCTION__, msg_url);   
819                 
820                 dbus_message_iter_open_container (&array_iter,
821                                                   DBUS_TYPE_STRUCT,
822                                                   NULL,
823                                                   &struct_iter);
824
825                 dbus_message_iter_append_basic (&struct_iter,
826                                                 DBUS_TYPE_STRING,
827                                                 &msg_url);
828
829                 dbus_message_iter_append_basic (&struct_iter,
830                                                 DBUS_TYPE_STRING,
831                                                 &subject); 
832
833                 dbus_message_iter_append_basic (&struct_iter,
834                                                 DBUS_TYPE_STRING,
835                                                 &folder);
836
837                 dbus_message_iter_append_basic (&struct_iter,
838                                                 DBUS_TYPE_STRING,
839                                                 &sender);
840
841                 dbus_message_iter_append_basic (&struct_iter,
842                                                 DBUS_TYPE_UINT64,
843                                                 &size);
844
845                 dbus_message_iter_append_basic (&struct_iter,
846                                                 DBUS_TYPE_BOOLEAN,
847                                                 &has_attachment);
848
849                 dbus_message_iter_append_basic (&struct_iter,
850                                                 DBUS_TYPE_BOOLEAN,
851                                                 &is_unread);
852                 
853                 dbus_message_iter_append_basic (&struct_iter,
854                                                 DBUS_TYPE_INT64,
855                                                 &ts);
856
857                 dbus_message_iter_close_container (&array_iter,
858                                                    &struct_iter); 
859
860                 g_free (hit->msgid);
861                 g_free (hit->subject);
862                 g_free (hit->folder);
863                 g_free (hit->sender);
864
865                 g_slice_free (ModestSearchHit, hit);
866         }
867
868         dbus_message_iter_close_container (&iter, &array_iter);
869
870         return reply;
871 }
872
873
874 static void
875 on_dbus_method_search (DBusConnection *con, DBusMessage *message)
876 {
877         ModestDBusSearchFlags dbus_flags;
878         DBusMessage  *reply = NULL;
879         dbus_bool_t  res;
880         dbus_int64_t sd_v;
881         dbus_int64_t ed_v;
882         dbus_int32_t flags_v;
883         dbus_uint32_t size_v;
884         const char *folder;
885         const char *query;
886         time_t start_date;
887         time_t end_date;
888         GList *hits;
889
890         DBusError error;
891         dbus_error_init (&error);
892
893         sd_v = ed_v = 0;
894         flags_v = 0;
895
896         res = dbus_message_get_args (message,
897                                      &error,
898                                      DBUS_TYPE_STRING, &query,
899                                      DBUS_TYPE_STRING, &folder, /* e.g. "INBOX/drafts": TODO: Use both an ID and a display name. */
900                                      DBUS_TYPE_INT64, &sd_v,
901                                      DBUS_TYPE_INT64, &ed_v,
902                                      DBUS_TYPE_INT32, &flags_v,
903                                      DBUS_TYPE_UINT32, &size_v,
904                                      DBUS_TYPE_INVALID);
905         
906         dbus_flags = (ModestDBusSearchFlags) flags_v;
907         start_date = (time_t) sd_v;
908         end_date = (time_t) ed_v;
909
910         ModestSearch search;
911         memset (&search, 0, sizeof (search));
912         
913         /* Remember what folder we are searching in:
914          *
915          * Note that we don't copy the strings, 
916          * because this struct will only be used for the lifetime of this function.
917          */
918         search.folder = folder;
919
920    /* Remember the text to search for: */
921 #ifdef MODEST_HAVE_OGS
922         search.query  = query;
923 #endif
924
925         /* Other criteria: */
926         search.before = start_date;
927         search.after  = end_date;
928         search.flags  = 0;
929
930         /* Text to serach for in various parts of the message: */
931         if (dbus_flags & MODEST_DBUS_SEARCH_SUBJECT) {
932                 search.flags |= MODEST_SEARCH_SUBJECT;
933                 search.subject = query;
934         }
935
936         if (dbus_flags & MODEST_DBUS_SEARCH_SENDER) {
937                 search.flags |=  MODEST_SEARCH_SENDER;
938                 search.from = query;
939         }
940
941         if (dbus_flags & MODEST_DBUS_SEARCH_RECIPIENT) {
942                 search.flags |= MODEST_SEARCH_RECIPIENT; 
943                 search.recipient = query;
944         }
945
946         if (dbus_flags & MODEST_DBUS_SEARCH_BODY) {
947                 search.flags |=  MODEST_SEARCH_BODY; 
948                 search.body = query;
949         }
950
951         if (sd_v > 0) {
952                 search.flags |= MODEST_SEARCH_BEFORE;
953                 search.before = start_date;
954         }
955
956         if (ed_v > 0) {
957                 search.flags |= MODEST_SEARCH_AFTER;
958                 search.after = end_date;
959         }
960
961         if (size_v > 0) {
962                 search.flags |= MODEST_SEARCH_SIZE;
963                 search.minsize = size_v;
964         }
965
966 #ifdef MODEST_HAVE_OGS
967         search.flags |= MODEST_SEARCH_USE_OGS;
968         g_debug ("%s: Starting search for %s", __FUNCTION__, search.query);
969 #endif
970
971         /* Note that this currently gets folders and messages from the servers, 
972          * which can take a long time. libmodest_dbus_client_search() can timeout, 
973          * reporting no results, if this takes a long time: */
974         hits = modest_search_all_accounts (&search);
975
976         reply = dbus_message_new_method_return (message);
977
978         search_result_to_message (reply, hits);
979
980         if (reply == NULL) {
981                 g_warning ("%s: Could not create reply.", __FUNCTION__);
982         }
983
984         if (reply) {
985                 dbus_uint32_t serial = 0;
986                 dbus_connection_send (con, reply, &serial);
987         dbus_connection_flush (con);
988         dbus_message_unref (reply);
989         }
990
991         g_list_free (hits);
992 }
993
994
995 /* A complex D-Bus type (like a struct),
996  * used to return various information about a folder.
997  */
998 #define GET_FOLDERS_RESULT_DBUS_TYPE \
999         DBUS_STRUCT_BEGIN_CHAR_AS_STRING \
1000         DBUS_TYPE_STRING_AS_STRING /* Folder Name */ \
1001         DBUS_TYPE_STRING_AS_STRING /* Folder URI */ \
1002         DBUS_STRUCT_END_CHAR_AS_STRING
1003
1004 static DBusMessage *
1005 get_folders_result_to_message (DBusMessage *reply,
1006                            GList *folder_ids)
1007 {
1008         DBusMessageIter iter;   
1009         dbus_message_iter_init_append (reply, &iter); 
1010         
1011         DBusMessageIter array_iter;
1012         dbus_message_iter_open_container (&iter,
1013                                           DBUS_TYPE_ARRAY,
1014                                           GET_FOLDERS_RESULT_DBUS_TYPE,
1015                                           &array_iter); 
1016
1017         GList *list_iter = folder_ids;
1018         for (list_iter = folder_ids; list_iter; list_iter = list_iter->next) {
1019                 
1020                 const gchar *folder_name = (const gchar*)list_iter->data;
1021                 if (folder_name) {
1022                         /* g_debug ("DEBUG: %s: Adding folder: %s", __FUNCTION__, folder_name); */
1023                         
1024                         DBusMessageIter struct_iter;
1025                         dbus_message_iter_open_container (&array_iter,
1026                                                           DBUS_TYPE_STRUCT,
1027                                                           NULL,
1028                                                           &struct_iter);
1029         
1030                         /* name: */
1031                         dbus_message_iter_append_basic (&struct_iter,
1032                                                         DBUS_TYPE_STRING,
1033                                                         &folder_name); /* The string will be copied. */
1034                                                         
1035                         /* URI: This is maybe not needed by osso-global-search: */
1036                         const gchar *folder_uri = "TODO:unimplemented";
1037                         dbus_message_iter_append_basic (&struct_iter,
1038                                                         DBUS_TYPE_STRING,
1039                                                         &folder_uri); /* The string will be copied. */
1040         
1041                         dbus_message_iter_close_container (&array_iter,
1042                                                            &struct_iter); 
1043                 }
1044         }
1045
1046         dbus_message_iter_close_container (&iter, &array_iter);
1047
1048         return reply;
1049 }
1050
1051 static void
1052 add_single_folder_to_list (TnyFolder *folder, GList** list)
1053 {
1054         if (!folder)
1055                 return;
1056                 
1057         /* Add this folder to the list: */
1058         /*
1059         const gchar * folder_name = tny_folder_get_name (folder);
1060         if (folder_name)
1061                 *list = g_list_append(*list, g_strdup (folder_name));
1062         else {
1063         */
1064                 /* osso-global-search only uses one string,
1065                  * so ID is the only thing that could possibly identify a folder.
1066                  * TODO: osso-global search should probably be changed to 
1067                  * take an ID and a Name.
1068                  */
1069                 const gchar * id =  tny_folder_get_id (folder);
1070                 if (id && strlen(id))
1071                         *list = g_list_append(*list, g_strdup (id));
1072                 /*
1073                 else {
1074                         g_warning ("DEBUG: %s: folder has no name or ID.\n", __FUNCTION__);     
1075                 }
1076                 
1077         }
1078         */
1079 }
1080
1081 static void
1082 add_folders_to_list (TnyFolderStore *folder_store, GList** list)
1083 {
1084         if (!folder_store)
1085                 return;
1086         
1087         /* Add this folder to the list: */
1088         if (TNY_IS_FOLDER (folder_store)) {
1089                 add_single_folder_to_list (TNY_FOLDER (folder_store), list);
1090         }       
1091         
1092                 
1093         /* Recurse into child folders: */
1094                 
1095         /* Get the folders list: */
1096         /*
1097         TnyFolderStoreQuery *query = tny_folder_store_query_new ();
1098         tny_folder_store_query_add_item (query, NULL, 
1099                 TNY_FOLDER_STORE_QUERY_OPTION_SUBSCRIBED);
1100         */
1101         TnyList *all_folders = tny_simple_list_new ();
1102         tny_folder_store_get_folders (folder_store,
1103                                       all_folders,
1104                                       NULL /* query */,
1105                                       NULL /* error */);
1106
1107         TnyIterator *iter = tny_list_create_iterator (all_folders);
1108         while (!tny_iterator_is_done (iter)) {
1109                 TnyFolder *folder = TNY_FOLDER (tny_iterator_get_current (iter));
1110                 if (TNY_IS_FOLDER_STORE (folder))
1111                         add_folders_to_list (TNY_FOLDER_STORE (folder), list);
1112                 else {
1113                         add_single_folder_to_list (TNY_FOLDER (folder), list);
1114                 }
1115                 
1116                 tny_iterator_next (iter);
1117         }
1118         g_object_unref (G_OBJECT (iter));
1119 }
1120
1121 static void
1122 on_dbus_method_get_folders (DBusConnection *con, DBusMessage *message)
1123 {
1124         DBusMessage  *reply = NULL;
1125         
1126
1127         /* Get the TnyStoreAccount so we can get the folders: */
1128         ModestAccountMgr *account_mgr = modest_runtime_get_account_mgr();
1129         gchar *account_name = modest_account_mgr_get_default_account (account_mgr);
1130         if (!account_name) {
1131                 g_printerr ("modest: no account found\n");
1132         }
1133         
1134         TnyAccount *account = NULL;
1135         if (account_mgr) {
1136                 account = modest_tny_account_store_get_server_account (
1137                         modest_runtime_get_account_store(), account_name, 
1138                         TNY_ACCOUNT_TYPE_STORE);
1139         }
1140         
1141         if (!account) {
1142                 g_printerr ("modest: failed to get tny account folder'%s'\n", account_name);
1143         } 
1144                 
1145         printf("DEBUG: %s: Getting folders for account name=%s\n", __FUNCTION__, account_name);
1146         g_free (account_name);
1147         account_name = NULL;
1148         
1149         GList *folder_names = NULL;
1150         add_folders_to_list (TNY_FOLDER_STORE (account), &folder_names);
1151
1152         g_object_unref (account);
1153         account = NULL;
1154         
1155         
1156         /* Also add the folders from the local folders account,
1157          * because they are (currently) used with all accounts:
1158          * TODO: This is not working. It seems to get only the Merged Folder (with an ID of "" (not NULL)).
1159          */
1160         TnyAccount *account_local = 
1161                 modest_tny_account_store_get_local_folders_account (
1162                         TNY_ACCOUNT_STORE (modest_runtime_get_account_store()));
1163         add_folders_to_list (TNY_FOLDER_STORE (account_local), &folder_names);
1164
1165         g_object_unref (account_local);
1166         account_local = NULL;
1167
1168
1169         /* Put the result in a DBus reply: */
1170         reply = dbus_message_new_method_return (message);
1171
1172         get_folders_result_to_message (reply, folder_names);
1173
1174         if (reply == NULL) {
1175                 g_warning ("%s: Could not create reply.", __FUNCTION__);
1176         }
1177
1178         if (reply) {
1179                 dbus_uint32_t serial = 0;
1180                 dbus_connection_send (con, reply, &serial);
1181         dbus_connection_flush (con);
1182         dbus_message_unref (reply);
1183         }
1184
1185         g_list_foreach (folder_names, (GFunc)g_free, NULL);
1186         g_list_free (folder_names);
1187 }
1188
1189
1190 /** This D-Bus handler is used when the main osso-rpc 
1191  * D-Bus handler has not handled something.
1192  * We use this for D-Bus methods that need to use more complex types 
1193  * than osso-rpc supports.
1194  */
1195 DBusHandlerResult
1196 modest_dbus_req_filter (DBusConnection *con,
1197                         DBusMessage    *message,
1198                         void           *user_data)
1199 {
1200         gboolean handled = FALSE;
1201
1202         if (dbus_message_is_method_call (message,
1203                                          MODEST_DBUS_IFACE,
1204                                          MODEST_DBUS_METHOD_SEARCH)) {
1205                 on_dbus_method_search (con, message);
1206                 handled = TRUE;                         
1207         } else if (dbus_message_is_method_call (message,
1208                                          MODEST_DBUS_IFACE,
1209                                          MODEST_DBUS_METHOD_GET_FOLDERS)) {
1210                 on_dbus_method_get_folders (con, message);
1211                 handled = TRUE;                         
1212         }
1213         
1214         return (handled ? 
1215                 DBUS_HANDLER_RESULT_HANDLED :
1216                 DBUS_HANDLER_RESULT_NOT_YET_HANDLED);
1217 }
1218
1219
1220 void
1221 modest_osso_cb_hw_state_handler(osso_hw_state_t *state, gpointer data)
1222 {
1223         /* TODO? */
1224     /* printf("%s()\n", __PRETTY_FUNCTION__); */
1225
1226     if(state->system_inactivity_ind)
1227     {
1228     }
1229     else if(state->save_unsaved_data_ind)
1230     {
1231     }
1232     else
1233     {
1234     
1235     }
1236
1237     /* printf("debug: %s(): return\n", __PRETTY_FUNCTION__); */
1238 }