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