Fixes leak 12/26
[modest] / src / hildon2 / modest-address-book.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 /* modest-address-book.c */
31
32 #include <config.h>
33 #include <glib/gi18n.h>
34 #include <modest-address-book.h>
35 #include <modest-text-utils.h>
36 #include <libebook/e-book.h>
37 #include <libebook/e-book-view.h>
38 #include <libebook/e-vcard.h>
39 #include "modest-hildon-includes.h"
40 #include <libosso-abook/osso-abook.h>
41 #include "modest-platform.h"
42 #include "modest-runtime.h"
43 #include "widgets/modest-window-mgr.h"
44 #include "widgets/modest-ui-constants.h"
45 #include <string.h>
46 #include <gtk/gtksizegroup.h>
47 #include <gtk/gtkbox.h>
48 #include <gtk/gtklabel.h>
49 #include <gtk/gtkcellrenderertext.h>
50 #include <gtk/gtktreeselection.h>
51 #include <gtk/gtkentry.h>
52 #include <modest-maemo-utils.h>
53
54 static OssoABookContactModel *contact_model =  NULL;
55 static EBook *book = NULL;
56 static EBookView * book_view = NULL;
57
58 static GSList *get_recipients_for_given_contact (EContact * contact, gboolean *canceled);
59 static void commit_contact(EContact * contact, gboolean is_new);
60 static gchar *get_email_addr_from_user(const gchar * given_name, gboolean *canceled);
61 static gchar *ui_get_formatted_email_id(gchar * current_given_name,
62                                         gchar * current_sur_name, gchar * current_email_id);
63 static gchar *run_add_email_addr_to_contact_dlg(const gchar * contact_name, gboolean *canceled);
64 static GSList *select_email_addrs_for_contact(GList * email_addr_list);
65 static gboolean resolve_address (const gchar *address, GSList **resolved_addresses, GSList **contact_id, gboolean *canceled);
66 static gchar *unquote_string (const gchar *str);
67
68
69 static void
70 unref_gobject (GObject *obj)
71 {
72         if (obj)
73                 g_object_unref (obj);
74 }
75         
76
77 static void
78 get_book_view_cb (EBook *book, EBookStatus status, EBookView *bookview, gpointer data)
79 {
80         if (status != E_BOOK_ERROR_OK) {
81                 g_object_unref (book);
82                 book = NULL;
83                 return;
84         }
85         book_view = bookview;
86
87         if (contact_model)
88 #if MODEST_ABOOK_API < 4
89                 osso_abook_tree_model_set_book_view (OSSO_ABOOK_TREE_MODEL (contact_model),
90                                                      book_view);
91 #else /* MODEST_ABOOK_API < 4 */
92                 osso_abook_list_store_set_book_view (OSSO_ABOOK_LIST_STORE (contact_model),
93                                                      book_view);
94 #endif /* MODEST_ABOOK_API < 4 */
95
96         e_book_view_start (book_view);
97 }
98
99 static void
100 book_open_cb (EBook *view, EBookStatus status, gpointer data)
101 {
102         EBookQuery *query = NULL;
103
104         if (status != E_BOOK_ERROR_OK) {
105                 g_object_unref (book);
106                 book = NULL;
107                 return;
108         }
109         query = e_book_query_any_field_contains ("");
110         e_book_async_get_book_view (book, query, NULL, -1, get_book_view_cb, NULL);
111         e_book_query_unref (query);
112 }
113
114 static gboolean 
115 open_addressbook ()
116 {
117         book = e_book_new_system_addressbook (NULL);
118         if (!book)
119                 return FALSE;
120
121         if (e_book_async_open (book, FALSE, book_open_cb, NULL) != E_BOOK_ERROR_OK)
122                 return FALSE;
123
124         return TRUE; /* FIXME */        
125 }
126
127 typedef struct _OpenAddressbookSyncInfo {
128         gboolean retval;
129         GMainLoop *mainloop;
130 } OpenAddressbookSyncInfo;
131
132 static void
133 get_book_view_sync_cb (EBook *book, EBookStatus status, EBookView *bookview, gpointer data)
134 {
135         OpenAddressbookSyncInfo *info = (OpenAddressbookSyncInfo *) data;
136
137         if (status != E_BOOK_ERROR_OK) {
138                 g_object_unref (book);
139                 book = NULL;
140                 info->retval = FALSE;
141                 g_main_loop_quit (info->mainloop);
142                 return;
143         }
144         book_view = bookview;
145
146         if (contact_model)
147 #if MODEST_ABOOK_API < 4
148                 osso_abook_tree_model_set_book_view (OSSO_ABOOK_TREE_MODEL (contact_model),
149                                                      book_view);
150 #else /* MODEST_ABOOK_API < 4 */
151                 osso_abook_list_store_set_book_view (OSSO_ABOOK_LIST_STORE (contact_model),
152                                                      book_view);
153 #endif /* MODEST_ABOOK_API < 4 */
154
155         e_book_view_start (book_view);
156         info->retval = TRUE;
157         g_main_loop_quit (info->mainloop);
158 }
159
160 static void
161 book_open_sync_cb (EBook *view, EBookStatus status, gpointer data)
162 {
163         EBookQuery *query = NULL;
164         OpenAddressbookSyncInfo *info = (OpenAddressbookSyncInfo *) data;
165
166         if (status != E_BOOK_ERROR_OK) {
167                 g_object_unref (book);
168                 book = NULL;
169                 info->retval = FALSE;
170                 g_main_loop_quit (info->mainloop);
171                 return;
172         }
173         query = e_book_query_any_field_contains ("");
174         e_book_async_get_book_view (book, query, NULL, -1, get_book_view_sync_cb, info);
175         e_book_query_unref (query);
176 }
177
178 static gboolean
179 open_addressbook_sync ()
180 {
181         OpenAddressbookSyncInfo *info;
182         gboolean retval;
183
184         book = e_book_new_system_addressbook (NULL);
185         if (!book)
186                 return FALSE;
187
188         info = g_slice_new (OpenAddressbookSyncInfo);
189         info->mainloop = g_main_loop_new (NULL, FALSE);
190         info->retval = FALSE;
191         if (e_book_async_open (book, FALSE, book_open_sync_cb, info) == E_BOOK_ERROR_OK) {
192                 GDK_THREADS_LEAVE ();
193                 g_main_loop_run (info->mainloop);
194                 GDK_THREADS_ENTER ();
195         }
196         retval = info->retval;
197         g_main_loop_unref (info->mainloop);
198         g_slice_free (OpenAddressbookSyncInfo, info);
199         /* Make it launch a main loop */
200         return e_book_open (book, FALSE, NULL);
201 }
202
203 void
204 modest_address_book_add_address (const gchar *address)
205 {
206         GtkWidget *dialog = NULL;
207         gchar *email_address;
208         EVCardAttribute *attribute;
209
210         if (!open_addressbook ()) {
211                 return;
212         }
213
214         email_address = modest_text_utils_get_email_address (address);
215         
216         attribute = e_vcard_attribute_new (NULL, EVC_EMAIL);
217         e_vcard_attribute_add_value (attribute, email_address);
218         dialog = osso_abook_temporary_contact_dialog_new (NULL, book, attribute, NULL);
219         gtk_dialog_run (GTK_DIALOG (dialog));
220
221         gtk_widget_destroy (dialog);
222
223         e_vcard_attribute_free (attribute);
224         g_free (email_address);
225
226 }
227
228 void
229 modest_address_book_select_addresses (ModestRecptEditor *recpt_editor)
230 {
231 #if MODEST_ABOOK_API < 4
232         GtkWidget *contact_view = NULL;
233         GtkWidget *contact_dialog;
234         GtkWidget *toplevel;
235 #else /* MODEST_ABOOK_API < 4 */
236         GtkWidget *contact_chooser = NULL;
237 #endif /* MODEST_ABOOK_API < 4 */
238
239         GList *contacts_list = NULL;
240         GSList *email_addrs_per_contact = NULL;
241         gchar *econtact_id;
242         gboolean focus_recpt_editor = FALSE;
243
244         g_return_if_fail (MODEST_IS_RECPT_EDITOR (recpt_editor));
245
246 #if MODEST_ABOOK_API < 4
247         if (!open_addressbook ()) {
248                 if (contact_model) {
249                         g_object_unref (contact_model);
250                         contact_model = NULL;
251                 }
252                 return;
253         }
254         contact_model = osso_abook_contact_model_new ();
255
256         contact_view = osso_abook_contact_selector_new_basic (contact_model);
257         osso_abook_contact_selector_set_minimum_selection (OSSO_ABOOK_CONTACT_SELECTOR (contact_view), 1);
258
259         contact_dialog = osso_abook_select_dialog_new (OSSO_ABOOK_TREE_VIEW (contact_view));
260         toplevel = gtk_widget_get_toplevel (GTK_WIDGET (recpt_editor));
261         modest_window_mgr_set_modal (modest_runtime_get_window_mgr (), GTK_WINDOW (contact_dialog), GTK_WINDOW (toplevel));
262
263         gtk_widget_show (contact_dialog);
264
265         if (gtk_dialog_run (GTK_DIALOG (contact_dialog)) == GTK_RESPONSE_OK) {
266                 contacts_list = 
267                         osso_abook_contact_selector_get_extended_selection (OSSO_ABOOK_CONTACT_SELECTOR
268                                                                              (contact_view));
269         }
270 #else /* MODEST_ABOOK_API < 4 */
271         /* TODO: figure out how to make the contact chooser modal */
272         contact_chooser = osso_abook_contact_chooser_new_with_capabilities (NULL,
273                                                                             _AB("addr_ti_dia_select_contacts"),
274                                                                             OSSO_ABOOK_CAPS_EMAIL, 
275                                                                             OSSO_ABOOK_CONTACT_ORDER_NAME);
276         /* Enable multiselection */
277         osso_abook_contact_chooser_set_maximum_selection (OSSO_ABOOK_CONTACT_CHOOSER (contact_chooser),
278                                                           G_MAXUINT);
279
280         if (gtk_dialog_run (GTK_DIALOG (contact_chooser)) == GTK_RESPONSE_OK)
281                 contacts_list = osso_abook_contact_chooser_get_selection (OSSO_ABOOK_CONTACT_CHOOSER (contact_chooser));
282         gtk_widget_destroy (contact_chooser);
283 #endif
284
285         if (contacts_list) {
286                 GList *node;
287
288                 for (node = contacts_list; node != NULL; node = g_list_next (node)) {
289                         EContact *contact = (EContact *) node->data;
290                         gboolean canceled;
291
292                         email_addrs_per_contact = get_recipients_for_given_contact (contact, &canceled);
293                         if (email_addrs_per_contact) {
294                                 econtact_id = (gchar *) e_contact_get_const (contact, E_CONTACT_UID);
295                                 modest_recpt_editor_add_resolved_recipient (MODEST_RECPT_EDITOR (recpt_editor), 
296                                                                             email_addrs_per_contact, econtact_id);
297                                 g_slist_foreach (email_addrs_per_contact, (GFunc) g_free, NULL);
298                                 g_slist_free (email_addrs_per_contact);
299                                 email_addrs_per_contact = NULL;
300                                 focus_recpt_editor = TRUE;
301                         }
302                 }
303                 g_list_free (contacts_list);
304         }
305
306 #if MODEST_ABOOK_API < 4
307         if (contact_model) {
308                 g_object_unref (contact_model);
309                 contact_model = NULL;
310         }
311
312         gtk_widget_destroy (contact_dialog);
313 #endif
314
315         if (focus_recpt_editor)
316                 modest_recpt_editor_grab_focus (MODEST_RECPT_EDITOR (recpt_editor));
317
318 }
319
320 /**
321  * This function returns the resolved recipients for a given EContact.
322  * If no e-mail address is defined, it launches 'Add e-mail address to contact'
323  * dialog to obtain one. If multiple e-mail addresses are found, it launches
324  * 'Select e-mail address' dialog to allow user to select one or more e-mail
325  * addresses for that contact.
326  *
327  * @param  Contact of type #EContact
328  * @return List of resolved recipient strings, to be freed by calling function.
329  */
330 static GSList *
331 get_recipients_for_given_contact (EContact * contact,
332                                   gboolean *canceled)
333 {
334         gchar *givenname = NULL;
335         gchar *familyname = NULL;
336         gchar *nickname = NULL;
337         gchar *emailid = NULL;
338         const gchar *display_name = NULL;
339         GList *list = NULL;
340         gchar *formatted_string = NULL;
341         gboolean email_not_present = FALSE;
342         GSList *formattedlist = NULL, *selected_email_addr_list = NULL, *node = NULL;
343
344         if (!contact) {
345                 return NULL;
346         }
347
348         givenname = (gchar *) e_contact_get_const(contact, E_CONTACT_GIVEN_NAME);
349         familyname = (gchar *) e_contact_get_const(contact, E_CONTACT_FAMILY_NAME);
350         nickname = (gchar *) e_contact_get_const(contact, E_CONTACT_NICKNAME);
351         if (!nickname)
352                 nickname = "";
353         list = (GList *) e_contact_get(contact, E_CONTACT_EMAIL);
354
355         if (!list) {
356                 email_not_present = TRUE;
357         }
358
359         if (list && g_list_length(list) == 1) {
360                 if (list->data == NULL || g_utf8_strlen(list->data, -1) == 0) {
361                         email_not_present = TRUE;
362                 } else {
363                         emailid = g_strstrip(g_strdup(list->data));
364                         if (g_utf8_strlen(emailid, -1) == 0) {
365                                 g_free(emailid);
366                                 email_not_present = TRUE;
367                         }
368                 }
369         }
370
371         /*Launch the 'Add e-mail addr to contact' dialog if required */
372         if (email_not_present) {
373 #if MODEST_ABOOK_API < 4
374                 display_name = osso_abook_contact_get_display_name(contact);
375 #else
376                 OssoABookContact *abook_contact;
377
378                 abook_contact = osso_abook_contact_new_from_template (contact);
379                 display_name = osso_abook_contact_get_display_name(abook_contact);
380 #endif
381
382                 emailid = get_email_addr_from_user(display_name, canceled);
383                 if (emailid) {
384                         e_contact_set(contact, E_CONTACT_EMAIL_1, emailid);
385                         commit_contact(contact, FALSE);
386                 }
387 #if MODEST_ABOOK_API >= 4
388                 g_object_unref (abook_contact);
389 #endif
390         }
391
392         if (emailid) {
393                 if (givenname || familyname)
394                         formatted_string =
395                             ui_get_formatted_email_id(givenname, familyname, emailid);
396                 else
397                         formatted_string = g_strdup(emailid);
398                 formattedlist = g_slist_append(formattedlist, formatted_string);
399                 g_free(emailid);
400         }
401
402         /*Launch the 'Select e-mail address' dialog if required */
403         if (g_list_length(list) > 1) {
404                 selected_email_addr_list = select_email_addrs_for_contact(list);
405                 for (node = selected_email_addr_list; node != NULL; node = node->next) {
406                         if (givenname || familyname)
407                                 formatted_string =
408                                     ui_get_formatted_email_id(givenname, familyname, node->data);
409                         else
410                                 formatted_string = g_strdup(node->data);
411                         formattedlist = g_slist_append(formattedlist, formatted_string);
412                 }
413                 if (selected_email_addr_list) {
414                         g_slist_foreach(selected_email_addr_list, (GFunc) g_free, NULL);
415                         g_slist_free(selected_email_addr_list);
416                 }
417         }
418
419         if (list) {
420                 g_list_foreach(list, (GFunc) g_free, NULL);
421                 g_list_free(list);
422         }
423
424         return formattedlist;
425 }
426
427 /**
428  * This is a helper function to commit a EContact to Address_Book application.
429  *
430  * @param  contact  Contact of type #EContact
431  * @return void
432  */
433 static void 
434 commit_contact(EContact * contact, gboolean is_new)
435 {
436         g_return_if_fail (contact);
437         g_return_if_fail (book);
438
439         if (!contact || !book)
440                 return;
441
442 #if MODEST_ABOOK_API < 4
443         osso_abook_contact_commit(contact, is_new, book);
444 #else
445         if (OSSO_ABOOK_IS_CONTACT (contact)) {
446                 osso_abook_contact_commit(OSSO_ABOOK_CONTACT(contact), is_new, book, NULL);
447         } else {
448                 if (is_new)
449                         e_book_add_contact (book, contact, NULL);
450                 else
451                         e_book_commit_contact (book, contact, NULL);
452         }
453 #endif /* MODEST_ABOOK_API < 2 */
454 }
455
456 /**
457  * This is a helper function used to launch 'Add e-mail address to contact' dialog
458  * after showing appropriate notification, when there is no e-mail address defined
459  * for a selected contact.
460  *
461  * @param  given_name  Given name of the contact
462  * @param  family_name  Family name of the contact
463  * @return E-mail address string entered by user, to be freed by calling function.
464  */
465 static gchar *
466 get_email_addr_from_user(const gchar * given_name, gboolean *canceled)
467 {
468         gchar *notification = NULL;
469         gchar *email_addr = NULL;
470         GtkWidget *note;
471         gboolean note_response;
472
473
474         notification = g_strdup_printf(_("mcen_nc_email_address_not_defined"), given_name);
475
476         note = hildon_note_new_confirmation (NULL, notification);
477         note_response = gtk_dialog_run (GTK_DIALOG(note));
478         gtk_widget_destroy (note);
479         g_free(notification);
480
481         if (note_response == GTK_RESPONSE_OK) {
482                 email_addr = run_add_email_addr_to_contact_dlg (given_name, canceled);
483         }
484
485         return email_addr;
486 }
487
488 /**
489 This function is used to get the formated email id with given name and sur name
490 in the format "GIVENNAME SURNAME <EMAIL ADDRESS>".
491 @param current_given_name    to hold the given name
492 @param current_sur_name      to hold the sur name
493 @param current_email_id      to hold the email id. 
494 @return gchar* string to be freed by calling function
495 */
496 static gchar *
497 ui_get_formatted_email_id(gchar * current_given_name,
498                           gchar * current_sur_name, gchar * current_email_id)
499 {
500         GString *email_id_str = NULL;
501
502         email_id_str = g_string_new(NULL);
503
504         if ((current_given_name != NULL) && ((strlen(current_given_name) != 0))
505             && (current_sur_name != NULL) && ((strlen(current_sur_name) != 0))) {
506                 g_string_append_printf(email_id_str, "%s %s", current_given_name, current_sur_name);
507         } else if ((current_given_name != NULL) && (strlen(current_given_name) != 0)) {
508                 g_string_append_printf(email_id_str, "%s", current_given_name);
509         } else if ((current_sur_name != NULL) && (strlen(current_sur_name) != 0)) {
510                 g_string_append_printf(email_id_str, "%s", current_sur_name);
511         }
512         if (g_utf8_strchr (email_id_str->str, -1, ' ')) {
513                 g_string_prepend_c (email_id_str, '\"');
514                 g_string_append_c (email_id_str, '\"');
515         }
516         g_string_append_printf (email_id_str, " %c%s%c", '<', current_email_id, '>');
517         return g_string_free (email_id_str, FALSE);
518 }
519
520 /**
521  * This is a helper function used to create & run 'Add e-mail address to contact' dialog.
522  * It allows user to enter an e-mail address, and shows appropriate infonote if the
523  * entered string is not a valid e-mail address.
524  *
525  * It must return TRUE in canceled if the dialog was canceled by the user
526  *
527  * @param  contact_name  Full name of the contact
528  * @return E-mail address string entered by user, to be freed by calling function.
529  */
530 static gchar *
531 run_add_email_addr_to_contact_dlg(const gchar * contact_name,
532                                   gboolean *canceled)
533 {
534         GtkWidget *add_email_addr_to_contact_dlg = NULL;
535         GtkSizeGroup *size_group = NULL;
536         GtkWidget *cptn_cntrl = NULL;
537         GtkWidget *name_label = NULL;
538         GtkWidget *email_entry = NULL;
539         gint result = -1;
540         gchar *new_email_addr = NULL;
541         gboolean run_dialog = TRUE;
542
543         g_return_val_if_fail (canceled, NULL);
544
545         *canceled = FALSE;
546
547         add_email_addr_to_contact_dlg =
548             gtk_dialog_new_with_buttons(_("mcen_ti_add_email_title"), NULL,
549                                         GTK_DIALOG_MODAL | GTK_DIALOG_DESTROY_WITH_PARENT,
550                                         _HL("wdgt_bd_save"), GTK_RESPONSE_ACCEPT, NULL);
551         gtk_dialog_set_has_separator(GTK_DIALOG(add_email_addr_to_contact_dlg), FALSE);
552 #ifdef MODEST_TOOLKIT_HILDON2
553         gtk_container_set_border_width (GTK_CONTAINER (GTK_DIALOG (add_email_addr_to_contact_dlg)->vbox), 
554                                         HILDON_MARGIN_DOUBLE);
555 #endif
556         /*Set app_name & state_save related tags to the window */
557
558         size_group = gtk_size_group_new(GTK_SIZE_GROUP_HORIZONTAL);
559         name_label = gtk_label_new(contact_name);
560         gtk_misc_set_alignment(GTK_MISC(name_label), 0.0, 0.5);
561         cptn_cntrl =
562                 modest_maemo_utils_create_captioned (size_group, NULL,
563                                                      _("mcen_ia_add_email_name"), FALSE,
564                                                      name_label);
565         gtk_box_pack_start(GTK_BOX(GTK_DIALOG(add_email_addr_to_contact_dlg)->vbox), cptn_cntrl,
566                            FALSE, FALSE, 0);
567
568         email_entry = hildon_entry_new (HILDON_SIZE_FINGER_HEIGHT | HILDON_SIZE_AUTO_WIDTH);
569         cptn_cntrl = modest_maemo_utils_create_captioned (size_group, NULL, 
570                                                           _("mcen_fi_add_email_name"), FALSE,
571                                                           email_entry);
572         hildon_gtk_entry_set_input_mode(GTK_ENTRY(email_entry), HILDON_GTK_INPUT_MODE_FULL);
573         gtk_box_pack_start(GTK_BOX(GTK_DIALOG(add_email_addr_to_contact_dlg)->vbox), cptn_cntrl,
574                            TRUE, TRUE, 0);
575
576         gtk_widget_show_all(add_email_addr_to_contact_dlg);
577
578         while (run_dialog) {
579                 run_dialog = FALSE;
580                 gtk_widget_grab_focus(email_entry);
581                 result = gtk_dialog_run(GTK_DIALOG(add_email_addr_to_contact_dlg));
582
583                 if (result == GTK_RESPONSE_ACCEPT) {
584                         const gchar *invalid_char_offset = NULL;
585                         new_email_addr = g_strdup(hildon_entry_get_text(HILDON_ENTRY(email_entry)));
586                         new_email_addr = g_strstrip(new_email_addr);
587                         if (!modest_text_utils_validate_email_address (new_email_addr, &invalid_char_offset)) {
588                                 gtk_widget_grab_focus(email_entry);
589                                 if ((invalid_char_offset != NULL)&&(*invalid_char_offset != '\0')) {
590                                         gchar *char_in_string = g_strdup_printf ("%c", *invalid_char_offset);
591                                         gchar *message = g_strdup_printf(
592                                                 _CS("ckdg_ib_illegal_characters_entered"), 
593                                                 char_in_string);
594                                         g_free (char_in_string);
595                                         hildon_banner_show_information (
596                                                 add_email_addr_to_contact_dlg, NULL, message );
597                                         g_free (message);
598                                 } else {
599                                         hildon_banner_show_information (add_email_addr_to_contact_dlg, NULL, _("mcen_ib_invalid_email"));
600                                         run_dialog = TRUE;
601                                 }
602                                 gtk_editable_select_region((GtkEditable *) email_entry, 0, -1);
603                                 g_free(new_email_addr);
604                                 new_email_addr = NULL;
605                         }
606                 } else {
607                         *canceled = TRUE;
608                 }
609         }
610
611         gtk_widget_destroy(add_email_addr_to_contact_dlg);
612
613         return new_email_addr;
614 }
615
616 /**
617  * This is helper function to create & run 'Select e-mail address' dialog, used when
618  * multiple e-mail addresses are found for a selected contact. It allows user to select
619  * one or more e-mail addresses for that contact.
620  *
621  * @param  email_addr_list  List of e-mail addresses for that contact
622  * @return List of user selected e-mail addresses, to be freed by calling function.
623  */
624 static GSList *
625 select_email_addrs_for_contact(GList * email_addr_list)
626 {
627         GtkWidget *select_email_addr_dlg = NULL;
628         GSList *selected_email_addr_list = NULL;
629         GList *node;
630         GtkWidget *selector;
631         gint result = -1;
632
633         if (!email_addr_list)
634                 return NULL;
635
636         select_email_addr_dlg = hildon_picker_dialog_new (NULL);
637         gtk_window_set_title (GTK_WINDOW (select_email_addr_dlg), _("mcen_ti_select_email_title"));
638
639         selector = hildon_touch_selector_new_text ();
640         for (node = email_addr_list; node != NULL && node->data != NULL; node = node->next) {
641                 gchar *email_addr;
642                 email_addr = g_strstrip(g_strdup(node->data));
643                 hildon_touch_selector_append_text (HILDON_TOUCH_SELECTOR (selector), email_addr);
644                 g_free(email_addr);
645         }
646
647         hildon_picker_dialog_set_selector (HILDON_PICKER_DIALOG (select_email_addr_dlg),
648                                            HILDON_TOUCH_SELECTOR (selector));
649         gtk_window_set_default_size (GTK_WINDOW (select_email_addr_dlg), MODEST_DIALOG_WINDOW_MAX_HEIGHT, -1);
650         
651         gtk_widget_show_all(select_email_addr_dlg);
652         result = gtk_dialog_run(GTK_DIALOG(select_email_addr_dlg));
653
654         if (result == GTK_RESPONSE_OK) {
655                 gchar *current_text;
656
657                 current_text = hildon_touch_selector_get_current_text (HILDON_TOUCH_SELECTOR (selector));
658                 selected_email_addr_list = g_slist_append (selected_email_addr_list, current_text);
659                 
660         }
661
662         gtk_widget_destroy(select_email_addr_dlg);
663         return selected_email_addr_list;
664 }
665
666
667 static gboolean /* make this public? */
668 add_to_address_book (const gchar* address)
669 {
670         EBookQuery *query;
671         GList *contacts = NULL;
672         GError *err = NULL;
673         gchar *email;
674         
675         g_return_val_if_fail (address, FALSE);
676         
677         if (!book) {
678                 if (!open_addressbook ()) {
679                         g_return_val_if_reached (FALSE);
680                 }
681         }
682         
683         g_return_val_if_fail (book, FALSE);
684
685         email = modest_text_utils_get_email_address (address);
686         
687         query = e_book_query_field_test (E_CONTACT_EMAIL, E_BOOK_QUERY_IS, email);
688         if (!e_book_get_contacts (book, query, &contacts, &err)) {
689                 g_printerr ("modest: failed to get contacts: %s",
690                             err ? err->message : "<unknown>");
691                 if (err)
692                         g_error_free (err);
693                 return FALSE;
694         }
695         e_book_query_unref (query);
696         
697         /*  we need to 'commit' it, even if we already found the email
698          * address in the addressbook; thus, it will show up in the 'recent list' */
699         if (contacts)  {                
700                 g_debug ("%s already in the address book", address);
701                 commit_contact ((EContact*)contacts->data, FALSE);
702                 
703                 g_list_foreach (contacts, (GFunc)unref_gobject, NULL);
704                 g_list_free (contacts);
705
706         } else {
707                 /* it's not yet in the addressbook, add it now! */
708                 EContact *new_contact = e_contact_new ();
709                 gchar *display_address;
710                 display_address = g_strdup (address);
711                 if (display_address) {
712                         modest_text_utils_get_display_address (display_address);
713                         if ((display_address[0] != '\0') && (strlen (display_address) != strlen (address)))
714                                 e_contact_set (new_contact, E_CONTACT_FULL_NAME, (const gpointer)display_address);
715                 }
716                 e_contact_set (new_contact, E_CONTACT_EMAIL_1, (const gpointer)email);
717                 g_free (display_address);
718                 commit_contact (new_contact, TRUE);
719                 g_debug ("%s added to address book", address);
720                 g_object_unref (new_contact);
721         }
722
723         g_free (email);
724
725         return TRUE;
726 }
727
728 typedef struct _CheckNamesInfo {
729         GtkWidget *banner;
730         guint show_banner_timeout;
731         guint hide_banner_timeout;
732         gboolean hide;
733         gboolean free_info;
734 } CheckNamesInfo;
735
736 static void
737 hide_check_names_banner (CheckNamesInfo *info)
738 {
739         if (info->show_banner_timeout > 0) {
740                 g_source_remove (info->show_banner_timeout);
741                 info->show_banner_timeout = 0;
742         }
743         if (info->hide_banner_timeout > 0) {
744                 info->hide = TRUE;
745                 return;
746         }
747
748         if (info->banner) {
749                 gtk_widget_destroy (info->banner);
750                 info->banner = NULL;
751                 info->hide = FALSE;
752         }
753
754         if (info->free_info) {
755                 g_slice_free (CheckNamesInfo, info);
756         }
757 }
758
759 static gboolean hide_banner_timeout_handler (CheckNamesInfo *info)
760 {
761         info->hide_banner_timeout = 0;
762         if (info->hide) {
763                 gtk_widget_destroy (info->banner);
764                 info->banner = NULL;
765         }
766         if (info->free_info) {
767                 g_slice_free (CheckNamesInfo, info);
768         }
769         return FALSE;
770 }
771
772 static gboolean show_banner_timeout_handler (CheckNamesInfo *info)
773 {
774         info->show_banner_timeout = 0;
775         info->banner = hildon_banner_show_animation (NULL, NULL, _("mail_ib_checking_names"));
776         info->hide_banner_timeout = g_timeout_add (1000, (GSourceFunc) hide_banner_timeout_handler, (gpointer) info);
777         return FALSE;
778 }
779
780 static void show_check_names_banner (CheckNamesInfo *info)
781 {
782         if (info->hide_banner_timeout > 0) {
783                 g_source_remove (info->hide_banner_timeout);
784                 info->hide_banner_timeout = 0;
785         }
786
787         info->hide = FALSE;
788         if (info->show_banner_timeout > 0)
789                 return;
790
791         if (info->banner == NULL) {
792                 info->show_banner_timeout = g_timeout_add (500, (GSourceFunc) show_banner_timeout_handler, (gpointer) info);
793         }
794 }
795
796 static void clean_check_names_banner (CheckNamesInfo *info)
797 {
798         if (info->hide_banner_timeout) {
799                 info->free_info = TRUE;
800         } else {
801                 if (info->show_banner_timeout) {
802                         g_source_remove (info->show_banner_timeout);
803                 }
804                 if (info->banner)
805                         gtk_widget_destroy (info->banner);
806                 g_slice_free (CheckNamesInfo, info);
807         }
808 }
809
810 void free_resolved_addresses_list (gpointer data,
811                                    gpointer ignored)
812 {
813         GSList *list = (GSList *)data;
814         g_slist_foreach (list, (GFunc) g_free, NULL);
815         g_slist_free (list);
816 }
817
818 gboolean
819 modest_address_book_check_names (ModestRecptEditor *recpt_editor, gboolean update_addressbook)
820 {
821         const gchar *recipients = NULL;
822         GSList *start_indexes = NULL, *end_indexes = NULL;
823         GSList *current_start, *current_end;
824         gboolean result = TRUE;
825         GtkTextBuffer *buffer;
826         gint offset_delta = 0;
827         gint last_length;
828         GtkTextIter start_iter, end_iter;
829
830         g_return_val_if_fail (MODEST_IS_RECPT_EDITOR (recpt_editor), FALSE);
831
832         recipients = modest_recpt_editor_get_recipients (recpt_editor);
833         last_length = g_utf8_strlen (recipients, -1);
834         modest_text_utils_get_addresses_indexes (recipients, &start_indexes, &end_indexes);
835
836         if (start_indexes == NULL) {
837                 if (last_length != 0) {
838                         hildon_banner_show_information (NULL, NULL, _("mcen_nc_no_matching_contacts"));
839                         return FALSE;
840                 } else {
841                         return TRUE;
842                 }
843         }
844
845         current_start = start_indexes;
846         current_end = end_indexes;
847         buffer = modest_recpt_editor_get_buffer (recpt_editor);
848
849         while (current_start != NULL) {
850                 gchar *address;
851                 gchar *start_ptr, *end_ptr;
852                 gint start_pos, end_pos;
853                 const gchar *invalid_char_position = NULL;
854                 gboolean store_address = FALSE;
855
856                 start_pos = (*((gint*) current_start->data)) + offset_delta;
857                 end_pos = (*((gint*) current_end->data)) + offset_delta;
858                
859                 start_ptr = g_utf8_offset_to_pointer (recipients, start_pos);
860                 end_ptr = g_utf8_offset_to_pointer (recipients, end_pos);
861
862                 address = g_strstrip (g_strndup (start_ptr, end_ptr - start_ptr));
863                 gtk_text_buffer_get_iter_at_offset (buffer, &start_iter, start_pos);
864                 gtk_text_buffer_get_iter_at_offset (buffer, &end_iter, end_pos);
865                 gtk_text_buffer_select_range (buffer, &start_iter, &end_iter);
866
867                 if (!modest_text_utils_validate_recipient (address, &invalid_char_position)) {
868                         if ((invalid_char_position != NULL) && (*invalid_char_position != '\0')) {
869                                 gchar *char_in_string = g_strdup_printf("%c", *invalid_char_position);
870                                 gchar *message = 
871                                         g_strdup_printf(_CS("ckdg_ib_illegal_characters_entered"), 
872                                                         char_in_string);
873                                 g_free (char_in_string);
874                                 hildon_banner_show_information (NULL, NULL, message );
875                                 g_free (message);
876                                 result = FALSE;
877                         } else if (strstr (address, "@") == NULL) {
878                                 /* here goes searching in addressbook */
879                                 gboolean canceled;
880                                 GSList *contact_ids = NULL;
881                                 GSList *resolved_addresses = NULL;
882
883                                 result = resolve_address (address, &resolved_addresses, &contact_ids, &canceled);
884
885                                 if (result) {
886                                         gint new_length;
887
888                                         modest_recpt_editor_replace_with_resolved_recipients (recpt_editor,
889                                                                                               &start_iter, &end_iter,
890                                                                                               resolved_addresses,
891                                                                                               contact_ids);
892                                         g_slist_foreach (contact_ids, (GFunc) g_free, NULL);
893                                         g_slist_foreach (resolved_addresses, free_resolved_addresses_list, NULL);
894                                         g_slist_free (contact_ids);
895                                         g_slist_free (resolved_addresses);
896
897                                         /* update offset delta */
898                                         recipients = modest_recpt_editor_get_recipients (recpt_editor);
899                                         new_length = g_utf8_strlen (recipients, -1);
900                                         offset_delta = offset_delta + new_length - last_length;
901                                         last_length = new_length;
902                                 } else if (canceled) {
903                                         /* We have to remove the recipient if not resolved */
904                                         modest_recpt_editor_replace_with_resolved_recipient (recpt_editor,
905                                                                                              &start_iter, &end_iter,
906                                                                                              NULL,
907                                                                                              NULL);
908                                 }
909                         } else {
910                                 /* this address is not valid, select it and return control to user showing banner */
911                                 hildon_banner_show_information (NULL, NULL, _("mcen_ib_invalid_email"));
912                                 result = FALSE;
913                         }
914                 } else {
915                         GSList *tags, *node;
916                         gboolean has_recipient = FALSE;
917
918                         tags = gtk_text_iter_get_tags (&start_iter);
919                         for (node = tags; node != NULL; node = g_slist_next (node)) {
920                                 GtkTextTag *tag = GTK_TEXT_TAG (node->data);
921                                 if (g_object_get_data (G_OBJECT (tag), "recipient-tag-id") != NULL) {
922                                         has_recipient = TRUE;
923                                         break;
924                                 }
925                         }
926                         g_slist_free (tags);
927                         if (!has_recipient) {
928                                 GSList * address_list = NULL;
929
930                                 address_list = g_slist_prepend (address_list, address);
931                                 modest_recpt_editor_replace_with_resolved_recipient (recpt_editor,
932                                                                                      &start_iter, &end_iter,
933                                                                                      address_list, 
934                                                                                      "");
935                                 g_slist_free (address_list);
936                                 store_address = TRUE;
937                         }
938                 }
939
940                 /* so, it seems a valid address */
941                 /* note: adding it the to the addressbook if it did not exist yet,
942                  * and adding it to the recent_list */
943                 if (result && update_addressbook && store_address)
944                         add_to_address_book (address);
945
946                 g_free (address);
947                 if (result == FALSE)
948                         break;
949
950                 current_start = g_slist_next (current_start);
951                 current_end = g_slist_next (current_end);
952         }
953
954         if (current_start == NULL) {
955                 gtk_text_buffer_get_end_iter (buffer, &end_iter);
956                 gtk_text_buffer_place_cursor (buffer, &end_iter);
957         }
958
959         g_slist_foreach (start_indexes, (GFunc) g_free, NULL);
960         g_slist_foreach (end_indexes, (GFunc) g_free, NULL);
961         g_slist_free (start_indexes);
962         g_slist_free (end_indexes);
963
964         return result;
965
966 }
967
968 typedef struct _GetContactsInfo {
969         GMainLoop *mainloop;
970         GList *result;
971 } GetContactsInfo;
972
973 static void 
974 get_contacts_for_name_cb (EBook *book, 
975                           EBookStatus status, 
976                           GList *list, 
977                           gpointer userdata)
978 {
979         GetContactsInfo *info = (GetContactsInfo *) userdata;
980
981         if (status == E_BOOK_ERROR_OK)
982                 info->result = list;
983
984         g_main_loop_quit (info->mainloop);
985 }
986
987 static GList *
988 get_contacts_for_name (const gchar *name)
989 {
990         EBookQuery *full_name_book_query = NULL;
991         GList *result;
992         gchar *unquoted;
993         GetContactsInfo *info;
994
995         if (name == NULL)
996                 return NULL;
997
998         unquoted = unquote_string (name);
999         full_name_book_query = e_book_query_field_test (E_CONTACT_FULL_NAME, E_BOOK_QUERY_CONTAINS, unquoted);
1000         g_free (unquoted);
1001
1002         /* TODO: Make it launch a mainloop */
1003         info = g_slice_new (GetContactsInfo);
1004         info->mainloop = g_main_loop_new (NULL, FALSE);
1005         info->result = NULL;
1006         if (e_book_async_get_contacts (book, full_name_book_query, get_contacts_for_name_cb, info) == 0) {
1007                 GDK_THREADS_LEAVE ();
1008                 g_main_loop_run (info->mainloop);
1009                 GDK_THREADS_ENTER ();
1010         } 
1011         result = info->result;
1012         e_book_query_unref (full_name_book_query);
1013         g_main_loop_unref (info->mainloop);
1014         g_slice_free (GetContactsInfo, info);
1015
1016         return result;
1017 }
1018
1019 static GList *
1020 select_contacts_for_name_dialog (const gchar *name)
1021 {
1022         EBookQuery *full_name_book_query = NULL;
1023         EBookView *book_view = NULL;
1024         GList *result = NULL;
1025         gchar *unquoted;
1026
1027         unquoted = unquote_string (name);
1028         full_name_book_query = e_book_query_field_test (E_CONTACT_FULL_NAME, E_BOOK_QUERY_CONTAINS, unquoted);
1029         g_free (unquoted);
1030         e_book_get_book_view (book, full_name_book_query, NULL, -1, &book_view, NULL);
1031         e_book_query_unref (full_name_book_query);
1032
1033         if (book_view) {
1034                 GtkWidget *contact_dialog = NULL;
1035 #if MODEST_ABOOK_API < 4
1036                 GtkWidget *contact_view = NULL;
1037                 osso_abook_tree_model_set_book_view (OSSO_ABOOK_TREE_MODEL (contact_model), book_view);
1038                 e_book_view_start (book_view);
1039
1040                 contact_view = osso_abook_contact_selector_new_basic (contact_model);
1041                 contact_dialog = osso_abook_select_dialog_new (OSSO_ABOOK_TREE_VIEW (contact_view));
1042
1043                 if (gtk_dialog_run (GTK_DIALOG (contact_dialog)) == GTK_RESPONSE_OK) {
1044                         result = osso_abook_contact_view_get_selection (OSSO_ABOOK_CONTACT_VIEW (contact_view));
1045                 }
1046                 e_book_view_stop (book_view);
1047                 g_object_unref (book_view);
1048                 gtk_widget_destroy (contact_dialog);
1049 #else /* MODEST_ABOOK_API < 4 */
1050                 osso_abook_list_store_set_book_view (OSSO_ABOOK_LIST_STORE (contact_model), book_view);
1051                 e_book_view_start (book_view);
1052
1053                 /* TODO: figure out how to make the contact chooser modal */
1054                 contact_dialog = osso_abook_contact_chooser_new_with_capabilities (NULL,
1055                                                                                    _AB("addr_ti_dia_select_contacts"),
1056                                                                                    OSSO_ABOOK_CAPS_EMAIL,
1057                                                                                    OSSO_ABOOK_CONTACT_ORDER_NAME);
1058                 /* Enable multiselection */
1059                 osso_abook_contact_chooser_set_maximum_selection (OSSO_ABOOK_CONTACT_CHOOSER (contact_dialog),
1060                                                                   G_MAXUINT);
1061                 osso_abook_contact_chooser_set_model (OSSO_ABOOK_CONTACT_CHOOSER (contact_dialog),
1062                                                       contact_model);
1063
1064                 if (gtk_dialog_run (GTK_DIALOG (contact_dialog)) == GTK_RESPONSE_OK)
1065                         result = osso_abook_contact_chooser_get_selection (OSSO_ABOOK_CONTACT_CHOOSER (contact_dialog));
1066                 e_book_view_stop (book_view);
1067                 g_object_unref (book_view);
1068                 gtk_widget_destroy (contact_dialog);
1069 #endif /* MODEST_ABOOK_API < 4 */
1070         }
1071
1072         return result;
1073 }
1074
1075 static gboolean
1076 resolve_address (const gchar *address, 
1077                  GSList **resolved_addresses, 
1078                  GSList **contact_ids,
1079                  gboolean *canceled)
1080 {
1081         GList *resolved_contacts;
1082         CheckNamesInfo *info;;
1083
1084         g_return_val_if_fail (canceled, FALSE);
1085
1086         *resolved_addresses = NULL;
1087         *contact_ids = NULL;
1088         *canceled = FALSE;
1089         info = g_slice_new0 (CheckNamesInfo);
1090         show_check_names_banner (info);
1091         
1092         contact_model = osso_abook_contact_model_new ();
1093         if (!open_addressbook_sync ()) {
1094                 hide_check_names_banner (info);
1095                 if (contact_model) {
1096                         g_object_unref (contact_model);
1097                         contact_model = NULL;
1098                 }
1099                 clean_check_names_banner (info);
1100                 return FALSE;
1101         }
1102         hide_check_names_banner (info);
1103
1104         resolved_contacts = get_contacts_for_name (address);
1105
1106         if (resolved_contacts == NULL) {
1107                 /* no matching contacts for the search string */
1108                 modest_platform_run_information_dialog (NULL, _("mcen_nc_no_matching_contacts"), FALSE);
1109                 clean_check_names_banner (info);
1110                 return FALSE;
1111         }
1112
1113         if (g_list_length (resolved_contacts) > 1) {
1114                 /* show a dialog to select the contact from the resolved ones */
1115                 g_list_free (resolved_contacts);
1116
1117                 resolved_contacts = select_contacts_for_name_dialog (address);
1118         }
1119
1120         /* get the resolved contacts (can be no contact) */
1121         if (resolved_contacts) {
1122                 GList *node;
1123                 gboolean found = FALSE;
1124
1125                 for (node = resolved_contacts; node != NULL; node = g_list_next (node)) {
1126                         EContact *contact = (EContact *) node->data;
1127                         GSList *resolved;
1128                         gchar *contact_id;
1129
1130                         resolved = get_recipients_for_given_contact (contact, canceled);
1131                         if (resolved) {
1132                                 contact_id = g_strdup (e_contact_get_const (contact, E_CONTACT_UID));
1133                                 *contact_ids = g_slist_append (*contact_ids, contact_id);
1134                                 found = TRUE;
1135                                 *resolved_addresses = g_slist_append (*resolved_addresses, resolved);
1136                         }
1137                 }
1138
1139                 g_list_foreach (resolved_contacts, (GFunc)unref_gobject, NULL);
1140                 g_list_free (resolved_contacts);
1141                 clean_check_names_banner (info);
1142
1143                 return found;
1144         } else {
1145                 /* cancelled dialog to select more than one contact or
1146                  * selected no contact */
1147                 clean_check_names_banner (info);
1148                 return FALSE;
1149         }
1150
1151 }
1152
1153 static gchar *
1154 unquote_string (const gchar *str)
1155 {
1156         GString *buffer;
1157         gchar *p;
1158
1159         if (str == NULL)
1160                 return NULL;
1161
1162         buffer = g_string_new_len (NULL, strlen (str));
1163         for (p = (gchar *) str; *p != '\0'; p = g_utf8_next_char (p)) {
1164                 if (*p == '"') {
1165                         p = g_utf8_next_char (p);
1166                         while ((*p != '\0')&&(*p != '"')) {
1167                                 if (*p == '\\') {
1168                                         g_string_append_unichar (buffer, g_utf8_get_char (p));
1169                                         p = g_utf8_next_char (p);
1170
1171                                 }
1172                                 g_string_append_unichar (buffer, g_utf8_get_char (p));
1173                                 p = g_utf8_next_char (p);
1174                         }
1175                 } else {
1176                         g_string_append_unichar (buffer, g_utf8_get_char (p));
1177                 }
1178         }
1179
1180         return g_string_free (buffer, FALSE);
1181
1182 }
1183
1184 gboolean
1185 modest_address_book_has_address (const gchar *address)
1186 {
1187         EBookQuery *query;
1188         GList *contacts = NULL;
1189         GError *err = NULL;
1190         gchar *email;
1191         gboolean result;
1192
1193         g_return_val_if_fail (address, FALSE);
1194         
1195         if (!book) {
1196                 if (!open_addressbook ()) {
1197                         g_return_val_if_reached (FALSE);
1198                 }
1199         }
1200         
1201         g_return_val_if_fail (book, FALSE);
1202
1203         email = modest_text_utils_get_email_address (address);
1204         
1205         query = e_book_query_field_test (E_CONTACT_EMAIL, E_BOOK_QUERY_IS, email);
1206         if (!e_book_get_contacts (book, query, &contacts, &err)) {
1207                 g_printerr ("modest: failed to get contacts: %s",
1208                             err ? err->message : "<unknown>");
1209                 if (err)
1210                         g_error_free (err);
1211                 g_free (email);
1212                 e_book_query_unref (query);
1213                 return FALSE;
1214         }
1215         e_book_query_unref (query);
1216
1217         result = (contacts != NULL);
1218         if (contacts) {
1219                 g_list_foreach (contacts, (GFunc)unref_gobject, NULL);
1220                 g_list_free (contacts);
1221         }
1222         
1223         g_free (email);
1224
1225         return result;
1226 }