8ad0df858059fce0924df6f7c83856be03602d9d
[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
53 static OssoABookContactModel *contact_model =  NULL;
54 static EBook *book = NULL;
55 static EBookView * book_view = NULL;
56
57 static GSList *get_recipients_for_given_contact(EContact * contact);
58 static void commit_contact(EContact * contact, gboolean is_new);
59 static gchar *get_email_addr_from_user(const gchar * given_name);
60 static gchar *ui_get_formatted_email_id(gchar * current_given_name,
61                                         gchar * current_sur_name, gchar * current_email_id);
62 static gchar *run_add_email_addr_to_contact_dlg(const gchar * contact_name);
63 static GSList *select_email_addrs_for_contact(GList * email_addr_list);
64 static gboolean resolve_address (const gchar *address, GSList **resolved_addresses, gchar **contact_id);
65 static gchar *unquote_string (const gchar *str);
66
67
68 static void
69 unref_gobject (GObject *obj)
70 {
71         if (obj)
72                 g_object_unref (obj);
73 }
74         
75
76 static void
77 get_book_view_cb (EBook *book, EBookStatus status, EBookView *bookview, gpointer data)
78 {
79         if (status != E_BOOK_ERROR_OK) {
80                 g_object_unref (book);
81                 book = NULL;
82                 return;
83         }
84         book_view = bookview;
85
86         if (contact_model)
87 #if MODEST_ABOOK_API < 4
88                 osso_abook_tree_model_set_book_view (OSSO_ABOOK_TREE_MODEL (contact_model),
89                                                      book_view);
90 #else /* MODEST_ABOOK_API < 4 */
91                 osso_abook_list_store_set_book_view (OSSO_ABOOK_LIST_STORE (contact_model),
92                                                      book_view);
93 #endif /* MODEST_ABOOK_API < 4 */
94
95         e_book_view_start (book_view);
96 }
97
98 static void
99 book_open_cb (EBook *view, EBookStatus status, gpointer data)
100 {
101         EBookQuery *query = NULL;
102
103         if (status != E_BOOK_ERROR_OK) {
104                 g_object_unref (book);
105                 book = NULL;
106                 return;
107         }
108         query = e_book_query_any_field_contains ("");
109         e_book_async_get_book_view (book, query, NULL, -1, get_book_view_cb, NULL);
110         e_book_query_unref (query);
111 }
112
113 static gboolean 
114 open_addressbook ()
115 {
116         book = e_book_new_system_addressbook (NULL);
117         if (!book)
118                 return FALSE;
119
120         if (e_book_async_open (book, FALSE, book_open_cb, NULL) != E_BOOK_ERROR_OK)
121                 return FALSE;
122
123         return TRUE; /* FIXME */        
124 }
125
126 static gboolean
127 open_addressbook_sync ()
128 {
129         book = e_book_new_system_addressbook (NULL);
130         if (!book)
131                 return FALSE;
132
133         return e_book_open (book, FALSE, NULL);
134 }
135
136 void
137 modest_address_book_add_address (const gchar *address)
138 {
139         GtkWidget *dialog = NULL;
140         gchar *email_address;
141         EVCardAttribute *attribute;
142
143         if (!open_addressbook ()) {
144                 return;
145         }
146
147         email_address = modest_text_utils_get_email_address (address);
148         
149         attribute = e_vcard_attribute_new (NULL, EVC_EMAIL);
150         e_vcard_attribute_add_value (attribute, email_address);
151         dialog = osso_abook_temporary_contact_dialog_new (NULL, book, attribute, NULL);
152         gtk_dialog_run (GTK_DIALOG (dialog));
153
154         gtk_widget_destroy (dialog);
155
156         e_vcard_attribute_free (attribute);
157         g_free (email_address);
158
159 }
160
161 void
162 modest_address_book_select_addresses (ModestRecptEditor *recpt_editor)
163 {
164 #if MODEST_ABOOK_API < 4
165         GtkWidget *contact_view = NULL;
166         GtkWidget *contact_dialog;
167         GtkWidget *toplevel;
168 #else /* MODEST_ABOOK_API < 4 */
169         GtkWidget *contact_chooser = NULL;
170 #endif /* MODEST_ABOOK_API < 4 */
171
172         GList *contacts_list = NULL;
173         GSList *email_addrs_per_contact = NULL;
174         gchar *econtact_id;
175         gboolean focus_recpt_editor = FALSE;
176
177         g_return_if_fail (MODEST_IS_RECPT_EDITOR (recpt_editor));
178
179 #if MODEST_ABOOK_API < 4
180         if (!open_addressbook ()) {
181                 if (contact_model) {
182                         g_object_unref (contact_model);
183                         contact_model = NULL;
184                 }
185                 return;
186         }
187         contact_model = osso_abook_contact_model_new ();
188
189         contact_view = osso_abook_contact_selector_new_basic (contact_model);
190         osso_abook_contact_selector_set_minimum_selection (OSSO_ABOOK_CONTACT_SELECTOR (contact_view), 1);
191
192         contact_dialog = osso_abook_select_dialog_new (OSSO_ABOOK_TREE_VIEW (contact_view));
193         toplevel = gtk_widget_get_toplevel (GTK_WIDGET (recpt_editor));
194         modest_window_mgr_set_modal (modest_runtime_get_window_mgr (), GTK_WINDOW (contact_dialog), GTK_WINDOW (toplevel));
195
196         gtk_widget_show (contact_dialog);
197
198         if (gtk_dialog_run (GTK_DIALOG (contact_dialog)) == GTK_RESPONSE_OK) {
199                 contacts_list = 
200                         osso_abook_contact_selector_get_extended_selection (OSSO_ABOOK_CONTACT_SELECTOR
201                                                                              (contact_view));
202         }
203 #else /* MODEST_ABOOK_API < 4 */
204         /* TODO: figure out how to make the contact chooser modal */
205         contact_chooser = osso_abook_contact_chooser_new_with_capabilities (NULL,
206                                                                             _("mcen_me_editor_selectrecipients"),
207                                                                             OSSO_ABOOK_CAPS_EMAIL, 
208                                                                             OSSO_ABOOK_CONTACT_ORDER_NAME);
209
210         if (gtk_dialog_run (GTK_DIALOG (contact_chooser)) == GTK_RESPONSE_OK)
211                 contacts_list = osso_abook_contact_chooser_get_selection (OSSO_ABOOK_CONTACT_CHOOSER (contact_chooser));
212         gtk_widget_destroy (contact_chooser);
213 #endif
214
215         if (contacts_list) {
216                 GList *node;
217
218                 for (node = contacts_list; node != NULL; node = g_list_next (node)) {
219                         EContact *contact = (EContact *) node->data;
220
221                         email_addrs_per_contact = get_recipients_for_given_contact (contact);
222                         if (email_addrs_per_contact) {
223                                 econtact_id = (gchar *) e_contact_get_const (contact, E_CONTACT_UID);
224                                 modest_recpt_editor_add_resolved_recipient (MODEST_RECPT_EDITOR (recpt_editor), 
225                                                                             email_addrs_per_contact, econtact_id);
226                                 g_slist_foreach (email_addrs_per_contact, (GFunc) g_free, NULL);
227                                 g_slist_free (email_addrs_per_contact);
228                                 email_addrs_per_contact = NULL;
229                                 focus_recpt_editor = TRUE;
230                         }
231                 }
232                 g_list_free (contacts_list);
233         }
234
235 #if MODEST_ABOOK_API < 4
236         if (contact_model) {
237                 g_object_unref (contact_model);
238                 contact_model = NULL;
239         }
240
241         gtk_widget_destroy (contact_dialog);
242 #endif
243
244         if (focus_recpt_editor)
245                 modest_recpt_editor_grab_focus (MODEST_RECPT_EDITOR (recpt_editor));
246
247 }
248
249 /**
250  * This function returns the resolved recipients for a given EContact.
251  * If no e-mail address is defined, it launches 'Add e-mail address to contact'
252  * dialog to obtain one. If multiple e-mail addresses are found, it launches
253  * 'Select e-mail address' dialog to allow user to select one or more e-mail
254  * addresses for that contact.
255  *
256  * @param  Contact of type #EContact
257  * @return List of resolved recipient strings, to be freed by calling function.
258  */
259 static GSList *get_recipients_for_given_contact(EContact * contact)
260 {
261         gchar *givenname = NULL;
262         gchar *familyname = NULL;
263         gchar *nickname = NULL;
264         gchar *emailid = NULL;
265         const gchar *display_name = NULL;
266         GList *list = NULL;
267         gchar *formatted_string = NULL;
268         gboolean email_not_present = FALSE;
269         GSList *formattedlist = NULL, *selected_email_addr_list = NULL, *node = NULL;
270
271         if (!contact) {
272                 return NULL;
273         }
274
275         givenname = (gchar *) e_contact_get_const(contact, E_CONTACT_GIVEN_NAME);
276         familyname = (gchar *) e_contact_get_const(contact, E_CONTACT_FAMILY_NAME);
277         nickname = (gchar *) e_contact_get_const(contact, E_CONTACT_NICKNAME);
278         if (!nickname)
279                 nickname = "";
280         list = (GList *) e_contact_get(contact, E_CONTACT_EMAIL);
281
282         if (!list) {
283                 email_not_present = TRUE;
284         }
285
286         if (list && g_list_length(list) == 1) {
287                 if (list->data == NULL || g_utf8_strlen(list->data, -1) == 0) {
288                         email_not_present = TRUE;
289                 } else {
290                         emailid = g_strstrip(g_strdup(list->data));
291                         if (g_utf8_strlen(emailid, -1) == 0) {
292                                 g_free(emailid);
293                                 email_not_present = TRUE;
294                         }
295                 }
296         }
297
298         /*Launch the 'Add e-mail addr to contact' dialog if required */
299         if (email_not_present) {
300 #if MODEST_ABOOK_API < 4
301                 display_name = osso_abook_contact_get_display_name(contact);            
302 #else
303                 OssoABookContact *abook_contact;
304                
305                 abook_contact = osso_abook_contact_new_from_template (contact);
306                 display_name = osso_abook_contact_get_display_name(abook_contact);
307 #endif
308
309                 emailid = get_email_addr_from_user(display_name);
310                 if (emailid) {
311                         e_contact_set(contact, E_CONTACT_EMAIL_1, emailid);
312                         commit_contact(contact, FALSE);
313                 }
314 #if MODEST_ABOOK_API >= 4
315                 g_object_unref (abook_contact);
316 #endif
317         }
318
319         if (emailid) {
320                 if (givenname || familyname)
321                         formatted_string =
322                             ui_get_formatted_email_id(givenname, familyname, emailid);
323                 else
324                         formatted_string = g_strdup(emailid);
325                 formattedlist = g_slist_append(formattedlist, formatted_string);
326                 g_free(emailid);
327         }
328
329         /*Launch the 'Select e-mail address' dialog if required */
330         if (g_list_length(list) > 1) {
331                 selected_email_addr_list = select_email_addrs_for_contact(list);
332                 for (node = selected_email_addr_list; node != NULL; node = node->next) {
333                         if (givenname || familyname)
334                                 formatted_string =
335                                     ui_get_formatted_email_id(givenname, familyname, node->data);
336                         else
337                                 formatted_string = g_strdup(node->data);
338                         formattedlist = g_slist_append(formattedlist, formatted_string);
339                 }
340                 if (selected_email_addr_list) {
341                         g_slist_foreach(selected_email_addr_list, (GFunc) g_free, NULL);
342                         g_slist_free(selected_email_addr_list);
343                 }
344         }
345
346         if (list) {
347                 g_list_foreach(list, (GFunc) g_free, NULL);
348                 g_list_free(list);
349         }
350
351         return formattedlist;
352 }
353
354 /**
355  * This is a helper function to commit a EContact to Address_Book application.
356  *
357  * @param  contact  Contact of type #EContact
358  * @return void
359  */
360 static void 
361 commit_contact(EContact * contact, gboolean is_new)
362 {
363         g_return_if_fail (contact);
364         g_return_if_fail (book);
365         
366         if (!contact || !book)
367                 return;
368         
369 #if MODEST_ABOOK_API < 4
370         osso_abook_contact_commit(contact, is_new, book);
371 #else
372         if (OSSO_ABOOK_IS_CONTACT (contact)) {
373                 osso_abook_contact_commit(contact, is_new, book, NULL);
374         } else {
375                 e_book_commit_contact (book, contact, NULL);
376         }
377 #endif /* MODEST_ABOOK_API < 2 */
378 }
379
380 /**
381  * This is a helper function used to launch 'Add e-mail address to contact' dialog
382  * after showing appropriate notification, when there is no e-mail address defined
383  * for a selected contact.
384  *
385  * @param  given_name  Given name of the contact
386  * @param  family_name  Family name of the contact
387  * @return E-mail address string entered by user, to be freed by calling function.
388  */
389 static gchar *
390 get_email_addr_from_user(const gchar * given_name)
391 {
392         gchar *notification = NULL;
393         gchar *email_addr = NULL;
394         GtkWidget *note;
395         gboolean note_response;
396
397
398         notification = g_strdup_printf(_("mcen_nc_email_address_not_defined"), given_name);
399
400         note = hildon_note_new_confirmation (NULL, notification);
401         note_response = gtk_dialog_run (GTK_DIALOG(note));
402         gtk_widget_destroy (note);
403         g_free(notification);
404
405         if (note_response == GTK_RESPONSE_OK) {
406                 email_addr = run_add_email_addr_to_contact_dlg(given_name);
407         }
408
409         return email_addr;
410 }
411
412 /**
413 This function is used to get the formated email id with given name and sur name
414 in the format "GIVENNAME SURNAME <EMAIL ADDRESS>".
415 @param current_given_name    to hold the given name
416 @param current_sur_name      to hold the sur name
417 @param current_email_id      to hold the email id. 
418 @return gchar* string to be freed by calling function
419 */
420 static gchar *
421 ui_get_formatted_email_id(gchar * current_given_name,
422                           gchar * current_sur_name, gchar * current_email_id)
423 {
424         GString *email_id_str = NULL;
425
426         email_id_str = g_string_new(NULL);
427
428         if ((current_given_name != NULL) && ((strlen(current_given_name) != 0))
429             && (current_sur_name != NULL) && ((strlen(current_sur_name) != 0))) {
430                 g_string_append_printf(email_id_str, "%s %s", current_given_name, current_sur_name);
431         } else if ((current_given_name != NULL) && (strlen(current_given_name) != 0)) {
432                 g_string_append_printf(email_id_str, "%s", current_given_name);
433         } else if ((current_sur_name != NULL) && (strlen(current_sur_name) != 0)) {
434                 g_string_append_printf(email_id_str, "%s", current_sur_name);
435         }
436         if (g_utf8_strchr (email_id_str->str, -1, ' ')) {
437                 g_string_prepend_c (email_id_str, '\"');
438                 g_string_append_c (email_id_str, '\"');
439         }
440         g_string_append_printf (email_id_str, " %c%s%c", '<', current_email_id, '>');
441         return g_string_free (email_id_str, FALSE);
442 }
443
444 /**
445  * This is a helper function used to create & run 'Add e-mail address to contact' dialog.
446  * It allows user to enter an e-mail address, and shows appropriate infonote if the
447  * entered string is not a valid e-mail address.
448  *
449  * @param  contact_name  Full name of the contact
450  * @return E-mail address string entered by user, to be freed by calling function.
451  */
452 static gchar *
453 run_add_email_addr_to_contact_dlg(const gchar * contact_name)
454 {
455         GtkWidget *add_email_addr_to_contact_dlg = NULL;
456         GtkSizeGroup *size_group = NULL;
457         GtkWidget *cptn_cntrl = NULL;
458         GtkWidget *name_label = NULL;
459         GtkWidget *email_entry = NULL;
460         gint result = -1;
461         gchar *new_email_addr = NULL;
462         gboolean run_dialog = TRUE;
463
464         add_email_addr_to_contact_dlg =
465             gtk_dialog_new_with_buttons(_("mcen_ti_add_email_title"), NULL,
466                                         GTK_DIALOG_MODAL | GTK_DIALOG_DESTROY_WITH_PARENT,
467                                         _("mcen_bd_dialog_ok"), GTK_RESPONSE_ACCEPT,
468                                         _("mcen_bd_dialog_cancel"), GTK_RESPONSE_REJECT, NULL);
469         gtk_dialog_set_has_separator(GTK_DIALOG(add_email_addr_to_contact_dlg), FALSE);
470         /*Set app_name & state_save related tags to the window */
471
472         size_group = gtk_size_group_new(GTK_SIZE_GROUP_HORIZONTAL);
473         name_label = gtk_label_new(contact_name);
474         gtk_misc_set_alignment(GTK_MISC(name_label), 0, 0);
475         cptn_cntrl =
476             hildon_caption_new(size_group, _("mcen_ia_add_email_name"), name_label, NULL,
477                                HILDON_CAPTION_OPTIONAL);
478         gtk_box_pack_start(GTK_BOX(GTK_DIALOG(add_email_addr_to_contact_dlg)->vbox), cptn_cntrl,
479                            FALSE, FALSE, 0);
480
481         email_entry = gtk_entry_new();
482         cptn_cntrl =
483             hildon_caption_new(size_group, _("mcen_fi_add_email_name"), email_entry, NULL,
484                                HILDON_CAPTION_OPTIONAL);
485         hildon_gtk_entry_set_input_mode(GTK_ENTRY(email_entry), HILDON_GTK_INPUT_MODE_FULL);
486         gtk_box_pack_start(GTK_BOX(GTK_DIALOG(add_email_addr_to_contact_dlg)->vbox), cptn_cntrl,
487                            TRUE, TRUE, 0);
488
489         gtk_widget_show_all(add_email_addr_to_contact_dlg);
490
491         while (run_dialog) {
492                 run_dialog = FALSE;
493                 gtk_widget_grab_focus(email_entry);
494                 result = gtk_dialog_run(GTK_DIALOG(add_email_addr_to_contact_dlg));
495
496                 if (result == GTK_RESPONSE_ACCEPT) {
497                         const gchar *invalid_char_offset = NULL;
498                         new_email_addr = g_strdup(gtk_entry_get_text(GTK_ENTRY(email_entry)));
499                         new_email_addr = g_strstrip(new_email_addr);
500                         if (!modest_text_utils_validate_email_address (new_email_addr, &invalid_char_offset)) {
501                                 gtk_widget_grab_focus(email_entry);
502                                 if ((invalid_char_offset != NULL)&&(*invalid_char_offset != '\0')) {
503                                         gchar *char_in_string = g_strdup_printf ("%c", *invalid_char_offset);
504                                         gchar *message = g_strdup_printf(
505                                                 dgettext("hildon-common-strings", "ckdg_ib_illegal_characters_entered"), 
506                                                 char_in_string);
507                                         hildon_banner_show_information (
508                                                 add_email_addr_to_contact_dlg, NULL, message );
509                                         g_free (message);
510                                 } else {
511                                         hildon_banner_show_information (add_email_addr_to_contact_dlg, NULL, _("mcen_ib_invalid_email"));
512                                         run_dialog = TRUE;
513                                 }
514                                 gtk_editable_select_region((GtkEditable *) email_entry, 0, -1);
515                                 g_free(new_email_addr);
516                                 new_email_addr = NULL;
517                         }
518                 }
519         }
520
521         gtk_widget_destroy(add_email_addr_to_contact_dlg);
522
523         return new_email_addr;
524 }
525
526 /**
527  * This is helper function to create & run 'Select e-mail address' dialog, used when
528  * multiple e-mail addresses are found for a selected contact. It allows user to select
529  * one or more e-mail addresses for that contact.
530  *
531  * @param  email_addr_list  List of e-mail addresses for that contact
532  * @return List of user selected e-mail addresses, to be freed by calling function.
533  */
534 static GSList *
535 select_email_addrs_for_contact(GList * email_addr_list)
536 {
537         GtkWidget *select_email_addr_dlg = NULL;
538         GtkWidget *view = NULL, *scrolledwindow = NULL;
539         GtkTreeSelection *selection = NULL;
540         GtkCellRenderer *renderer = NULL;
541         GtkTreeViewColumn *col = NULL;
542         GtkListStore *list_store = NULL;
543         GtkTreeModel *model = NULL;
544         GtkTreeIter iter;
545         GList *pathslist = NULL, *node = NULL;
546         gint result = -1;
547         gchar *email_addr = NULL;
548         GSList *selected_email_addr_list = NULL;
549
550         if (!email_addr_list)
551                 return NULL;
552
553         select_email_addr_dlg =
554             gtk_dialog_new_with_buttons(_("mcen_ti_select_email_title"),
555                                         NULL,
556                                         GTK_DIALOG_MODAL | GTK_DIALOG_DESTROY_WITH_PARENT,
557                                         _("mcen_bd_dialog_ok"), GTK_RESPONSE_ACCEPT,
558                                         _("mcen_bd_dialog_cancel"), GTK_RESPONSE_REJECT, NULL);
559         gtk_dialog_set_has_separator(GTK_DIALOG(select_email_addr_dlg), FALSE);
560
561         /* Make the window approximately big enough, because it doesn't resize to be big enough 
562          * for the window title text: */
563         gtk_window_set_default_size (GTK_WINDOW (select_email_addr_dlg), MODEST_DIALOG_WINDOW_MAX_HEIGHT, -1);
564
565         scrolledwindow = gtk_scrolled_window_new(NULL, NULL);
566         gtk_box_pack_start(GTK_BOX(GTK_DIALOG(select_email_addr_dlg)->vbox), scrolledwindow, TRUE,
567                            TRUE, 0);
568         gtk_scrolled_window_set_policy(GTK_SCROLLED_WINDOW(scrolledwindow), GTK_POLICY_AUTOMATIC,
569                                        GTK_POLICY_AUTOMATIC);
570
571         view = gtk_tree_view_new();
572         col = gtk_tree_view_column_new();
573         renderer = gtk_cell_renderer_text_new();
574         gtk_tree_view_append_column(GTK_TREE_VIEW(view), col);
575         gtk_tree_view_column_pack_start(col, renderer, TRUE);
576         gtk_tree_view_column_add_attribute(col, renderer, "text", 0);
577         selection = gtk_tree_view_get_selection(GTK_TREE_VIEW(view));
578         gtk_tree_selection_set_mode(selection, GTK_SELECTION_MULTIPLE);
579         gtk_container_add(GTK_CONTAINER(scrolledwindow), view);
580
581         list_store = gtk_list_store_new(1, G_TYPE_STRING);
582         model = GTK_TREE_MODEL(list_store);
583         gtk_tree_view_set_model(GTK_TREE_VIEW(view), model);
584
585         for (node = email_addr_list; node != NULL && node->data != NULL; node = node->next) {
586                 email_addr = g_strstrip(g_strdup(node->data));
587                 gtk_list_store_append(list_store, &iter);
588                 gtk_list_store_set(list_store, &iter, 0, email_addr, -1);
589                 g_free(email_addr);
590         }
591         gtk_tree_model_get_iter_first (GTK_TREE_MODEL (list_store), &iter);
592         gtk_tree_selection_select_iter (selection, &iter);
593
594         gtk_widget_show_all(select_email_addr_dlg);
595         result = gtk_dialog_run(GTK_DIALOG(select_email_addr_dlg));
596
597         if (result == GTK_RESPONSE_ACCEPT) {
598                 pathslist = gtk_tree_selection_get_selected_rows(selection, NULL);
599                 for (node = pathslist; node != NULL; node = node->next) {
600                         if (gtk_tree_model_get_iter(model, &iter, (GtkTreePath *) node->data)) {
601                                 gtk_tree_model_get(model, &iter, 0, &email_addr, -1);
602                                 selected_email_addr_list =
603                                     g_slist_append(selected_email_addr_list, g_strdup(email_addr));
604                                 g_free(email_addr);
605                         }
606                 }
607         }
608
609         gtk_list_store_clear(list_store);
610         gtk_widget_destroy(select_email_addr_dlg);
611         return selected_email_addr_list;
612 }
613
614
615 static gboolean /* make this public? */
616 add_to_address_book (const gchar* address)
617 {
618         EBookQuery *query;
619         GList *contacts = NULL;
620         GError *err = NULL;
621         gchar *email;
622         
623         g_return_val_if_fail (address, FALSE);
624         
625         if (!book) {
626                 if (!open_addressbook ()) {
627                         g_return_val_if_reached (FALSE);
628                 }
629         }
630         
631         g_return_val_if_fail (book, FALSE);
632
633         email = modest_text_utils_get_email_address (address);
634         
635         query = e_book_query_field_test (E_CONTACT_EMAIL, E_BOOK_QUERY_IS, email);
636         if (!e_book_get_contacts (book, query, &contacts, &err)) {
637                 g_printerr ("modest: failed to get contacts: %s",
638                             err ? err->message : "<unknown>");
639                 if (err)
640                         g_error_free (err);
641                 return FALSE;
642         }
643         e_book_query_unref (query);
644         
645         /*  we need to 'commit' it, even if we already found the email
646          * address in the addressbook; thus, it will show up in the 'recent list' */
647         if (contacts)  {                
648                 g_debug ("%s already in the address book", address);
649                 commit_contact ((EContact*)contacts->data, FALSE);
650                 
651                 g_list_foreach (contacts, (GFunc)unref_gobject, NULL);
652                 g_list_free (contacts);
653
654         } else {
655                 /* it's not yet in the addressbook, add it now! */
656                 EContact *new_contact = e_contact_new ();
657                 gchar *display_address;
658                 display_address = g_strdup (address);
659                 if (display_address) {
660                         modest_text_utils_get_display_address (display_address);
661                         if ((display_address[0] != '\0') && (strlen (display_address) != strlen (address)))
662                                 e_contact_set (new_contact, E_CONTACT_FULL_NAME, (const gpointer)display_address);
663                 }
664                 e_contact_set (new_contact, E_CONTACT_EMAIL_1, (const gpointer)email);
665                 g_free (display_address);
666                 commit_contact (new_contact, TRUE);
667                 g_debug ("%s added to address book", address);
668                 g_object_unref (new_contact);
669         }
670
671         g_free (email);
672
673         return TRUE;
674 }
675
676 static gboolean
677 show_check_names_banner (gpointer userdata)
678 {
679         GtkWidget **banner = (GtkWidget **) userdata;
680
681         gdk_threads_enter ();
682         *banner = modest_platform_animation_banner (NULL, NULL, _("mail_ib_checking_names"));
683         gdk_threads_leave ();
684
685         return FALSE;
686 }
687
688 static void
689 hide_check_names_banner (GtkWidget **banner, guint banner_timeout)
690 {
691         if (*banner != NULL) {
692                 gtk_widget_destroy (*banner);
693                 *banner = NULL;
694         } else {
695                 g_source_remove (banner_timeout);
696         }
697
698 }
699
700 gboolean
701 modest_address_book_check_names (ModestRecptEditor *recpt_editor, gboolean update_addressbook)
702 {
703         const gchar *recipients = NULL;
704         GSList *start_indexes = NULL, *end_indexes = NULL;
705         GSList *current_start, *current_end;
706         gboolean result = TRUE;
707         GtkTextBuffer *buffer;
708         gint offset_delta = 0;
709         gint last_length;
710         GtkTextIter start_iter, end_iter;
711
712         g_return_val_if_fail (MODEST_IS_RECPT_EDITOR (recpt_editor), FALSE);
713
714         recipients = modest_recpt_editor_get_recipients (recpt_editor);
715         last_length = g_utf8_strlen (recipients, -1);
716         modest_text_utils_get_addresses_indexes (recipients, &start_indexes, &end_indexes);
717
718         if (start_indexes == NULL) {
719                 if (last_length != 0) {
720                         hildon_banner_show_information (NULL, NULL, _("mcen_nc_no_matching_contacts"));
721                         return FALSE;
722                 } else {
723                         return TRUE;
724                 }
725         }
726
727         current_start = start_indexes;
728         current_end = end_indexes;
729         buffer = modest_recpt_editor_get_buffer (recpt_editor);
730
731         while (current_start != NULL) {
732                 gchar *address;
733                 gchar *start_ptr, *end_ptr;
734                 gint start_pos, end_pos;
735                 const gchar *invalid_char_position = NULL;
736                 gboolean store_address = FALSE;
737
738                 start_pos = (*((gint*) current_start->data)) + offset_delta;
739                 end_pos = (*((gint*) current_end->data)) + offset_delta;
740                
741                 start_ptr = g_utf8_offset_to_pointer (recipients, start_pos);
742                 end_ptr = g_utf8_offset_to_pointer (recipients, end_pos);
743
744                 address = g_strstrip (g_strndup (start_ptr, end_ptr - start_ptr));
745                 gtk_text_buffer_get_iter_at_offset (buffer, &start_iter, start_pos);
746                 gtk_text_buffer_get_iter_at_offset (buffer, &end_iter, end_pos);
747                 gtk_text_buffer_select_range (buffer, &start_iter, &end_iter);
748
749                 if (!modest_text_utils_validate_recipient (address, &invalid_char_position)) {
750                         if ((invalid_char_position != NULL) && (*invalid_char_position != '\0')) {
751                                 gchar *char_in_string = g_strdup_printf("%c", *invalid_char_position);
752                                 gchar *message = g_strdup_printf(
753                                         dgettext("hildon-common-strings", "ckdg_ib_illegal_characters_entered"), 
754                                         char_in_string);
755                                 g_free (char_in_string);
756                                 hildon_banner_show_information (NULL, NULL, message );
757                                 g_free (message);                               
758                                 result = FALSE;
759                         } else if (strstr (address, "@") == NULL) {
760                                 /* here goes searching in addressbook */
761                                 gchar *contact_id = NULL;
762                                 GSList *resolved_addresses = NULL;
763
764                                 result = resolve_address (address, &resolved_addresses, &contact_id);
765
766                                 if (result) {
767                                         gint new_length;
768                                         /* replace string */
769                                         modest_recpt_editor_replace_with_resolved_recipient (recpt_editor,
770                                                                                              &start_iter, &end_iter,
771                                                                                              resolved_addresses, 
772                                                                                              contact_id);
773                                         g_free (contact_id);
774                                         g_slist_foreach (resolved_addresses, (GFunc) g_free, NULL);
775                                         g_slist_free (resolved_addresses);
776
777                                         /* update offset delta */
778                                         recipients = modest_recpt_editor_get_recipients (recpt_editor);
779                                         new_length = g_utf8_strlen (recipients, -1);
780                                         offset_delta = offset_delta + new_length - last_length;
781                                         last_length = new_length;                                       
782                                 }
783                         } else {
784                                 /* this address is not valid, select it and return control to user showing banner */
785                                 hildon_banner_show_information (NULL, NULL, _("mcen_ib_invalid_email"));
786                                 result = FALSE;
787                         }
788                 } else {
789                         GSList *tags, *node;
790                         gboolean has_recipient = FALSE;
791
792                         tags = gtk_text_iter_get_tags (&start_iter);
793                         for (node = tags; node != NULL; node = g_slist_next (node)) {
794                                 GtkTextTag *tag = GTK_TEXT_TAG (node->data);
795                                 if (g_object_get_data (G_OBJECT (tag), "recipient-tag-id") != NULL) {
796                                         has_recipient = TRUE;
797                                         break;
798                                 }
799                         }
800                         g_slist_free (tags);
801                         if (!has_recipient) {
802                                 GSList * address_list = NULL;
803
804                                 address_list = g_slist_prepend (address_list, address);
805                                 modest_recpt_editor_replace_with_resolved_recipient (recpt_editor,
806                                                                                      &start_iter, &end_iter,
807                                                                                      address_list, 
808                                                                                      "");
809                                 g_slist_free (address_list);
810                                 store_address = TRUE;
811                         }
812                 }
813
814                 /* so, it seems a valid address */
815                 /* note: adding it the to the addressbook if it did not exist yet,
816                  * and adding it to the recent_list */
817                 if (result && update_addressbook && store_address)
818                         add_to_address_book (address);
819
820                 g_free (address);
821                 if (result == FALSE)
822                         break;
823
824                 current_start = g_slist_next (current_start);
825                 current_end = g_slist_next (current_end);
826         }
827
828         if (current_start == NULL) {
829                 gtk_text_buffer_get_end_iter (buffer, &end_iter);
830                 gtk_text_buffer_place_cursor (buffer, &end_iter);
831         }
832
833         g_slist_foreach (start_indexes, (GFunc) g_free, NULL);
834         g_slist_foreach (end_indexes, (GFunc) g_free, NULL);
835         g_slist_free (start_indexes);
836         g_slist_free (end_indexes);
837
838         return result;
839
840 }
841
842 static GList *
843 get_contacts_for_name (const gchar *name)
844 {
845         EBookQuery *full_name_book_query = NULL;
846         GList *result;
847         gchar *unquoted;
848
849         if (name == NULL)
850                 return NULL;
851
852         unquoted = unquote_string (name);
853         full_name_book_query = e_book_query_field_test (E_CONTACT_FULL_NAME, E_BOOK_QUERY_CONTAINS, unquoted);
854         g_free (unquoted);
855
856         e_book_get_contacts (book, full_name_book_query, &result, NULL);
857         e_book_query_unref (full_name_book_query);
858
859         return result;
860 }
861
862 static GList *
863 select_contacts_for_name_dialog (const gchar *name)
864 {
865         EBookQuery *full_name_book_query = NULL;
866         EBookView *book_view = NULL;
867         GList *result = NULL;
868         gchar *unquoted;
869
870         unquoted = unquote_string (name);
871         full_name_book_query = e_book_query_field_test (E_CONTACT_FULL_NAME, E_BOOK_QUERY_CONTAINS, unquoted);
872         g_free (unquoted);
873         e_book_get_book_view (book, full_name_book_query, NULL, -1, &book_view, NULL);
874         e_book_query_unref (full_name_book_query);
875
876         if (book_view) {
877                 GtkWidget *contact_dialog = NULL;
878 #if MODEST_ABOOK_API < 4
879                 GtkWidget *contact_view = NULL;
880                 osso_abook_tree_model_set_book_view (OSSO_ABOOK_TREE_MODEL (contact_model), book_view);
881                 e_book_view_start (book_view);
882
883                 contact_view = osso_abook_contact_selector_new_basic (contact_model);
884                 contact_dialog = osso_abook_select_dialog_new (OSSO_ABOOK_TREE_VIEW (contact_view));
885
886                 if (gtk_dialog_run (GTK_DIALOG (contact_dialog)) == GTK_RESPONSE_OK) {
887                         result = osso_abook_contact_view_get_selection (OSSO_ABOOK_CONTACT_VIEW (contact_view));
888                 }
889                 e_book_view_stop (book_view);
890                 g_object_unref (book_view);
891                 gtk_widget_destroy (contact_dialog);
892 #else /* MODEST_ABOOK_API < 4 */
893                 osso_abook_list_store_set_book_view (OSSO_ABOOK_LIST_STORE (contact_model), book_view);
894                 e_book_view_start (book_view);
895
896                 /* TODO: figure out how to make the contact chooser modal */
897                 contact_dialog = osso_abook_contact_chooser_new_with_capabilities (NULL,
898                                                                                    _("mcen_me_editor_selectrecipients"),
899                                                                                    OSSO_ABOOK_CAPS_EMAIL, 
900                                                                                    OSSO_ABOOK_CONTACT_ORDER_NAME);
901                 osso_abook_contact_chooser_set_model (OSSO_ABOOK_CONTACT_CHOOSER (contact_dialog),
902                                                       contact_model);
903
904                 if (gtk_dialog_run (GTK_DIALOG (contact_dialog)) == GTK_RESPONSE_OK)
905                         result = osso_abook_contact_chooser_get_selection (OSSO_ABOOK_CONTACT_CHOOSER (contact_dialog));
906                 e_book_view_stop (book_view);
907                 g_object_unref (book_view);
908                 gtk_widget_destroy (contact_dialog);
909 #endif /* MODEST_ABOOK_API < 4 */
910         }
911
912         return result;
913 }
914
915 static gboolean
916 resolve_address (const gchar *address, GSList **resolved_addresses, gchar **contact_id)
917 {
918         GList *resolved_contacts;
919         guint banner_timeout;
920         GtkWidget *banner = NULL;
921
922         banner_timeout = g_timeout_add (500, show_check_names_banner, &banner);
923
924         contact_model = osso_abook_contact_model_new ();
925         if (!open_addressbook_sync ()) {
926                 if (contact_model) {
927                         g_object_unref (contact_model);
928                         contact_model = NULL;
929                 }
930                 return FALSE;
931         }
932
933         resolved_contacts = get_contacts_for_name (address);
934
935         if (resolved_contacts == NULL) {
936                 /* no matching contacts for the search string */
937                 modest_platform_run_information_dialog (NULL, _("mcen_nc_no_matching_contacts"), FALSE);
938                 hide_check_names_banner (&banner, banner_timeout);
939      
940                 return FALSE;
941         }
942
943         if (g_list_length (resolved_contacts) > 1) {
944                 /* show a dialog to select the contact from the resolved ones */
945                 g_list_free (resolved_contacts);
946
947                 hide_check_names_banner (&banner, banner_timeout);     
948                 resolved_contacts = select_contacts_for_name_dialog (address);
949                 banner_timeout = g_timeout_add (500, show_check_names_banner, &banner);
950
951         }
952         
953         /* get the resolved contacts (can be no contact) */
954         if (resolved_contacts) {
955                 gboolean found;
956                 EContact *contact = (EContact *) resolved_contacts->data;
957
958                 *resolved_addresses = get_recipients_for_given_contact (contact);
959                 hide_check_names_banner (&banner, banner_timeout);     
960                 if (*resolved_addresses) {
961                         *contact_id = g_strdup (e_contact_get_const (contact, E_CONTACT_UID));
962                         found = TRUE;
963                 } else {
964                         found = FALSE;
965                 }
966
967                 g_list_foreach (resolved_contacts, (GFunc)unref_gobject, NULL);
968                 g_list_free (resolved_contacts);
969
970                 return found;
971         } else {
972                 /* cancelled dialog to select more than one contact or
973                  * selected no contact */
974                 hide_check_names_banner (&banner, banner_timeout);     
975                 return FALSE;
976         }
977
978 }
979
980 static gchar *
981 unquote_string (const gchar *str)
982 {
983         GString *buffer;
984         gchar *p;
985
986         if (str == NULL)
987                 return NULL;
988
989         buffer = g_string_new_len (NULL, strlen (str));
990         for (p = (gchar *) str; *p != '\0'; p = g_utf8_next_char (p)) {
991                 if (*p == '"') {
992                         p = g_utf8_next_char (p);
993                         while ((*p != '\0')&&(*p != '"')) {
994                                 if (*p == '\\') {
995                                         g_string_append_unichar (buffer, g_utf8_get_char (p));
996                                         p = g_utf8_next_char (p);
997                                         
998                                 }
999                                 g_string_append_unichar (buffer, g_utf8_get_char (p));
1000                                 p = g_utf8_next_char (p);
1001                         }
1002                 } else {
1003                         g_string_append_unichar (buffer, g_utf8_get_char (p));
1004                 }
1005         }
1006
1007         return g_string_free (buffer, FALSE);
1008
1009 }
1010
1011 gboolean
1012 modest_address_book_has_address (const gchar *address)
1013 {
1014         EBookQuery *query;
1015         GList *contacts = NULL;
1016         GError *err = NULL;
1017         gchar *email;
1018         gboolean result;
1019
1020         g_return_val_if_fail (address, FALSE);
1021         
1022         if (!book) {
1023                 if (!open_addressbook ()) {
1024                         g_return_val_if_reached (FALSE);
1025                 }
1026         }
1027         
1028         g_return_val_if_fail (book, FALSE);
1029
1030         email = modest_text_utils_get_email_address (address);
1031         
1032         query = e_book_query_field_test (E_CONTACT_EMAIL, E_BOOK_QUERY_IS, email);
1033         if (!e_book_get_contacts (book, query, &contacts, &err)) {
1034                 g_printerr ("modest: failed to get contacts: %s",
1035                             err ? err->message : "<unknown>");
1036                 if (err)
1037                         g_error_free (err);
1038                 return FALSE;
1039         }
1040         e_book_query_unref (query);
1041
1042         result = (contacts != NULL);
1043         if (contacts) {
1044                 g_list_foreach (contacts, (GFunc)unref_gobject, NULL);
1045                 g_list_free (contacts);
1046         }
1047         
1048         g_free (email);
1049
1050         return result;
1051 }