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