aboutsummaryrefslogblamecommitdiffstats
path: root/e-util/e-name-selector-entry.c
blob: a50c886e9c38ad265d782b38cf9dfe12aeda4b23 (plain) (tree)
1
2
3
4
5
6
7
8
9
1687
1688
1689
1690
1691
1692
1693
1694
1695
1696
1697
1698
1699
1700
1701
1702
1703
1704
1705
1706
1707
1708
1709
1710
1711
1712
1713
1714
1715
1716
1717
1718
1719
1720
1721
1722
1723
1724
1725
1726
1727
1728
1729
1730
1731
1732
1733
1734
1735
1736
1737
1738
1739
1740
1741
1742
1743
1744
1745
1746
1747
1748
1749
1750
1751
1752
1753
1754
1755
1756
1757
1758
1759
1760
1761
1762
1763
1764
1765
1766
1767
1768
1769
1770
1771
1772
1773
1774
1775
1776
1777
1778
1779
1780
1781
1782
1783
1784
1785
1786
1787
1788
1789
1790
1791
1792
1793
1794
1795
1796
1797
1798
1799
1800
1801
1802
1803
1804
1805
1806
1807
1808
1809
1810
1811
1812
1813
1814
1815
1816
1817
1818
1819
1820
1821
1822
1823
1824
1825
1826
1827
1828
1829
1830
1831
1832
1833
1834
1835
1836
1837
1838
1839
1840
1841
1842
1843
1844
1845
1846
1847
1848
1849
1850
1851
1852
1853
1854
1855
1856
1857
1858
1859
1860
1861
1862
1863
1864
1865
1866
1867
1868
1869
1870
1871
1872
1873
1874
1875
1876
1877
1878
1879
1880
1881
1882
1883
1884
1885
1886
1887
1888
1889
1890
1891
1892
1893
1894
1895
1896
1897
1898
1899
1900
1901
1902
1903
1904
1905
1906
1907
1908
1909
1910
1911
1912
1913
1914
1915
1916
1917
1918
1919
1920
1921
1922
1923
1924
1925
1926
1927
1928
1929
1930
1931
1932
1933
1934
1935
1936
1937
1938
1939
1940
1941
1942
1943
1944
1945
1946
1947
1948
1949
1950
1951
1952
1953
1954
1955
1956
1957
1958
1959
1960
1961
1962
1963
1964
1965
1966
1967
1968
1969
1970
1971
1972
1973
1974
1975
1976
1977
1978
1979
1980
1981
1982
1983
1984
1985
1986
1987
1988
1989
1990
1991
1992
1993
1994
1995
1996
1997
1998
1999
2000
2001
2002
2003
2004
2005
2006
2007
2008
2009
2010
2011
2012
2013
2014
2015
2016
2017
2018
2019
2020
2021
2022
2023
2024
2025
2026
2027
2028
2029
2030
2031
2032
2033
2034
2035
2036
2037
2038
2039
2040
2041
2042
2043
2044
2045
2046
2047
2048
2049
2050
2051
2052
2053
2054
2055
2056
2057
2058
2059
2060
2061
2062
2708
2709
2710
2711
2712
2713
2714
2715
2716
2717
2718
2719
2720
2721
2722
2723
2724
2725
2726
2727
2728
2729
2730
2731
2732
2733
2734
2735
2736
2737
2738
2739
2740
2741
2742
2743
2744
2745
2746
2747
2748
2749
2750
2751
2752
2753
2754
2755
2756
2757
2758
2759
2760
2761
2762
2763
2764
2765
2766
2767
2768
2769
2770
2771
2772
2773
2774
2775
2776
2777
2778
2779
2780
2781
2782
2783
2784
2785
2786
2787
2788
2789
2790
2791
2792
2793
2794
2795
2796
2797
2798
2799
2800
2801
2802
2803
2804
2805
2806
2807
2808
2809
2810
2811
2812
2813
2814
2815
2816
2817
2818
2819
2820
2821
2822
2823
2824
2825
2826
2827
2828
2829
2830
2831
2832
2833
2834
2835
2836
2837
2838
2839
2840
2841
2842
2843
2844
2845
2846
2847
2848
2849
2850
2851
2852
2853
2854
2855
2856
2857
2858
2859
2860
2861
2862
2863
2864
2865
2866
2867
2868
2869
2870
2871
2872
2873
2874
2875
2876
2877
2878
2879
2880
2881
2882
2883
2884
2885
2886
2887
2888
2889
2890
2891
2892
2893
2894
2895
2896
2897
2898
2899
2900
2901
2902
2903
2904
2905
2906
2907
2908
2909
2910
2911
2912
2913
2914
2915
2916
2917
2918
2919
2920
2921
2922
2923
2924
2925
2926
2927
2928
2929
2930
2931
2932
2933
2934
2935
2936
2937
2938
2939
2940
2941
2942
2943
2944
2945
2946
2947
2948
2949
2950
2951
2952
2953
2954
2955
2956
2957
2958
2959
2960
2961
2962
2963
2964
2965
2966
2967
2968
2969
2970
2971
2972
2973
2974
2975
2976
2977
2978
2979
2980
2981
2982
2983
2984
2985
2986
2987
2988
2989
2990
2991
2992
2993
2994
2995
2996
2997
2998
2999
3000
3001
3002
3003
3004
3005
3006
3007
3008
3009
3010
3011
3012
3013
3014
3015
3016
3017
3018
3019
3020
3021
3022
3023
3024
3025
3026
3027
3028
3029
3030
3031
3032
3033
3034
3035
3036
3037
3038
3039
3040
3041
3042
3043
3044
3045
3046
3047
3048
3049
3050
3051
3052
3053
3054
3055
3056
3057
3058
3059
3060
3061
3062
3063
3064
3065
3066
3067
3068
3069
3070
3071
3072
3073
3074
3075
3076
3077
3078
3079
3080
3081
3082
3083
3084
3085
3086
3087
3088
3089
3090
3091
3092
3093
3094
3095
3096
3097
3098
3099
3100
3101
3102
3103
3104
3105
3106
3107
3108
3109
3110
3111
3112
3113
3114
3115
3116
3117
3118
3119
3120
3121
3122
3123





                                                                             


                                                                           
  



                                                                             
  

                                                                           










                                                






                                                                       
                                   
































                                                               
                          





















                                                                  


                                                                



                                                         
                    

















                                                                                                                                                  

                                                                


























                                                                        

                                             
                                      
                                                                        



























                                                                                


                                                    















































































































































                                                                                  




                                              

                                         
                                  
                                     



                                                            

























































































































                                                                                     
                                    
                                         
                                       




























































                                                                                           
                           




















































                                                                                 
                                                           



























































































































































































                                                                                                                     
                                                       
                                                                      

                                                                                                                  





























































                                                                                         

                                                   
 
                           

                            
                 




                                         
                                                                  


                                                                           
                                     
                                    


                                                                        
























                                                                   

                                            

                                                                                               
                                                      




















                                                                                          

                                                                        

                                  
                                                 


                                                                   
                                                 

                                 







                                                                    
 


                                                                                  
 
                                                                                         
 






                                                                                        
 



                                                    
                                            
                 
                                                  










                                                                  
                                                  


                                                    
                                           

                                                  
                                           














                                                                                                              
                                                 






                                                                                                                
                                                                                                                                                     
                                                                      
                                                       
                                                             
                                                   
                                                                                                                        
                                                           
                 
 







                                                                                                              
                                                                                             



                                                

                                                    


































































                                                                                            
                                         

                                       

                                     























                                                                                     
                                                                                                     








                                                  
                          

































                                                              

                                                     


































                                                                                                       
                                   
 
                                                                    

















                                                                                                                    
                                                      
 


                                                                

                                                                 
 



                     
                                                     
 


                                                                

                                                                
 


















































































































































































































                                                                                                       
                                            

































































































                                                                                                     

                                                                            

                                                                               

                                                                             

                                                                               









































                                                                                                       

                                                                            

                                                                              


                                                              
                                                          


















































                                                                                                                       
                                                                  










                                                                                                          
                                                                              


















                                                                                                          
                                                 
 
                                                                                                                  























































































































































































































































































































































































                                                                                                                                                     
                                     







                                                          
                                                                           



                                                           



                             





                                                                                                              
                                                         


























































                                                                                                                              
                                     






                                                          
                                                                           



                                                           



                             


















































                                                                                                              
                                                                    

                                                                        


                                                                             

                                                                               
         







































                                                                                                   


                                                          

                                                 
                                 
                        

                             

                                                                




                                                        

                                                                        




                                     
                                                                
















                                                                     
                                   












                                                                                            

                                                                                    
 
                                                                         









                                                                            









                                                                      




                                                          
                                                      



                                                                 


                                      




















































                                                                                                               
                                          








































































































































































































































































































                                                                                                                        
                                                                                                                                   































































































































































































































































































































































































































                                                                                                                                  

                                     
                                     



                                                         









                                                               
                               
                           
                                          











                                                                        



                                                               
















                                                                          
                      

                                                              







                                                                           





                                                                      




                                                                        


                                                                  

                                                                                                           


                                                                  
                                                                                      







                                                                                                    




                                                                                              

                              


































































































































                                                                                  
                                  




                                      

                                                      
 
                                                                      


                                           
                                                    


   
                                          

                                               
                                                                   
  

                                                                         
  


                            
    

                                                                                



                                                                      



                                                                      


   
                                          
                                               
                                  
  
                                                      

                                                                    
                                                                     




                                 

                                                                                


                                                                          
                                                                    

                       


                                                                    

         

                                                                         
 
                                                               
 
                                                                         








































































































































































































                                                                                            
/* -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8 -*- */

/* e-name-selector-entry.c - Single-line text entry widget for EDestinations.
 *
 * Copyright (C) 1999-2008 Novell, Inc. (www.novell.com)
 *
 * This program is free software; you can redistribute it and/or modify it
 * under the terms of the GNU Lesser General Public License as published by
 * the Free Software Foundation.
 *
 * This program is distributed in the hope that it will be useful, but
 * WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
 * or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
 * for more details.
 *
 * You should have received a copy of the GNU Lesser General Public License
 * along with this program; if not, see <http://www.gnu.org/licenses/>.
 *
 * Authors: Hans Petter Jansson <hpj@novell.com>
 */

#include <config.h>
#include <string.h>
#include <glib/gi18n-lib.h>

#include <camel/camel.h>
#include <libebackend/libebackend.h>

#include "e-name-selector-entry.h"

#define E_NAME_SELECTOR_ENTRY_GET_PRIVATE(obj) \
    (G_TYPE_INSTANCE_GET_PRIVATE \
    ((obj), E_TYPE_NAME_SELECTOR_ENTRY, ENameSelectorEntryPrivate))

struct _ENameSelectorEntryPrivate {
    EClientCache *client_cache;
    gint minimum_query_length;
    gboolean show_address;

    PangoAttrList *attr_list;
    EContactStore *contact_store;
    ETreeModelGenerator *email_generator;
    EDestinationStore *destination_store;
    GtkEntryCompletion *entry_completion;

    guint type_ahead_complete_cb_id;
    guint update_completions_cb_id;

    EDestination *popup_destination;

    gpointer    (*contact_editor_func)  (EBookClient *,
                         EContact *,
                         gboolean,
                         gboolean);
    gpointer    (*contact_list_editor_func)
                        (EBookClient *,
                         EContact *,
                         gboolean,
                         gboolean);

    gboolean is_completing;
    GSList *user_query_fields;

    /* For asynchronous operations. */
    GQueue cancellables;
};

enum {
    PROP_0,
    PROP_CLIENT_CACHE,
    PROP_MINIMUM_QUERY_LENGTH,
    PROP_SHOW_ADDRESS
};

enum {
    UPDATED,
    LAST_SIGNAL
};

static guint signals[LAST_SIGNAL] = { 0 };
#define ENS_DEBUG(x)

G_DEFINE_TYPE_WITH_CODE (
    ENameSelectorEntry,
    e_name_selector_entry,
    GTK_TYPE_ENTRY,
    G_IMPLEMENT_INTERFACE (
        E_TYPE_EXTENSIBLE, NULL))

/* 1/3 of the second to wait until invoking autocomplete lookup */
#define AUTOCOMPLETE_TIMEOUT 333

/* 1/20 of a second to wait until show the completion results */
#define SHOW_RESULT_TIMEOUT 50

#define re_set_timeout(id,func,ptr,tout) G_STMT_START { \
    if (id) \
        g_source_remove (id); \
    id = e_named_timeout_add (tout, func, ptr); \
    } G_STMT_END

static void destination_row_inserted (ENameSelectorEntry *name_selector_entry, GtkTreePath *path, GtkTreeIter *iter);
static void destination_row_changed  (ENameSelectorEntry *name_selector_entry, GtkTreePath *path, GtkTreeIter *iter);
static void destination_row_deleted  (ENameSelectorEntry *name_selector_entry, GtkTreePath *path);

static void user_insert_text (ENameSelectorEntry *name_selector_entry, gchar *new_text, gint new_text_length, gint *position, gpointer user_data);
static void user_delete_text (ENameSelectorEntry *name_selector_entry, gint start_pos, gint end_pos, gpointer user_data);

static void setup_default_contact_store (ENameSelectorEntry *name_selector_entry);
static void deep_free_list (GList *list);

static void
name_selector_entry_set_property (GObject *object,
                                  guint property_id,
                                  const GValue *value,
                                  GParamSpec *pspec)
{
    switch (property_id) {
        case PROP_CLIENT_CACHE:
            e_name_selector_entry_set_client_cache (
                E_NAME_SELECTOR_ENTRY (object),
                g_value_get_object (value));
            return;

        case PROP_MINIMUM_QUERY_LENGTH:
            e_name_selector_entry_set_minimum_query_length (
                E_NAME_SELECTOR_ENTRY (object),
                g_value_get_int (value));
            return;

        case PROP_SHOW_ADDRESS:
            e_name_selector_entry_set_show_address (
                E_NAME_SELECTOR_ENTRY (object),
                g_value_get_boolean (value));
            return;
    }

    G_OBJECT_WARN_INVALID_PROPERTY_ID (object, property_id, pspec);
}

static void
name_selector_entry_get_property (GObject *object,
                                  guint property_id,
                                  GValue *value,
                                  GParamSpec *pspec)
{
    switch (property_id) {
        case PROP_CLIENT_CACHE:
            g_value_take_object (
                value,
                e_name_selector_entry_ref_client_cache (
                E_NAME_SELECTOR_ENTRY (object)));
            return;

        case PROP_MINIMUM_QUERY_LENGTH:
            g_value_set_int (
                value,
                e_name_selector_entry_get_minimum_query_length (
                E_NAME_SELECTOR_ENTRY (object)));
            return;

        case PROP_SHOW_ADDRESS:
            g_value_set_boolean (
                value,
                e_name_selector_entry_get_show_address (
                E_NAME_SELECTOR_ENTRY (object)));
            return;
    }

    G_OBJECT_WARN_INVALID_PROPERTY_ID (object, property_id, pspec);
}

static void
name_selector_entry_dispose (GObject *object)
{
    ENameSelectorEntryPrivate *priv;

    priv = E_NAME_SELECTOR_ENTRY_GET_PRIVATE (object);

    if (priv->client_cache != NULL) {
        g_object_unref (priv->client_cache);
        priv->client_cache = NULL;
    }

    if (priv->attr_list != NULL) {
        pango_attr_list_unref (priv->attr_list);
        priv->attr_list = NULL;
    }

    if (priv->entry_completion) {
        g_object_unref (priv->entry_completion);
        priv->entry_completion = NULL;
    }

    if (priv->destination_store) {
        g_object_unref (priv->destination_store);
        priv->destination_store = NULL;
    }

    if (priv->email_generator) {
        g_object_unref (priv->email_generator);
        priv->email_generator = NULL;
    }

    if (priv->contact_store) {
        g_object_unref (priv->contact_store);
        priv->contact_store = NULL;
    }

    g_slist_foreach (priv->user_query_fields, (GFunc) g_free, NULL);
    g_slist_free (priv->user_query_fields);
    priv->user_query_fields = NULL;

    /* Cancel any stuck book loading operations. */
    while (!g_queue_is_empty (&priv->cancellables)) {
        GCancellable *cancellable;

        cancellable = g_queue_pop_head (&priv->cancellables);
        g_cancellable_cancel (cancellable);
        g_object_unref (cancellable);
    }

    /* Chain up to parent's dispose() method. */
    G_OBJECT_CLASS (e_name_selector_entry_parent_class)->dispose (object);
}

static void
name_selector_entry_constructed (GObject *object)
{
    /* Chain up to parent's constructed() method. */
    G_OBJECT_CLASS (e_name_selector_entry_parent_class)->
        constructed (object);

    e_extensible_load_extensions (E_EXTENSIBLE (object));
}

static void
name_selector_entry_realize (GtkWidget *widget)
{
    ENameSelectorEntryPrivate *priv;

    priv = E_NAME_SELECTOR_ENTRY_GET_PRIVATE (widget);

    /* Chain up to parent's realize() method. */
    GTK_WIDGET_CLASS (e_name_selector_entry_parent_class)->realize (widget);

    if (priv->contact_store == NULL)
        setup_default_contact_store (E_NAME_SELECTOR_ENTRY (widget));
}

static void
name_selector_entry_drag_data_received (GtkWidget *widget,
                                        GdkDragContext *context,
                                        gint x,
                                        gint y,
                                        GtkSelectionData *selection_data,
                                        guint info,
                                        guint time)
{
    CamelInternetAddress *address;
    gint n_addresses = 0;
    gchar *text;

    address = camel_internet_address_new ();
    text = (gchar *) gtk_selection_data_get_text (selection_data);

    /* See if Camel can parse a valid email address from the text. */
    if (text != NULL && *text != '\0') {
        camel_url_decode (text);
        if (g_ascii_strncasecmp (text, "mailto:", 7) == 0)
            n_addresses = camel_address_decode (
                CAMEL_ADDRESS (address), text + 7);
        else
            n_addresses = camel_address_decode (
                CAMEL_ADDRESS (address), text);
    }

    if (n_addresses > 0) {
        GtkEditable *editable;
        GdkDragAction action;
        gboolean delete;
        gint position;

        editable = GTK_EDITABLE (widget);
        gtk_editable_set_position (editable, -1);
        position = gtk_editable_get_position (editable);

        g_free (text);

        text = camel_address_format (CAMEL_ADDRESS (address));
        gtk_editable_insert_text (editable, text, -1, &position);

        action = gdk_drag_context_get_selected_action (context);
        delete = (action == GDK_ACTION_MOVE);
        gtk_drag_finish (context, TRUE, delete, time);
    }

    g_object_unref (address);
    g_free (text);

    if (n_addresses <= 0)
        /* Chain up to parent's drag_data_received() method. */
        GTK_WIDGET_CLASS (e_name_selector_entry_parent_class)->
            drag_data_received (
                widget, context, x, y,
                selection_data, info, time);
}

static void
e_name_selector_entry_class_init (ENameSelectorEntryClass *class)
{
    GObjectClass *object_class;
    GtkWidgetClass *widget_class;

    g_type_class_add_private (class, sizeof (ENameSelectorEntryPrivate));

    object_class = G_OBJECT_CLASS (class);
    object_class->set_property = name_selector_entry_set_property;
    object_class->get_property = name_selector_entry_get_property;
    object_class->dispose = name_selector_entry_dispose;
    object_class->constructed = name_selector_entry_constructed;

    widget_class = GTK_WIDGET_CLASS (class);
    widget_class->realize = name_selector_entry_realize;
    widget_class->drag_data_received = name_selector_entry_drag_data_received;

    /**
     * ENameSelectorEntry:client-cache:
     *
     * Cache of shared #EClient instances.
     **/
    g_object_class_install_property (
        object_class,
        PROP_CLIENT_CACHE,
        g_param_spec_object (
            "client-cache",
            "Client Cache",
            "Cache of shared EClient instances",
            E_TYPE_CLIENT_CACHE,
            G_PARAM_READWRITE |
            G_PARAM_CONSTRUCT |
            G_PARAM_STATIC_STRINGS));

    g_object_class_install_property (
        object_class,
        PROP_MINIMUM_QUERY_LENGTH,
        g_param_spec_int (
            "minimum-query-length",
            "Minimum Query Length",
            NULL,
            1, G_MAXINT,
            3,
            G_PARAM_READWRITE |
            G_PARAM_STATIC_STRINGS));

    g_object_class_install_property (
        object_class,
        PROP_SHOW_ADDRESS,
        g_param_spec_boolean (
            "show-address",
            "Show Address",
            NULL,
            FALSE,
            G_PARAM_READWRITE |
            G_PARAM_STATIC_STRINGS));

    signals[UPDATED] = g_signal_new (
        "updated",
        E_TYPE_NAME_SELECTOR_ENTRY,
        G_SIGNAL_RUN_FIRST,
        G_STRUCT_OFFSET (ENameSelectorEntryClass, updated),
        NULL, NULL,
        g_cclosure_marshal_VOID__POINTER,
        G_TYPE_NONE, 1, G_TYPE_POINTER);
}

/* Remove unquoted commas and control characters from string */
static gchar *
sanitize_string (const gchar *string)
{
    GString     *gstring;
    gboolean     quoted = FALSE;
    const gchar *p;

    gstring = g_string_new ("");

    if (!string)
        return g_string_free (gstring, FALSE);

    for (p = string; *p; p = g_utf8_next_char (p)) {
        gunichar c = g_utf8_get_char (p);

        if (c == '"')
            quoted = ~quoted;
        else if (c == ',' && !quoted)
            continue;
        else if (c == '\t' || c == '\n')
            continue;

        g_string_append_unichar (gstring, c);
    }

    return g_string_free (gstring, FALSE);
}

/* Called for each list store entry whenever the user types (but not on cut/paste) */
static gboolean
completion_match_cb (GtkEntryCompletion *completion,
                     const gchar *key,
                     GtkTreeIter *iter,
                     gpointer user_data)
{
    ENS_DEBUG (g_print ("completion_match_cb, key=%s\n", key));

    return TRUE;
}

/* Gets context of n_unichars total (n_unicars / 2, before and after position)
 * and places them in array. If any positions would be outside the string, the
 * corresponding unichars are set to zero. */
static void
get_utf8_string_context (const gchar *string,
                         gint position,
                         gunichar *unichars,
                         gint n_unichars)
{
    gchar *p = NULL;
    gint   len;
    gint   gap;
    gint   i;

    /* n_unichars must be even */
    g_assert (n_unichars % 2 == 0);

    len = g_utf8_strlen (string, -1);
    gap = n_unichars / 2;

    for (i = 0; i < n_unichars; i++) {
        gint char_pos = position - gap + i;

        if (char_pos < 0 || char_pos >= len) {
            unichars[i] = '\0';
            continue;
        }

        if (p)
            p = g_utf8_next_char (p);
        else
            p = g_utf8_offset_to_pointer (string, char_pos);

        unichars[i] = g_utf8_get_char (p);
    }
}

static gboolean
get_range_at_position (const gchar *string,
                       gint pos,
                       gint *start_pos,
                       gint *end_pos)
{
    const gchar *p;
    gboolean     quoted = FALSE;
    gint         local_start_pos = 0;
    gint         local_end_pos = 0;
    gint         i;

    if (!string || !*string)
        return FALSE;

    for (p = string, i = 0; *p; p = g_utf8_next_char (p), i++) {
        gunichar c = g_utf8_get_char (p);

        if (c == '"') {
            quoted = ~quoted;
        } else if (c == ',' && !quoted) {
            if (i < pos) {
                /* Start right after comma */
                local_start_pos = i + 1;
            } else {
                /* Stop right before comma */
                local_end_pos = i;
                break;
            }
        } else if (c == ' ' && local_start_pos == i) {
            /* Adjust start to skip space after first comma */
            local_start_pos++;
        }
    }

    /* If we didn't hit a comma, we must've hit NULL, and ours was the last element. */
    if (!local_end_pos)
        local_end_pos = i;

    if (start_pos)
        *start_pos = local_start_pos;
    if (end_pos)
        *end_pos   = local_end_pos;

    return TRUE;
}

static gboolean
is_quoted_at (const gchar *string,
              gint pos)
{
    const gchar *p;
    gboolean     quoted = FALSE;
    gint         i;

    for (p = string, i = 0; *p && i < pos; p = g_utf8_next_char (p), i++) {
        gunichar c = g_utf8_get_char (p);

        if (c == '"')
            quoted = ~quoted;
    }

    return quoted ? TRUE : FALSE;
}

static gint
get_index_at_position (const gchar *string,
                       gint pos)
{
    const gchar *p;
    gboolean     quoted = FALSE;
    gint         n = 0;
    gint         i;

    for (p = string, i = 0; *p && i < pos; p = g_utf8_next_char (p), i++) {
        gunichar c = g_utf8_get_char (p);

        if (c == '"')
            quoted = ~quoted;
        else if (c == ',' && !quoted)
            n++;
    }

    return n;
}

static gboolean
get_range_by_index (const gchar *string,
                    gint index,
                    gint *start_pos,
                    gint *end_pos)
{
    const gchar *p;
    gboolean     quoted = FALSE;
    gint         i;
    gint         n = 0;

    for (p = string, i = 0; *p && n < index; p = g_utf8_next_char (p), i++) {
        gunichar c = g_utf8_get_char (p);

        if (c == '"')
            quoted = ~quoted;
        if (c == ',' && !quoted)
            n++;
    }

    if (n < index)
        return FALSE;

    return get_range_at_position (string, i, start_pos, end_pos);
}

static gchar *
get_address_at_position (const gchar *string,
                         gint pos)
{
    gint         start_pos;
    gint         end_pos;
    const gchar *start_p;
    const gchar *end_p;

    if (!get_range_at_position (string, pos, &start_pos, &end_pos))
        return NULL;

    start_p = g_utf8_offset_to_pointer (string, start_pos);
    end_p = g_utf8_offset_to_pointer (string, end_pos);

    return g_strndup (start_p, end_p - start_p);
}

/* Finds the destination in model */
static EDestination *
find_destination_by_index (ENameSelectorEntry *name_selector_entry,
                           gint index)
{
    GtkTreePath  *path;
    GtkTreeIter   iter;

    path = gtk_tree_path_new_from_indices (index, -1);
    if (!gtk_tree_model_get_iter (GTK_TREE_MODEL (name_selector_entry->priv->destination_store),
                      &iter, path)) {
        /* If we have zero destinations, getting a NULL destination at index 0
         * is valid. */
        if (index > 0)
            g_warning ("ENameSelectorEntry is out of sync with model!");
        gtk_tree_path_free (path);
        return NULL;
    }
    gtk_tree_path_free (path);

    return e_destination_store_get_destination (name_selector_entry->priv->destination_store, &iter);
}

/* Finds the destination in model */
static EDestination *
find_destination_at_position (ENameSelectorEntry *name_selector_entry,
                              gint pos)
{
    const gchar  *text;
    gint          index;

    text = gtk_entry_get_text (GTK_ENTRY (name_selector_entry));
    index = get_index_at_position (text, pos);

    return find_destination_by_index (name_selector_entry, index);
}

/* Builds destination from our text */
static EDestination *
build_destination_at_position (const gchar *string,
                               gint pos)
{
    EDestination *destination;
    gchar        *address;

    address = get_address_at_position (string, pos);
    if (!address)
        return NULL;

    destination = e_destination_new ();
    e_destination_set_raw (destination, address);

    g_free (address);
    return destination;
}

static gchar *
name_style_query (const gchar *field,
                  const gchar *value)
{
    gchar   *spaced_str;
    gchar   *comma_str;
    GString *out = g_string_new ("");
    gchar  **strv;
    gchar   *query;

    spaced_str = sanitize_string (value);
    g_strstrip (spaced_str);

    strv = g_strsplit (spaced_str, " ", 0);

    if (strv[0] && strv[1]) {
        g_string_append (out, "(or ");
        comma_str = g_strjoinv (", ", strv);
    } else {
        comma_str = NULL;
    }

    g_string_append (out, " (beginswith ");
    e_sexp_encode_string (out, field);
    e_sexp_encode_string (out, spaced_str);
    g_string_append (out, ")");

    if (comma_str) {
        g_string_append (out, " (beginswith ");

        e_sexp_encode_string (out, field);
        g_strstrip (comma_str);
        e_sexp_encode_string (out, comma_str);
        g_string_append (out, "))");
    }

    query = g_string_free (out, FALSE);

    g_free (spaced_str);
    g_free (comma_str);
    g_strfreev (strv);

    return query;
}

static gchar *
escape_sexp_string (const gchar *string)
{
    GString *gstring;
    gchar   *encoded_string;

    gstring = g_string_new ("");
    e_sexp_encode_string (gstring, string);

    encoded_string = gstring->str;
    g_string_free (gstring, FALSE);

    return encoded_string;
}

/**
 * ens_util_populate_user_query_fields:
 *
 * Populates list of user query fields to string usable in query string.
 * Returned pointer is either newly allocated string, supposed to be freed with g_free,
 * or NULL if no fields defined.
 *
 * Since: 2.24
 **/
gchar *
ens_util_populate_user_query_fields (GSList *user_query_fields,
                                     const gchar *cue_str,
                                     const gchar *encoded_cue_str)
{
    GString *user_fields;
    GSList *s;

    g_return_val_if_fail (cue_str != NULL, NULL);
    g_return_val_if_fail (encoded_cue_str != NULL, NULL);

    user_fields = g_string_new ("");

    for (s = user_query_fields; s; s = s->next) {
        const gchar *field = s->data;

        if (!field || !*field)
            continue;

        if (*field == '$') {
            g_string_append_printf (user_fields, " (beginswith \"%s\" %s) ", field + 1, encoded_cue_str);
        } else if (*field == '@') {
            g_string_append_printf (user_fields, " (is \"%s\" %s) ", field + 1, encoded_cue_str);
        } else {
            gchar *tmp = name_style_query (field, cue_str);

            g_string_append (user_fields, " ");
            g_string_append (user_fields, tmp);
            g_string_append (user_fields, " ");
            g_free (tmp);
        }
    }

    return g_string_free (user_fields, !user_fields->str || !*user_fields->str);
}

static void
set_completion_query (ENameSelectorEntry *name_selector_entry,
                      const gchar *cue_str)
{
    ENameSelectorEntryPrivate *priv;
    EBookQuery *book_query;
    gchar      *query_str;
    gchar      *encoded_cue_str;
    gchar      *full_name_query_str;
    gchar      *file_as_query_str;
    gchar      *user_fields_str;

    priv = E_NAME_SELECTOR_ENTRY_GET_PRIVATE (name_selector_entry);

    if (!name_selector_entry->priv->contact_store)
        return;

    if (!cue_str) {
        /* Clear the store */
        e_contact_store_set_query (name_selector_entry->priv->contact_store, NULL);
        return;
    }

    encoded_cue_str = escape_sexp_string (cue_str);
    full_name_query_str = name_style_query ("full_name", cue_str);
    file_as_query_str = name_style_query ("file_as",   cue_str);
    user_fields_str = ens_util_populate_user_query_fields (priv->user_query_fields, cue_str, encoded_cue_str);

    query_str = g_strdup_printf (
        "(or "
        " (beginswith \"nickname\"  %s) "
        " (beginswith \"email\"     %s) "
        " %s "
        " %s "
        " %s "
        ")",
        encoded_cue_str, encoded_cue_str,
        full_name_query_str, file_as_query_str,
        user_fields_str ? user_fields_str : "");

    g_free (user_fields_str);
    g_free (file_as_query_str);
    g_free (full_name_query_str);
    g_free (encoded_cue_str);

    ENS_DEBUG (g_print ("%s\n", query_str));

    book_query = e_book_query_from_string (query_str);
    e_contact_store_set_query (name_selector_entry->priv->contact_store, book_query);
    e_book_query_unref (book_query);

    g_free (query_str);
}

static gchar *
get_entry_substring (ENameSelectorEntry *name_selector_entry,
                     gint range_start,
                     gint range_end)
{
    const gchar *entry_text;
    gchar       *p0, *p1;

    entry_text = gtk_entry_get_text (GTK_ENTRY (name_selector_entry));

    p0 = g_utf8_offset_to_pointer (entry_text, range_start);
    p1 = g_utf8_offset_to_pointer (entry_text, range_end);

    return g_strndup (p0, p1 - p0);
}

static gint
utf8_casefold_collate_len (const gchar *str1,
                           const gchar *str2,
                           gint len)
{
    gchar *s1 = g_utf8_casefold (str1, len);
    gchar *s2 = g_utf8_casefold (str2, len);
    gint rv;

    rv = g_utf8_collate (s1, s2);

    g_free (s1);
    g_free (s2);

    return rv;
}

static gchar *
build_textrep_for_contact (EContact *contact,
                           EContactField cue_field,
                           gint email_num)
{
    gchar *name = NULL;
    gchar *email = NULL;
    gchar *textrep;
    GList *l;

    switch (cue_field) {
        case E_CONTACT_FULL_NAME:
        case E_CONTACT_NICKNAME:
        case E_CONTACT_FILE_AS:
            name = e_contact_get (contact, cue_field);
            email = e_contact_get (contact, E_CONTACT_EMAIL_1);
            break;

        case E_CONTACT_EMAIL:
            name = NULL;
            l = e_contact_get (contact, cue_field);
            email = strdup (g_list_nth_data (l, email_num));
            g_list_free_full (l, g_free);
            break;

        default:
            g_assert_not_reached ();
            break;
    }

    g_assert (email);
    g_assert (strlen (email) > 0);

    if (name)
        textrep = g_strdup_printf ("%s <%s>", name, email);
    else
        textrep = g_strdup_printf ("%s", email);

    g_free (name);
    g_free (email);
    return textrep;
}

static gboolean
contact_match_cue (ENameSelectorEntry *name_selector_entry,
                   EContact *contact,
                   const gchar *cue_str,
                   EContactField *matched_field,
                   gint *matched_field_rank,
                   gint *matched_email_num)
{
    EContactField  fields[] = { E_CONTACT_FULL_NAME, E_CONTACT_NICKNAME, E_CONTACT_FILE_AS,
                    E_CONTACT_EMAIL };
    gchar         *email;
    gboolean       result = FALSE;
    gint           cue_len;
    gint           i;

    g_assert (contact);
    g_assert (cue_str);

    if (g_utf8_strlen (cue_str, -1) < name_selector_entry->priv->minimum_query_length)
        return FALSE;

    cue_len = strlen (cue_str);

    /* Make sure contact has an email address */
    email = e_contact_get (contact, E_CONTACT_EMAIL_1);
    if (!email || !*email) {
        g_free (email);
        return FALSE;
    }
    g_free (email);

    for (i = 0; i < G_N_ELEMENTS (fields) && result == FALSE; i++) {
        gint   email_num;
        gchar *value;
        gchar *value_sane;
        GList *emails = NULL, *ll = NULL;

        /* Don't match e-mail addresses in contact lists */
        if (e_contact_get (contact, E_CONTACT_IS_LIST) &&
            fields[i] == E_CONTACT_EMAIL)
            continue;

        if (fields[i] == E_CONTACT_EMAIL) {
            emails = e_contact_get (contact, fields[i]);
        } else {
            value = e_contact_get (contact, fields[i]);
            if (!value)
                continue;
            emails = g_list_append (emails, value);
        }

        for (ll = emails, email_num = 0; ll; ll = ll->next, email_num++) {
            value = ll->data;
            value_sane = sanitize_string (value);

            ENS_DEBUG (g_print ("Comparing '%s' to '%s'\n", value, cue_str));

            if (!utf8_casefold_collate_len (value_sane, cue_str, cue_len)) {
                if (matched_field)
                    *matched_field = fields[i];
                if (matched_field_rank)
                    *matched_field_rank = i;
                if (matched_email_num)
                    *matched_email_num = email_num;

                result = TRUE;
                g_free (value_sane);
                break;
            }
            g_free (value_sane);
        }
        g_list_free_full (emails, g_free);
    }

    return result;
}

static gboolean
find_existing_completion (ENameSelectorEntry *name_selector_entry,
                          const gchar *cue_str,
                          EContact **contact,
                          gchar **text,
                          EContactField *matched_field,
                          gint *matched_email_num,
                          EBookClient **book_client)
{
    GtkTreeIter    iter;
    EContact      *best_contact = NULL;
    gint           best_field_rank = G_MAXINT;
    EContactField  best_field = 0;
    gint           best_email_num = -1;
    EBookClient   *best_book_client = NULL;

    g_assert (cue_str);

    if (!name_selector_entry->priv->contact_store)
        return FALSE;

    ENS_DEBUG (g_print ("Completing '%s'\n", cue_str));

    if (!gtk_tree_model_get_iter_first (GTK_TREE_MODEL (name_selector_entry->priv->contact_store), &iter))
        return FALSE;

    do {
        EContact      *current_contact;
        gint           current_field_rank;
        gint           current_email_num;
        EContactField  current_field;
        gboolean       matches;

        current_contact = e_contact_store_get_contact (name_selector_entry->priv->contact_store, &iter);
        if (!current_contact)
            continue;

        matches = contact_match_cue (name_selector_entry, current_contact, cue_str, &current_field, &current_field_rank, &current_email_num);
        if (matches && current_field_rank < best_field_rank) {
            best_contact = current_contact;
            best_field_rank = current_field_rank;
            best_field = current_field;
            best_book_client = e_contact_store_get_client (name_selector_entry->priv->contact_store, &iter);
            best_email_num = current_email_num;
        }

    } while (gtk_tree_model_iter_next (GTK_TREE_MODEL (name_selector_entry->priv->contact_store), &iter));

    if (!best_contact)
        return FALSE;

    if (contact)
        *contact = best_contact;
    if (text)
        *text = build_textrep_for_contact (best_contact, best_field, best_email_num);
    if (matched_field)
        *matched_field = best_field;
    if (book_client)
        *book_client = best_book_client;
    if (matched_email_num)
        *matched_email_num = best_email_num;
    return TRUE;
}

static void
generate_attribute_list (ENameSelectorEntry *name_selector_entry)
{
    PangoLayout    *layout;
    PangoAttrList  *attr_list;
    const gchar    *text;
    gint            i;

    text = gtk_entry_get_text (GTK_ENTRY (name_selector_entry));
    layout = gtk_entry_get_layout (GTK_ENTRY (name_selector_entry));

    /* Set up the attribute list */

    attr_list = pango_attr_list_new ();

    if (name_selector_entry->priv->attr_list)
        pango_attr_list_unref (name_selector_entry->priv->attr_list);

    name_selector_entry->priv->attr_list = attr_list;

    /* Parse the entry's text and apply attributes to real contacts */

    for (i = 0; ; i++) {
        EDestination   *destination;
        PangoAttribute *attr;
        gint            start_pos;
        gint            end_pos;

        if (!get_range_by_index (text, i, &start_pos, &end_pos))
            break;

        destination = find_destination_at_position (name_selector_entry, start_pos);

        /* Destination will be NULL if we have no entries */
        if (!destination || !e_destination_get_contact (destination))
            continue;

        attr = pango_attr_underline_new (PANGO_UNDERLINE_SINGLE);
        attr->start_index = g_utf8_offset_to_pointer (text, start_pos) - text;
        attr->end_index = g_utf8_offset_to_pointer (text, end_pos) - text;
        pango_attr_list_insert (attr_list, attr);
    }

    pango_layout_set_attributes (layout, attr_list);
}

static gboolean
draw_event (ENameSelectorEntry *name_selector_entry)
{
    PangoLayout *layout;

    layout = gtk_entry_get_layout (GTK_ENTRY (name_selector_entry));
    pango_layout_set_attributes (layout, name_selector_entry->priv->attr_list);

    return FALSE;
}

static void
type_ahead_complete (ENameSelectorEntry *name_selector_entry)
{
    EContact      *contact;
    EBookClient   *book_client = NULL;
    EContactField  matched_field;
    EDestination  *destination;
    gint           matched_email_num;
    gint           cursor_pos;
    gint           range_start = 0;
    gint           range_end = 0;
    gint           pos = 0;
    gchar         *textrep;
    gint           textrep_len;
    gint           range_len;
    const gchar   *text;
    gchar         *cue_str;
    gchar         *temp_str;
    ENameSelectorEntryPrivate *priv;

    priv = E_NAME_SELECTOR_ENTRY_GET_PRIVATE (name_selector_entry);

    cursor_pos = gtk_editable_get_position (GTK_EDITABLE (name_selector_entry));
    if (cursor_pos < 0)
        return;

    text = gtk_entry_get_text (GTK_ENTRY (name_selector_entry));
    get_range_at_position (text, cursor_pos, &range_start, &range_end);
    range_len = range_end - range_start;
    if (range_len < priv->minimum_query_length)
        return;

    destination = find_destination_at_position (name_selector_entry, cursor_pos);

    cue_str = get_entry_substring (name_selector_entry, range_start, range_end);
    if (!find_existing_completion (name_selector_entry, cue_str, &contact,
                       &textrep, &matched_field, &matched_email_num, &book_client)) {
        g_free (cue_str);
        return;
    }

    temp_str = sanitize_string (textrep);
    g_free (textrep);
    textrep = temp_str;

    textrep_len = g_utf8_strlen (textrep, -1);
    pos = range_start;

    g_signal_handlers_block_by_func (
        name_selector_entry,
        user_insert_text, name_selector_entry);
    g_signal_handlers_block_by_func (
        name_selector_entry,
        user_delete_text, name_selector_entry);
    g_signal_handlers_block_by_func (
        name_selector_entry->priv->destination_store,
        destination_row_changed, name_selector_entry);

    if (textrep_len > range_len) {
        gint i;

        /* keep character's case as user types */
        for (i = 0; textrep[i] && cue_str[i]; i++)
            textrep[i] = cue_str[i];

        gtk_editable_delete_text (
            GTK_EDITABLE (name_selector_entry),
            range_start, range_end);
        gtk_editable_insert_text (
            GTK_EDITABLE (name_selector_entry),
            textrep, -1, &pos);
        gtk_editable_select_region (
            GTK_EDITABLE (name_selector_entry),
            range_end, range_start + textrep_len);
        priv->is_completing = TRUE;
    }
    g_free (cue_str);

    if (contact && destination) {
        gint email_n = 0;

        if (matched_field == E_CONTACT_EMAIL)
            email_n = matched_email_num;
        e_destination_set_contact (destination, contact, email_n);
        if (book_client)
            e_destination_set_client (destination, book_client);
        generate_attribute_list (name_selector_entry);
    }

    g_signal_handlers_unblock_by_func (
        name_selector_entry->priv->destination_store,
        destination_row_changed, name_selector_entry);
    g_signal_handlers_unblock_by_func (name_selector_entry, user_delete_text, name_selector_entry);
    g_signal_handlers_unblock_by_func (name_selector_entry, user_insert_text, name_selector_entry);

    g_free (textrep);
}

static void
clear_completion_model (ENameSelectorEntry *name_selector_entry)
{
    ENameSelectorEntryPrivate *priv;

    priv = E_NAME_SELECTOR_ENTRY_GET_PRIVATE (name_selector_entry);

    if (!name_selector_entry->priv->contact_store)
        return;

    e_contact_store_set_query (name_selector_entry->priv->contact_store, NULL);
    priv->is_completing = FALSE;
}

static void
update_completion_model (ENameSelectorEntry *name_selector_entry)
{
    const gchar *text;
    gint         cursor_pos;
    gint         range_start = 0;
    gint         range_end = 0;

    text = gtk_entry_get_text (GTK_ENTRY (name_selector_entry));
    cursor_pos = gtk_editable_get_position (GTK_EDITABLE (name_selector_entry));

    if (cursor_pos >= 0)
        get_range_at_position (text, cursor_pos, &range_start, &range_end);

    if (range_end - range_start >= name_selector_entry->priv->minimum_query_length && cursor_pos == range_end) {
        gchar *cue_str;

        cue_str = get_entry_substring (name_selector_entry, range_start, range_end);
        set_completion_query (name_selector_entry, cue_str);
        g_free (cue_str);
    } else {
        /* N/A; Clear completion model */
        clear_completion_model (name_selector_entry);
    }
}

static gboolean
type_ahead_complete_on_timeout_cb (gpointer user_data)
{
    ENameSelectorEntry *name_selector_entry;

    name_selector_entry = E_NAME_SELECTOR_ENTRY (user_data);
    type_ahead_complete (name_selector_entry);
    name_selector_entry->priv->type_ahead_complete_cb_id = 0;

    return FALSE;
}

static gboolean
update_completions_on_timeout_cb (gpointer user_data)
{
    ENameSelectorEntry *name_selector_entry;

    name_selector_entry = E_NAME_SELECTOR_ENTRY (user_data);
    update_completion_model (name_selector_entry);
    name_selector_entry->priv->update_completions_cb_id = 0;

    return FALSE;
}

static void
insert_destination_at_position (ENameSelectorEntry *name_selector_entry,
                                gint pos)
{
    EDestination *destination;
    const gchar  *text;
    gint          index;

    text = gtk_entry_get_text (GTK_ENTRY (name_selector_entry));
    index = get_index_at_position (text, pos);

    destination = build_destination_at_position (text, pos);
    g_assert (destination);

    g_signal_handlers_block_by_func (
        name_selector_entry->priv->destination_store,
        destination_row_inserted, name_selector_entry);
    e_destination_store_insert_destination (
        name_selector_entry->priv->destination_store,
                        index, destination);
    g_signal_handlers_unblock_by_func (
        name_selector_entry->priv->destination_store,
        destination_row_inserted, name_selector_entry);
    g_object_unref (destination);
}

static void
modify_destination_at_position (ENameSelectorEntry *name_selector_entry,
                                gint pos)
{
    EDestination *destination;
    const gchar  *text;
    gchar        *raw_address;
    gboolean      rebuild_attributes = FALSE;

    destination = find_destination_at_position (name_selector_entry, pos);
    if (!destination)
        return;

    text = gtk_entry_get_text (GTK_ENTRY (name_selector_entry));
    raw_address = get_address_at_position (text, pos);
    g_assert (raw_address);

    if (e_destination_get_contact (destination))
        rebuild_attributes = TRUE;

    g_signal_handlers_block_by_func (
        name_selector_entry->priv->destination_store,
        destination_row_changed, name_selector_entry);
    e_destination_set_raw (destination, raw_address);
    g_signal_handlers_unblock_by_func (
        name_selector_entry->priv->destination_store,
        destination_row_changed, name_selector_entry);

    g_free (raw_address);

    if (rebuild_attributes)
        generate_attribute_list (name_selector_entry);
}

static gchar *
get_destination_textrep (ENameSelectorEntry *name_selector_entry,
                         EDestination *destination)
{
    gboolean show_email = e_name_selector_entry_get_show_address (name_selector_entry);
    EContact *contact;

    g_return_val_if_fail (destination != NULL, NULL);

    contact = e_destination_get_contact (destination);

    if (!show_email) {
        if (contact && !e_contact_get (contact, E_CONTACT_IS_LIST)) {
            GList *email_list;

            email_list = e_contact_get (contact, E_CONTACT_EMAIL);
            show_email = g_list_length (email_list) > 1;
            deep_free_list (email_list);
        }
    }

    /* do not show emails for contact lists even user forces it */
    if (show_email && contact && e_contact_get (contact, E_CONTACT_IS_LIST))
        show_email = FALSE;

    return sanitize_string (e_destination_get_textrep (destination, show_email));
}

static void
sync_destination_at_position (ENameSelectorEntry *name_selector_entry,
                              gint range_pos,
                              gint *cursor_pos)
{
    EDestination *destination;
    const gchar  *text;
    gchar        *address;
    gint          address_len;
    gint          range_start, range_end;

    /* Get the destination we're looking at. Note that the entry may be empty, and so
     * there may not be one. */
    destination = find_destination_at_position (name_selector_entry, range_pos);
    if (!destination)
        return;

    text = gtk_entry_get_text (GTK_ENTRY (name_selector_entry));
    if (!get_range_at_position (text, range_pos, &range_start, &range_end)) {
        g_warning ("ENameSelectorEntry is out of sync with model!");
        return;
    }

    address = get_destination_textrep (name_selector_entry, destination);
    address_len = g_utf8_strlen (address, -1);

    if (cursor_pos) {
        /* Update cursor placement */
        if (*cursor_pos >= range_end)
            *cursor_pos += address_len - (range_end - range_start);
        else if (*cursor_pos > range_start)
            *cursor_pos = range_start + address_len;
    }

    g_signal_handlers_block_by_func (name_selector_entry, user_insert_text, name_selector_entry);
    g_signal_handlers_block_by_func (name_selector_entry, user_delete_text, name_selector_entry);

    gtk_editable_delete_text (GTK_EDITABLE (name_selector_entry), range_start, range_end);
    gtk_editable_insert_text (GTK_EDITABLE (name_selector_entry), address, -1, &range_start);

    g_signal_handlers_unblock_by_func (name_selector_entry, user_delete_text, name_selector_entry);
    g_signal_handlers_unblock_by_func (name_selector_entry, user_insert_text, name_selector_entry);

    generate_attribute_list (name_selector_entry);
    g_free (address);
}

static void
remove_destination_by_index (ENameSelectorEntry *name_selector_entry,
                             gint index)
{
    EDestination *destination;

    destination = find_destination_by_index (name_selector_entry, index);
    if (destination) {
        g_signal_handlers_block_by_func (
            name_selector_entry->priv->destination_store,
            destination_row_deleted, name_selector_entry);
        e_destination_store_remove_destination (
            name_selector_entry->priv->destination_store,
                        destination);
        g_signal_handlers_unblock_by_func (
            name_selector_entry->priv->destination_store,
            destination_row_deleted, name_selector_entry);
    }
}

static void
post_insert_update (ENameSelectorEntry *name_selector_entry,
                    gint position)
{
    const gchar *text;
    glong length;

    text = gtk_entry_get_text (GTK_ENTRY (name_selector_entry));
    length = g_utf8_strlen (text, -1);
    text = g_utf8_next_char (text);

    if (*text == '\0') {
        /* First and only character, create initial destination. */
        insert_destination_at_position (name_selector_entry, 0);
    } else {
        /* Modified an existing destination. */
        modify_destination_at_position (name_selector_entry, position);
    }

    /* If editing within the string, regenerate attributes. */
    if (position < length)
        generate_attribute_list (name_selector_entry);
}

/* Returns the number of characters inserted */
static gint
insert_unichar (ENameSelectorEntry *name_selector_entry,
                gint *pos,
                gunichar c)
{
    const gchar *text;
    gunichar     str_context[4];
    gchar        buf[7];
    gint         len;

    text = gtk_entry_get_text (GTK_ENTRY (name_selector_entry));
    get_utf8_string_context (text, *pos, str_context, 4);

    /* Space is not allowed:
     * - Before or after another space.
     * - At start of string. */

    if (c == ' ' && (str_context[1] == ' ' || str_context[1] == '\0' || str_context[2] == ' '))
        return 0;

    /* Comma is not allowed:
     * - After another comma.
     * - At start of string. */

    if (c == ',' && !is_quoted_at (text, *pos)) {
        gint         start_pos;
        gint         end_pos;
        gboolean     at_start = FALSE;
        gboolean     at_end = FALSE;

        if (str_context[1] == ',' || str_context[1] == '\0')
            return 0;

        /* We do this so we can avoid disturbing destinations with completed contacts
         * either before or after the destination being inserted. */
        get_range_at_position (text, *pos, &start_pos, &end_pos);
        if (*pos <= start_pos)
            at_start = TRUE;
        if (*pos >= end_pos)
            at_end = TRUE;

        /* Must insert comma first, so modify_destination_at_position can do its job
         * correctly, splitting up the contact if necessary. */
        gtk_editable_insert_text (GTK_EDITABLE (name_selector_entry), ", ", -1, pos);

        /* Update model */
        g_assert (*pos >= 2);

        /* If we inserted the comma at the end of, or in the middle of, an existing
         * address, add a new destination for what appears after comma. Else, we
         * have to add a destination for what appears before comma (a blank one). */
        if (at_end) {
            /* End: Add last, sync first */
            insert_destination_at_position (name_selector_entry, *pos);
            sync_destination_at_position (name_selector_entry, *pos - 2, pos);
            /* Sync generates the attributes list */
        } else if (at_start) {
            /* Start: Add first */
            insert_destination_at_position (name_selector_entry, *pos - 2);
            generate_attribute_list (name_selector_entry);
        } else {
            /* Middle: */
            insert_destination_at_position (name_selector_entry, *pos);
            modify_destination_at_position (name_selector_entry, *pos - 2);
            generate_attribute_list (name_selector_entry);
        }

        return 2;
    }

    /* Generic case. Allowed spaces also end up here. */

    len = g_unichar_to_utf8 (c, buf);
    buf[len] = '\0';

    gtk_editable_insert_text (GTK_EDITABLE (name_selector_entry), buf, -1, pos);

    post_insert_update (name_selector_entry, *pos);

    return 1;
}

static void
user_insert_text (ENameSelectorEntry *name_selector_entry,
                  gchar *new_text,
                  gint new_text_length,
                  gint *position,
                  gpointer user_data)
{
    gint chars_inserted = 0;
    gboolean fast_insert;

    g_signal_handlers_block_by_func (name_selector_entry, user_insert_text, name_selector_entry);
    g_signal_handlers_block_by_func (name_selector_entry, user_delete_text, name_selector_entry);

    fast_insert =
        (g_utf8_strchr (new_text, new_text_length, ' ') == NULL) &&
        (g_utf8_strchr (new_text, new_text_length, ',') == NULL);

    /* If the text to insert does not contain spaces or commas,
     * insert all of it at once.  This avoids confusing on-going
     * input method behavior. */
    if (fast_insert) {
        gint old_position = *position;

        gtk_editable_insert_text (
            GTK_EDITABLE (name_selector_entry),
            new_text, new_text_length, position);

        chars_inserted = *position - old_position;
        if (chars_inserted > 0)
            post_insert_update (name_selector_entry, *position);

    /* Otherwise, apply some rules as to where spaces and commas
     * can be inserted, and insert a trailing space after comma. */
    } else {
        const gchar *cp;

        for (cp = new_text; *cp; cp = g_utf8_next_char (cp)) {
            gunichar uc = g_utf8_get_char (cp);
            insert_unichar (name_selector_entry, position, uc);
            chars_inserted++;
        }
    }

    if (chars_inserted >= 1) {
        /* If the user inserted one character, kick off completion */
        re_set_timeout (
            name_selector_entry->priv->update_completions_cb_id,
            update_completions_on_timeout_cb,  name_selector_entry,
            AUTOCOMPLETE_TIMEOUT);
        re_set_timeout (
            name_selector_entry->priv->type_ahead_complete_cb_id,
            type_ahead_complete_on_timeout_cb, name_selector_entry,
            AUTOCOMPLETE_TIMEOUT);
    }

    g_signal_handlers_unblock_by_func (name_selector_entry, user_delete_text, name_selector_entry);
    g_signal_handlers_unblock_by_func (name_selector_entry, user_insert_text, name_selector_entry);

    g_signal_stop_emission_by_name (name_selector_entry, "insert_text");
}

static void
user_delete_text (ENameSelectorEntry *name_selector_entry,
                  gint start_pos,
                  gint end_pos,
                  gpointer user_data)
{
    const gchar *text;
    gint         index_start, index_end;
    gint         selection_start, selection_end;
    gunichar     str_context[2], str_b_context[2];
    gint         len;
    gint         i;
    gboolean     del_space = FALSE, del_comma = FALSE;

    if (start_pos == end_pos)
        return;

    text = gtk_entry_get_text (GTK_ENTRY (name_selector_entry));
    len = g_utf8_strlen (text, -1);

    if (end_pos == -1)
        end_pos = len;

    gtk_editable_get_selection_bounds (
        GTK_EDITABLE (name_selector_entry),
        &selection_start, &selection_end);

    get_utf8_string_context (text, start_pos, str_context, 2);
    get_utf8_string_context (text, end_pos, str_b_context, 2);

    g_signal_handlers_block_by_func (name_selector_entry, user_delete_text, name_selector_entry);

    if (end_pos - start_pos == 1) {
        /* Might be backspace; update completion model so dropdown is accurate */
        re_set_timeout (
            name_selector_entry->priv->update_completions_cb_id,
            update_completions_on_timeout_cb, name_selector_entry,
            AUTOCOMPLETE_TIMEOUT);
    }

    index_start = get_index_at_position (text, start_pos);
    index_end = get_index_at_position (text, end_pos);

    g_signal_stop_emission_by_name (name_selector_entry, "delete_text");

    /* If the deletion touches more than one destination, the first one is changed
     * and the rest are removed. If the last destination wasn't completely deleted,
     * it becomes part of the first one, since the separator between them was
     * removed.
     *
     * Here, we let the model know about removals. */
    for (i = index_end; i > index_start; i--) {
        EDestination *destination = find_destination_by_index (name_selector_entry, i);
        gint range_start, range_end;
        gchar *ttext;
        const gchar *email = NULL;
        gboolean sel = FALSE;

        if (destination)
            email = e_destination_get_textrep (destination, TRUE);

        if (!email || !*email)
            continue;

        if (!get_range_by_index (text, i, &range_start, &range_end)) {
            g_warning ("ENameSelectorEntry is out of sync with model!");
            return;
        }

        if ((selection_start < range_start && selection_end > range_start) ||
            (selection_end > range_start && selection_end < range_end))
            sel = TRUE;

        if (!sel) {
            g_signal_handlers_block_by_func (name_selector_entry, user_insert_text, name_selector_entry);
            g_signal_handlers_block_by_func (name_selector_entry, user_delete_text, name_selector_entry);

            gtk_editable_delete_text (GTK_EDITABLE (name_selector_entry), range_start, range_end);

            ttext = sanitize_string (email);
            gtk_editable_insert_text (GTK_EDITABLE (name_selector_entry), ttext, -1, &range_start);
            g_free (ttext);

            g_signal_handlers_unblock_by_func (name_selector_entry, user_delete_text, name_selector_entry);
            g_signal_handlers_unblock_by_func (name_selector_entry, user_insert_text, name_selector_entry);

        }

        remove_destination_by_index (name_selector_entry, i);
    }

    /* Do the actual deletion */

    if (end_pos == start_pos +1 && index_end == index_start) {
        /* We could be just deleting the empty text */
        gchar *c;

        /* Get the actual deleted text */
        c = gtk_editable_get_chars (GTK_EDITABLE (name_selector_entry), start_pos, start_pos + 1);

        if ( c[0] == ' ') {
            /* If we are at the beginning or removing junk space, let us ignore it */
            del_space = TRUE;
        }
        g_free (c);
    } else  if (end_pos == start_pos +1 && index_end == index_start + 1) {
        /* We could be just deleting the empty text */
        gchar *c;

        /* Get the actual deleted text */
        c = gtk_editable_get_chars (GTK_EDITABLE (name_selector_entry), start_pos, start_pos + 1);

        if ( c[0] == ',' && !is_quoted_at (text, start_pos)) {
            /* If we are at the beginning or removing junk space, let us ignore it */
            del_comma = TRUE;
        }
        g_free (c);
    }

    if (del_comma) {
        gint range_start=-1, range_end;
        EDestination *dest = find_destination_by_index (name_selector_entry, index_end);
        /* If we have deleted the last comma, let us autocomplete normally
         */

        if (dest && len - end_pos != 0) {

            EDestination *destination1 = find_destination_by_index (name_selector_entry, index_start);
            gchar *ttext;
            const gchar *email = NULL;

            if (destination1)
                email = e_destination_get_textrep (destination1, TRUE);

            if (email && *email) {

                if (!get_range_by_index (text, i, &range_start, &range_end)) {
                    g_warning ("ENameSelectorEntry is out of sync with model!");
                    return;
                }

                g_signal_handlers_block_by_func (name_selector_entry, user_insert_text, name_selector_entry);
                g_signal_handlers_block_by_func (name_selector_entry, user_delete_text, name_selector_entry);

                gtk_editable_delete_text (GTK_EDITABLE (name_selector_entry), range_start, range_end);

                ttext = sanitize_string (email);
                gtk_editable_insert_text (GTK_EDITABLE (name_selector_entry), ttext, -1, &range_start);
                g_free (ttext);

                g_signal_handlers_unblock_by_func (name_selector_entry, user_delete_text, name_selector_entry);
                g_signal_handlers_unblock_by_func (name_selector_entry, user_insert_text, name_selector_entry);
            }

            if (range_start != -1) {
                start_pos = range_start;
                end_pos = start_pos + 1;
                gtk_editable_set_position (GTK_EDITABLE (name_selector_entry),start_pos);
            }
        }
    }
    gtk_editable_delete_text (
        GTK_EDITABLE (name_selector_entry),
        start_pos, end_pos);

    /*If the user is deleting a '"' new destinations have to be created for ',' between the quoted text
     Like "fd,ty,uy" is a one entity, but if you remove the quotes it has to be broken doan into 3 seperate
     addresses.
    */

    if (str_b_context[1] == '"') {
        const gchar *p;
        gint j;
        p = text + end_pos;
        for (p = text + (end_pos - 1), j = end_pos - 1; *p && *p != '"' ; p = g_utf8_next_char (p), j++) {
            gunichar c = g_utf8_get_char (p);
            if (c == ',') {
                insert_destination_at_position (name_selector_entry, j + 1);
            }
        }

    }

    /* Let model know about changes */
    text = gtk_entry_get_text (GTK_ENTRY (name_selector_entry));
    if (!*text || strlen (text) <= 0) {
        /* If the entry was completely cleared, remove the initial destination too */
        remove_destination_by_index (name_selector_entry, 0);
        generate_attribute_list (name_selector_entry);
    } else  if (!del_space) {
        modify_destination_at_position (name_selector_entry, start_pos);
    }

    /* If editing within the string, we need to regenerate attributes */
    if (end_pos < len)
        generate_attribute_list (name_selector_entry);

    /* Prevent type-ahead completion */
    if (name_selector_entry->priv->type_ahead_complete_cb_id) {
        g_source_remove (name_selector_entry->priv->type_ahead_complete_cb_id);
        name_selector_entry->priv->type_ahead_complete_cb_id = 0;
    }

    g_signal_handlers_unblock_by_func (name_selector_entry, user_delete_text, name_selector_entry);
}

static gboolean
completion_match_selected (ENameSelectorEntry *name_selector_entry,
                           ETreeModelGenerator *email_generator_model,
                           GtkTreeIter *generator_iter)
{
    EContact      *contact;
    EBookClient   *book_client;
    EDestination  *destination;
    gint           cursor_pos;
    GtkTreeIter    contact_iter;
    gint           email_n;

    if (!name_selector_entry->priv->contact_store)
        return FALSE;

    g_return_val_if_fail (name_selector_entry->priv->email_generator == email_generator_model, FALSE);

    e_tree_model_generator_convert_iter_to_child_iter (
        email_generator_model,
        &contact_iter, &email_n,
        generator_iter);

    contact = e_contact_store_get_contact (name_selector_entry->priv->contact_store, &contact_iter);
    book_client = e_contact_store_get_client (name_selector_entry->priv->contact_store, &contact_iter);
    cursor_pos = gtk_editable_get_position (GTK_EDITABLE (name_selector_entry));

    /* Set the contact in the model's destination */

    destination = find_destination_at_position (name_selector_entry, cursor_pos);
    e_destination_set_contact (destination, contact, email_n);
    if (book_client)
        e_destination_set_client (destination, book_client);
    sync_destination_at_position (name_selector_entry, cursor_pos, &cursor_pos);

    g_signal_handlers_block_by_func (name_selector_entry, user_insert_text, name_selector_entry);
    gtk_editable_insert_text (GTK_EDITABLE (name_selector_entry), ", ", -1, &cursor_pos);
    g_signal_handlers_unblock_by_func (name_selector_entry, user_insert_text, name_selector_entry);

    /*Add destination at end for next entry*/
    insert_destination_at_position (name_selector_entry, cursor_pos);
    /* Place cursor at end of address */

    gtk_editable_set_position (GTK_EDITABLE (name_selector_entry), cursor_pos);
    g_signal_emit (name_selector_entry, signals[UPDATED], 0, destination, NULL);
    return TRUE;
}

static void
entry_activate (ENameSelectorEntry *name_selector_entry)
{
    gint         cursor_pos;
    gint         range_start, range_end;
    ENameSelectorEntryPrivate *priv;
    EDestination  *destination;
    gint           range_len;
    const gchar   *text;
    gchar         *cue_str;

    cursor_pos = gtk_editable_get_position (GTK_EDITABLE (name_selector_entry));
    if (cursor_pos < 0)
        return;

    priv = E_NAME_SELECTOR_ENTRY_GET_PRIVATE (name_selector_entry);

    text = gtk_entry_get_text (GTK_ENTRY (name_selector_entry));
    if (!get_range_at_position (text, cursor_pos, &range_start, &range_end))
        return;

    range_len = range_end - range_start;
    if (range_len < priv->minimum_query_length)
        return;

    destination = find_destination_at_position (name_selector_entry, cursor_pos);
    if (!destination)
        return;

    cue_str = get_entry_substring (name_selector_entry, range_start, range_end);
#if 0
    if (!find_existing_completion (name_selector_entry, cue_str, &contact,
                       &textrep, &matched_field)) {
        g_free (cue_str);
        return;
    }
#endif
    g_free (cue_str);
    sync_destination_at_position (name_selector_entry, cursor_pos, &cursor_pos);

    /* Place cursor at end of address */
    text = gtk_entry_get_text (GTK_ENTRY (name_selector_entry));
    get_range_at_position (text, cursor_pos, &range_start, &range_end);

    if (priv->is_completing) {
        gchar *str_context = NULL;

        str_context = gtk_editable_get_chars (GTK_EDITABLE (name_selector_entry), range_end, range_end + 1);

        if (str_context[0] != ',') {
            /* At the end*/
            gtk_editable_insert_text (GTK_EDITABLE (name_selector_entry), ", ", -1, &range_end);
        } else {
            /* In the middle */
            gint newpos = strlen (text);

                        /* Doing this we can make sure that It wont ask for completion again. */
            gtk_editable_insert_text (GTK_EDITABLE (name_selector_entry), ", ", -1, &newpos);
            g_signal_handlers_block_by_func (name_selector_entry, user_delete_text, name_selector_entry);
            gtk_editable_delete_text (GTK_EDITABLE (name_selector_entry), newpos - 2, newpos);
            g_signal_handlers_unblock_by_func (name_selector_entry, user_delete_text, name_selector_entry);

            /* Move it close to next destination*/
            range_end = range_end + 2;

        }
        g_free (str_context);
    }

    gtk_editable_set_position (GTK_EDITABLE (name_selector_entry), range_end);
    g_signal_emit (name_selector_entry, signals[UPDATED], 0, destination, NULL);

    if (priv->is_completing)
        clear_completion_model (name_selector_entry);
}

static void
update_text (ENameSelectorEntry *name_selector_entry,
             const gchar *text)
{
    gint start = 0, end = 0;
    gboolean has_selection;

    has_selection = gtk_editable_get_selection_bounds (GTK_EDITABLE (name_selector_entry), &start, &end);

    gtk_entry_set_text (GTK_ENTRY (name_selector_entry), text);

    if (has_selection)
        gtk_editable_select_region (GTK_EDITABLE (name_selector_entry), start, end);
}

static void
sanitize_entry (ENameSelectorEntry *name_selector_entry)
{
    gint n;
    GList *l, *known, *del = NULL;
    GString *str = g_string_new ("");

    g_signal_handlers_block_matched (name_selector_entry, G_SIGNAL_MATCH_DATA, 0, 0, NULL, NULL, name_selector_entry);
    g_signal_handlers_block_matched (name_selector_entry->priv->destination_store, G_SIGNAL_MATCH_DATA, 0, 0, NULL, NULL, name_selector_entry);

    known = e_destination_store_list_destinations (name_selector_entry->priv->destination_store);
    for (l = known, n = 0; l != NULL; l = l->next, n++) {
        EDestination *dest = l->data;

        if (!dest || !e_destination_get_address (dest))
            del = g_list_prepend (del, GINT_TO_POINTER (n));
        else {
            gchar *text;

            text = get_destination_textrep (name_selector_entry, dest);
            if (text) {
                if (str->str && str->str[0])
                    g_string_append (str, ", ");

                g_string_append (str, text);
            }
            g_free (text);
        }
    }
    g_list_free (known);

    for (l = del; l != NULL; l = l->next) {
        e_destination_store_remove_destination_nth (name_selector_entry->priv->destination_store, GPOINTER_TO_INT (l->data));
    }
    g_list_free (del);

    update_text (name_selector_entry, str->str);

    g_string_free (str, TRUE);

    g_signal_handlers_unblock_matched (name_selector_entry->priv->destination_store, G_SIGNAL_MATCH_DATA, 0, 0, NULL, NULL, name_selector_entry);
    g_signal_handlers_unblock_matched (name_selector_entry, G_SIGNAL_MATCH_DATA, 0, 0, NULL, NULL, name_selector_entry);

    generate_attribute_list (name_selector_entry);
}

static gboolean
user_focus_in (ENameSelectorEntry *name_selector_entry,
               GdkEventFocus *event_focus)
{
    gint n;
    GList *l, *known;
    GString *str = g_string_new ("");
    EDestination *dest_dummy = e_destination_new ();

    g_signal_handlers_block_matched (name_selector_entry, G_SIGNAL_MATCH_DATA, 0, 0, NULL, NULL, name_selector_entry);
    g_signal_handlers_block_matched (name_selector_entry->priv->destination_store, G_SIGNAL_MATCH_DATA, 0, 0, NULL, NULL, name_selector_entry);

    known = e_destination_store_list_destinations (name_selector_entry->priv->destination_store);
    for (l = known, n = 0; l != NULL; l = l->next, n++) {
        EDestination *dest = l->data;

        if (dest) {
            gchar *text;

            text = get_destination_textrep (name_selector_entry, dest);
            if (text) {
                if (str->str && str->str[0])
                    g_string_append (str, ", ");

                g_string_append (str, text);
            }
            g_free (text);
        }
    }
    g_list_free (known);

    /* Add a blank destination */
    e_destination_store_append_destination (name_selector_entry->priv->destination_store, dest_dummy);
    if (str->str && str->str[0])
        g_string_append (str, ", ");

    gtk_entry_set_text (GTK_ENTRY (name_selector_entry), str->str);

    g_string_free (str, TRUE);

    g_signal_handlers_unblock_matched (name_selector_entry->priv->destination_store, G_SIGNAL_MATCH_DATA, 0, 0, NULL, NULL, name_selector_entry);
    g_signal_handlers_unblock_matched (name_selector_entry, G_SIGNAL_MATCH_DATA, 0, 0, NULL, NULL, name_selector_entry);

    generate_attribute_list (name_selector_entry);

    return FALSE;
}

static gboolean
user_focus_out (ENameSelectorEntry *name_selector_entry,
                GdkEventFocus *event_focus)
{
    if (!event_focus->in) {
        entry_activate (name_selector_entry);
    }

    if (name_selector_entry->priv->type_ahead_complete_cb_id) {
        g_source_remove (name_selector_entry->priv->type_ahead_complete_cb_id);
        name_selector_entry->priv->type_ahead_complete_cb_id = 0;
    }

    if (name_selector_entry->priv->update_completions_cb_id) {
        g_source_remove (name_selector_entry->priv->update_completions_cb_id);
        name_selector_entry->priv->update_completions_cb_id = 0;
    }

    clear_completion_model (name_selector_entry);

    if (!event_focus->in) {
        sanitize_entry (name_selector_entry);
    }

    return FALSE;
}

static void
deep_free_list (GList *list)
{
    GList *l;

    for (l = list; l; l = g_list_next (l))
        g_free (l->data);

    g_list_free (list);
}

/* Given a widget, determines the height that text will normally be drawn. */
static guint
entry_height (GtkWidget *widget)
{
    PangoLayout *layout;
    gint bound;

    g_return_val_if_fail (widget != NULL, 0);

    layout = gtk_widget_create_pango_layout (widget, NULL);

    pango_layout_get_pixel_size (layout, NULL, &bound);

    return bound;
}

static void
contact_layout_pixbuffer (GtkCellLayout *cell_layout,
                          GtkCellRenderer *cell,
                          GtkTreeModel *model,
                          GtkTreeIter *iter,
                          ENameSelectorEntry *name_selector_entry)
{
    EContact      *contact;
    GtkTreeIter    generator_iter;
    GtkTreeIter    contact_store_iter;
    gint           email_n;
    EContactPhoto *photo;
    gboolean       iter_is_valid;
    GdkPixbuf *pixbuf = NULL;

    if (!name_selector_entry->priv->contact_store)
        return;

    gtk_tree_model_filter_convert_iter_to_child_iter (
        GTK_TREE_MODEL_FILTER (model),
        &generator_iter, iter);
    iter_is_valid = e_tree_model_generator_convert_iter_to_child_iter (
        name_selector_entry->priv->email_generator,
        &contact_store_iter, &email_n,
        &generator_iter);

    if (!iter_is_valid) {
        return;
    }

    contact = e_contact_store_get_contact (name_selector_entry->priv->contact_store, &contact_store_iter);
    if (!contact) {
        g_object_set (cell, "pixbuf", pixbuf, NULL);
        return;
    }

    photo = e_contact_get (contact, E_CONTACT_PHOTO);
    if (photo && photo->type == E_CONTACT_PHOTO_TYPE_INLINED) {
        guint max_height = entry_height (GTK_WIDGET (name_selector_entry));
        GdkPixbufLoader *loader;

        loader = gdk_pixbuf_loader_new ();
        if (gdk_pixbuf_loader_write (loader, (guchar *) photo->data.inlined.data, photo->data.inlined.length, NULL) &&
            gdk_pixbuf_loader_close (loader, NULL)) {
            pixbuf = gdk_pixbuf_loader_get_pixbuf (loader);
            if (pixbuf)
                g_object_ref (pixbuf);
        }
        g_object_unref (loader);

        if (pixbuf) {
            gint w, h;
            gdouble scale = 1.0;

            w = gdk_pixbuf_get_width (pixbuf);
            h = gdk_pixbuf_get_height (pixbuf);

            if (h > w)
                scale = max_height / (double) h;
            else
                scale = max_height / (double) w;

            if (scale < 1.0) {
                GdkPixbuf *tmp;

                tmp = gdk_pixbuf_scale_simple (pixbuf, w * scale, h * scale, GDK_INTERP_BILINEAR);
                g_object_unref (pixbuf);
                pixbuf = tmp;
            }

        }
    }

    e_contact_photo_free (photo);

    g_object_set (cell, "pixbuf", pixbuf, NULL);

    if (pixbuf)
        g_object_unref (pixbuf);
}

static void
contact_layout_formatter (GtkCellLayout *cell_layout,
                          GtkCellRenderer *cell,
                          GtkTreeModel *model,
                          GtkTreeIter *iter,
                          ENameSelectorEntry *name_selector_entry)
{
    EContact      *contact;
    GtkTreeIter    generator_iter;
    GtkTreeIter    contact_store_iter;
    GList         *email_list;
    gchar         *string;
    gchar         *file_as_str;
    gchar         *email_str;
    gint           email_n;
    gboolean       iter_is_valid;

    if (!name_selector_entry->priv->contact_store)
        return;

    gtk_tree_model_filter_convert_iter_to_child_iter (
        GTK_TREE_MODEL_FILTER (model),
        &generator_iter, iter);
    iter_is_valid = e_tree_model_generator_convert_iter_to_child_iter (
        name_selector_entry->priv->email_generator,
        &contact_store_iter, &email_n,
        &generator_iter);

    if (!iter_is_valid) {
        return;
    }

    contact = e_contact_store_get_contact (name_selector_entry->priv->contact_store, &contact_store_iter);
    email_list = e_contact_get (contact, E_CONTACT_EMAIL);
    email_str = g_list_nth_data (email_list, email_n);
    file_as_str = e_contact_get (contact, E_CONTACT_FILE_AS);

    if (e_contact_get (contact, E_CONTACT_IS_LIST)) {
        string = g_strdup_printf ("%s", file_as_str ? file_as_str : "?");
    } else {
        string = g_strdup_printf (
            "%s%s<%s>", file_as_str ? file_as_str : "",
            file_as_str ? " " : "",
            email_str ? email_str : "");
    }

    g_free (file_as_str);
    deep_free_list (email_list);

    g_object_set (cell, "text", string, NULL);
    g_free (string);
}

static gint
generate_contact_rows (EContactStore *contact_store,
                       GtkTreeIter *iter,
                       ENameSelectorEntry *name_selector_entry)
{
    EContact    *contact;
    const gchar *contact_uid;
    GList       *email_list;
    gint         n_rows;

    contact = e_contact_store_get_contact (contact_store, iter);
    g_assert (contact != NULL);

    contact_uid = e_contact_get_const (contact, E_CONTACT_UID);
    if (!contact_uid)
        return 0;  /* Can happen with broken databases */

    if (e_contact_get (contact, E_CONTACT_IS_LIST))
        return 1;

    email_list = e_contact_get (contact, E_CONTACT_EMAIL);
    n_rows = g_list_length (email_list);
    deep_free_list (email_list);

    return n_rows;
}

static void
ensure_type_ahead_complete_on_timeout (ENameSelectorEntry *name_selector_entry)
{
    /* this is called whenever a new item is added to the model,
     * thus, to not starve when there are many matches, do not
     * postpone on each add, but show results as soon as possible */
    if (!name_selector_entry->priv->type_ahead_complete_cb_id) {
        re_set_timeout (
            name_selector_entry->priv->type_ahead_complete_cb_id,
            type_ahead_complete_on_timeout_cb, name_selector_entry,
            SHOW_RESULT_TIMEOUT);
    }
}

static void
setup_contact_store (ENameSelectorEntry *name_selector_entry)
{
    if (name_selector_entry->priv->email_generator) {
        g_object_unref (name_selector_entry->priv->email_generator);
        name_selector_entry->priv->email_generator = NULL;
    }

    if (name_selector_entry->priv->contact_store) {
        name_selector_entry->priv->email_generator =
            e_tree_model_generator_new (
                GTK_TREE_MODEL (
                name_selector_entry->priv->contact_store));

        e_tree_model_generator_set_generate_func (
            name_selector_entry->priv->email_generator,
            (ETreeModelGeneratorGenerateFunc) generate_contact_rows,
            name_selector_entry, NULL);

        /* Assign the store to the entry completion */

        gtk_entry_completion_set_model (
            name_selector_entry->priv->entry_completion,
            GTK_TREE_MODEL (
            name_selector_entry->priv->email_generator));

        /* Set up callback for incoming matches */
        g_signal_connect_swapped (
            name_selector_entry->priv->contact_store, "row-inserted",
            G_CALLBACK (ensure_type_ahead_complete_on_timeout), name_selector_entry);
    } else {
        /* Remove the store from the entry completion */

        gtk_entry_completion_set_model (name_selector_entry->priv->entry_completion, NULL);
    }
}

static void
name_selector_entry_get_client_cb (GObject *source_object,
                                   GAsyncResult *result,
                                   gpointer user_data)
{
    EContactStore *contact_store = user_data;
    EBookClient *book_client;
    EClient *client;
    GError *error = NULL;

    client = e_client_cache_get_client_finish (
        E_CLIENT_CACHE (source_object), result, &error);

    /* Sanity check. */
    g_return_if_fail (
        ((client != NULL) && (error == NULL)) ||
        ((client == NULL) && (error != NULL)));

    if (g_error_matches (error, G_IO_ERROR, G_IO_ERROR_CANCELLED)) {
        g_error_free (error);
        goto exit;
    }

    if (error != NULL) {
        g_warning ("%s: %s", G_STRFUNC, error->message);
        g_error_free (error);
        goto exit;
    }

    book_client = E_BOOK_CLIENT (client);

    g_return_if_fail (E_IS_BOOK_CLIENT (book_client));
    e_contact_store_add_client (contact_store, book_client);
    g_object_unref (book_client);

 exit:
    g_object_unref (contact_store);
}

static void
setup_default_contact_store (ENameSelectorEntry *name_selector_entry)
{
    EClientCache *client_cache;
    ESourceRegistry *registry;
    EContactStore *contact_store;
    GList *list, *iter;
    const gchar *extension_name;

    g_return_if_fail (name_selector_entry->priv->contact_store == NULL);

    /* Create a book for each completion source, and assign them to the contact store */

    contact_store = e_contact_store_new ();
    name_selector_entry->priv->contact_store = contact_store;

    extension_name = E_SOURCE_EXTENSION_ADDRESS_BOOK;
    client_cache = e_name_selector_entry_ref_client_cache (name_selector_entry);
    registry = e_client_cache_ref_registry (client_cache);

    list = e_source_registry_list_enabled (registry, extension_name);

    for (iter = list; iter != NULL; iter = g_list_next (iter)) {
        ESource *source = E_SOURCE (iter->data);
        ESourceAutocomplete *extension;
        GCancellable *cancellable;
        const gchar *extension_name;

        extension_name = E_SOURCE_EXTENSION_AUTOCOMPLETE;
        extension = e_source_get_extension (source, extension_name);

        /* Skip non-completion address books. */
        if (!e_source_autocomplete_get_include_me (extension))
            continue;

        cancellable = g_cancellable_new ();

        g_queue_push_tail (
            &name_selector_entry->priv->cancellables,
            cancellable);

        e_client_cache_get_client (
            client_cache, source,
            E_SOURCE_EXTENSION_ADDRESS_BOOK,
            cancellable,
            name_selector_entry_get_client_cb,
            g_object_ref (contact_store));
    }

    g_list_free_full (list, (GDestroyNotify) g_object_unref);

    g_object_unref (registry);
    g_object_unref (client_cache);

    setup_contact_store (name_selector_entry);
}

static void
destination_row_changed (ENameSelectorEntry *name_selector_entry,
                         GtkTreePath *path,
                         GtkTreeIter *iter)
{
    EDestination *destination;
    const gchar  *entry_text;
    gchar        *text;
    gint          range_start, range_end;
    gint          n;

    n = gtk_tree_path_get_indices (path)[0];
    destination = e_destination_store_get_destination (name_selector_entry->priv->destination_store, iter);

    if (!destination)
        return;

    g_assert (n >= 0);

    entry_text = gtk_entry_get_text (GTK_ENTRY (name_selector_entry));
    if (!get_range_by_index (entry_text, n, &range_start, &range_end)) {
        g_warning ("ENameSelectorEntry is out of sync with model!");
        return;
    }

    g_signal_handlers_block_by_func (name_selector_entry, user_insert_text, name_selector_entry);
    g_signal_handlers_block_by_func (name_selector_entry, user_delete_text, name_selector_entry);

    gtk_editable_delete_text (GTK_EDITABLE (name_selector_entry), range_start, range_end);

    text = get_destination_textrep (name_selector_entry, destination);
    gtk_editable_insert_text (GTK_EDITABLE (name_selector_entry), text, -1, &range_start);
    g_free (text);

    g_signal_handlers_unblock_by_func (name_selector_entry, user_delete_text, name_selector_entry);
    g_signal_handlers_unblock_by_func (name_selector_entry, user_insert_text, name_selector_entry);

    clear_completion_model (name_selector_entry);
    generate_attribute_list (name_selector_entry);
}

static void
destination_row_inserted (ENameSelectorEntry *name_selector_entry,
                          GtkTreePath *path,
                          GtkTreeIter *iter)
{
    EDestination *destination;
    const gchar  *entry_text;
    gchar        *text;
    gboolean      comma_before = FALSE;
    gboolean      comma_after = FALSE;
    gint          range_start, range_end;
    gint          insert_pos;
    gint          n;

    n = gtk_tree_path_get_indices (path)[0];
    destination = e_destination_store_get_destination (name_selector_entry->priv->destination_store, iter);

    g_assert (n >= 0);
    g_assert (destination != NULL);

    entry_text = gtk_entry_get_text (GTK_ENTRY (name_selector_entry));

    if (get_range_by_index (entry_text, n, &range_start, &range_end) && range_start != range_end) {
        /* Another destination comes after us */
        insert_pos = range_start;
        comma_after = TRUE;
    } else if (n > 0 && get_range_by_index (entry_text, n - 1, &range_start, &range_end)) {
        /* Another destination comes before us */
        insert_pos = range_end;
        comma_before = TRUE;
    } else if (n == 0) {
        /* We're the sole destination */
        insert_pos = 0;
    } else {
        g_warning ("ENameSelectorEntry is out of sync with model!");
        return;
    }

    g_signal_handlers_block_by_func (name_selector_entry, user_insert_text, name_selector_entry);

    if (comma_before)
        gtk_editable_insert_text (GTK_EDITABLE (name_selector_entry), ", ", -1, &insert_pos);

    text = get_destination_textrep (name_selector_entry, destination);
    gtk_editable_insert_text (GTK_EDITABLE (name_selector_entry), text, -1, &insert_pos);
    g_free (text);

    if (comma_after)
        gtk_editable_insert_text (GTK_EDITABLE (name_selector_entry), ", ", -1, &insert_pos);

    g_signal_handlers_unblock_by_func (name_selector_entry, user_insert_text, name_selector_entry);

    clear_completion_model (name_selector_entry);
    generate_attribute_list (name_selector_entry);
}

static void
destination_row_deleted (ENameSelectorEntry *name_selector_entry,
                         GtkTreePath *path)
{
    const gchar *text;
    gboolean     deleted_comma = FALSE;
    gint         range_start, range_end;
    gchar       *p0;
    gint         n;

    n = gtk_tree_path_get_indices (path)[0];
    g_assert (n >= 0);

    text = gtk_entry_get_text (GTK_ENTRY (name_selector_entry));

    if (!get_range_by_index (text, n, &range_start, &range_end)) {
        g_warning ("ENameSelectorEntry is out of sync with model!");
        return;
    }

    /* Expand range for deletion forwards */
    for (p0 = g_utf8_offset_to_pointer (text, range_end); *p0;
         p0 = g_utf8_next_char (p0), range_end++) {
        gunichar c = g_utf8_get_char (p0);

        /* Gobble spaces directly after comma */
        if (c != ' ' && deleted_comma) {
            range_end--;
            break;
        }

        if (c == ',') {
            deleted_comma = TRUE;
            range_end++;
        }
    }

    /* Expand range for deletion backwards */
    for (p0 = g_utf8_offset_to_pointer (text, range_start); range_start > 0;
         p0 = g_utf8_prev_char (p0), range_start--) {
        gunichar c = g_utf8_get_char (p0);

        if (c == ',') {
            if (!deleted_comma) {
                deleted_comma = TRUE;
                break;
            }

            range_start++;

            /* Leave a space in front; we deleted the comma and spaces before the
             * following destination */
            p0 = g_utf8_next_char (p0);
            c = g_utf8_get_char (p0);
            if (c == ' ')
                range_start++;

            break;
        }
    }

    g_signal_handlers_block_by_func (name_selector_entry, user_delete_text, name_selector_entry);
    gtk_editable_delete_text (GTK_EDITABLE (name_selector_entry), range_start, range_end);
    g_signal_handlers_unblock_by_func (name_selector_entry, user_delete_text, name_selector_entry);

    clear_completion_model (name_selector_entry);
    generate_attribute_list (name_selector_entry);
}

static void
setup_destination_store (ENameSelectorEntry *name_selector_entry)
{
    GtkTreeIter  iter;

    g_signal_connect_swapped (
        name_selector_entry->priv->destination_store, "row-changed",
        G_CALLBACK (destination_row_changed), name_selector_entry);
    g_signal_connect_swapped (
        name_selector_entry->priv->destination_store, "row-deleted",
        G_CALLBACK (destination_row_deleted), name_selector_entry);
    g_signal_connect_swapped (
        name_selector_entry->priv->destination_store, "row-inserted",
        G_CALLBACK (destination_row_inserted), name_selector_entry);

    if (!gtk_tree_model_get_iter_first (GTK_TREE_MODEL (name_selector_entry->priv->destination_store), &iter))
        return;

    do {
        GtkTreePath *path;

        path = gtk_tree_model_get_path (GTK_TREE_MODEL (name_selector_entry->priv->destination_store), &iter);
        g_assert (path);

        destination_row_inserted (name_selector_entry, path, &iter);
    } while (gtk_tree_model_iter_next (GTK_TREE_MODEL (name_selector_entry->priv->destination_store), &iter));
}

static gboolean
prepare_popup_destination (ENameSelectorEntry *name_selector_entry,
                           GdkEventButton *event_button)
{
    EDestination *destination;
    PangoLayout  *layout;
    gint          layout_offset_x;
    gint          layout_offset_y;
    gint          x, y;
    gint          index;

    if (event_button->type != GDK_BUTTON_PRESS)
        return FALSE;

    if (event_button->button != 3)
        return FALSE;

    if (name_selector_entry->priv->popup_destination) {
        g_object_unref (name_selector_entry->priv->popup_destination);
        name_selector_entry->priv->popup_destination = NULL;
    }

    gtk_entry_get_layout_offsets (
        GTK_ENTRY (name_selector_entry),
        &layout_offset_x, &layout_offset_y);
    x = (event_button->x + 0.5) - layout_offset_x;
    y = (event_button->y + 0.5) - layout_offset_y;

    if (x < 0 || y < 0)
        return FALSE;

    layout = gtk_entry_get_layout (GTK_ENTRY (name_selector_entry));
    if (!pango_layout_xy_to_index (layout, x * PANGO_SCALE, y * PANGO_SCALE, &index, NULL))
        return FALSE;

    index = gtk_entry_layout_index_to_text_index (GTK_ENTRY (name_selector_entry), index);
    destination = find_destination_at_position (name_selector_entry, index);
    /* FIXME: Add this to a private variable, in ENameSelectorEntry Class*/
    g_object_set_data ((GObject *) name_selector_entry, "index", GINT_TO_POINTER (index));

    if (!destination || !e_destination_get_contact (destination))
        return FALSE;

    /* TODO: Unref destination when we finalize */
    name_selector_entry->priv->popup_destination = g_object_ref (destination);
    return FALSE;
}

static EBookClient *
find_client_by_contact (GSList *clients,
                        const gchar *contact_uid,
                        const gchar *source_uid)
{
    GSList *l;

    if (source_uid && *source_uid) {
        /* this is much quicket than asking each client for an existence */
        for (l = clients; l; l = g_slist_next (l)) {
            EBookClient *client = l->data;
            ESource *source = e_client_get_source (E_CLIENT (client));

            if (!source)
                continue;

            if (g_strcmp0 (source_uid, e_source_get_uid (source)) == 0)
                return client;
        }
    }

    for (l = clients; l; l = g_slist_next (l)) {
        EBookClient *client = l->data;
        EContact *contact = NULL;
        gboolean  result;

        result = e_book_client_get_contact_sync (client, contact_uid, &contact, NULL, NULL);
        if (contact)
            g_object_unref (contact);

        if (result)
            return client;
    }

    return NULL;
}

static void
editor_closed_cb (GtkWidget *editor,
                  gpointer data)
{
    EContact *contact;
    gchar *contact_uid;
    EDestination *destination;
    GSList *clients;
    EBookClient *book_client;
    gint email_num;
    ENameSelectorEntry *name_selector_entry = E_NAME_SELECTOR_ENTRY (data);

    destination = name_selector_entry->priv->popup_destination;
    contact = e_destination_get_contact (destination);
    if (!contact) {
        g_object_unref (name_selector_entry);
        return;
    }

    contact_uid = e_contact_get (contact, E_CONTACT_UID);
    if (!contact_uid) {
        g_object_unref (contact);
        g_object_unref (name_selector_entry);
        return;
    }

    if (name_selector_entry->priv->contact_store) {
        clients = e_contact_store_get_clients (name_selector_entry->priv->contact_store);
        book_client = find_client_by_contact (clients, contact_uid, e_destination_get_source_uid (destination));
        g_slist_free (clients);
    } else {
        book_client = NULL;
    }

    if (book_client) {
        contact = NULL;

        g_warn_if_fail (e_book_client_get_contact_sync (book_client, contact_uid, &contact, NULL, NULL));
        email_num = e_destination_get_email_num (destination);
        e_destination_set_contact (destination, contact, email_num);
        e_destination_set_client (destination, book_client);
    } else {
        contact = NULL;
    }

    g_free (contact_uid);
    if (contact)
        g_object_unref (contact);
    g_object_unref (name_selector_entry);
}

/* To parse something like...
 * =?UTF-8?Q?=E0=A4=95=E0=A4=95=E0=A4=AC=E0=A5=82=E0=A5=8B=E0=A5=87?=\t\n=?UTF-8?Q?=E0=A4=B0?=\t\n<aa@aa.ccom>
 * and return the decoded representation of name & email parts.
 * */
static gboolean
eab_parse_qp_email (const gchar *string,
                    gchar **name,
                    gchar **email)
{
    struct _camel_header_address *address;
    gboolean res = FALSE;

    address = camel_header_address_decode (string, "UTF-8");

    if (!address)
        return FALSE;

        /* report success only when we have filled both name and email address */
    if (address->type == CAMEL_HEADER_ADDRESS_NAME && address->name && *address->name && address->v.addr && *address->v.addr) {
                *name = g_strdup (address->name);
                *email = g_strdup (address->v.addr);
        res = TRUE;
    }

    camel_header_address_unref (address);

    return res;
}

static void
popup_activate_inline_expand (ENameSelectorEntry *name_selector_entry,
                              GtkWidget *menu_item)
{
    const gchar *text;
    GString *sanitized_text = g_string_new ("");
    EDestination *destination = name_selector_entry->priv->popup_destination;
    gint position, start, end;
    const GList *dests;

    position = GPOINTER_TO_INT (g_object_get_data ((GObject *) name_selector_entry, "index"));

    for (dests = e_destination_list_get_dests (destination); dests; dests = dests->next) {
        const EDestination *dest = dests->data;
        gchar *sanitized;
        gchar *name = NULL, *email = NULL, *tofree = NULL;

        if (!dest)
            continue;

        text = e_destination_get_textrep (dest, TRUE);

        if (!text || !*text)
            continue;

        if (eab_parse_qp_email (text, &name, &email)) {
            tofree = g_strdup_printf ("%s <%s>", name, email);
            text = tofree;
            g_free (name);
            g_free (email);
        }

        sanitized = sanitize_string (text);
        g_free (tofree);
        if (!sanitized)
            continue;

        if (*sanitized) {
            if (*sanitized_text->str)
                g_string_append (sanitized_text, ", ");

            g_string_append (sanitized_text, sanitized);
        }

        g_free (sanitized);
    }

    text = gtk_entry_get_text (GTK_ENTRY (name_selector_entry));
    get_range_at_position (text, position, &start, &end);
    gtk_editable_delete_text (GTK_EDITABLE (name_selector_entry), start, end);
    gtk_editable_insert_text (GTK_EDITABLE (name_selector_entry), sanitized_text->str, -1, &start);
    g_string_free (sanitized_text, TRUE);

    clear_completion_model (name_selector_entry);
    generate_attribute_list (name_selector_entry);
}

static void
popup_activate_contact (ENameSelectorEntry *name_selector_entry,
                        GtkWidget *menu_item)
{
    EBookClient  *book_client;
    GSList       *clients;
    EDestination *destination;
    EContact     *contact;
    gchar        *contact_uid;

    destination = name_selector_entry->priv->popup_destination;
    if (!destination)
        return;

    contact = e_destination_get_contact (destination);
    if (!contact)
        return;

    contact_uid = e_contact_get (contact, E_CONTACT_UID);
    if (!contact_uid)
        return;

    if (name_selector_entry->priv->contact_store) {
        clients = e_contact_store_get_clients (name_selector_entry->priv->contact_store);
        book_client = find_client_by_contact (clients, contact_uid, e_destination_get_source_uid (destination));
        g_slist_free (clients);
        g_free (contact_uid);
    } else {
        book_client = NULL;
    }

    if (!book_client)
        return;

    if (e_destination_is_evolution_list (destination)) {
        GtkWidget *contact_list_editor;

        if (!name_selector_entry->priv->contact_list_editor_func)
            return;

        contact_list_editor = (*name_selector_entry->priv->contact_list_editor_func) (book_client, contact, FALSE, TRUE);
        g_object_ref (name_selector_entry);
        g_signal_connect (
            contact_list_editor, "editor_closed",
            G_CALLBACK (editor_closed_cb), name_selector_entry);
    } else {
        GtkWidget *contact_editor;

        if (!name_selector_entry->priv->contact_editor_func)
            return;

        contact_editor = (*name_selector_entry->priv->contact_editor_func) (book_client, contact, FALSE, TRUE);
        g_object_ref (name_selector_entry);
        g_signal_connect (
            contact_editor, "editor_closed",
            G_CALLBACK (editor_closed_cb), name_selector_entry);
    }
}

static void
popup_activate_email (ENameSelectorEntry *name_selector_entry,
                      GtkWidget *menu_item)
{
    EDestination *destination;
    EContact     *contact;
    gint          email_num;

    destination = name_selector_entry->priv->popup_destination;
    if (!destination)
        return;

    contact = e_destination_get_contact (destination);
    if (!contact)
        return;

    email_num = GPOINTER_TO_INT (g_object_get_data (G_OBJECT (menu_item), "order"));
    e_destination_set_contact (destination, contact, email_num);
}

static void
popup_activate_list (EDestination *destination,
                     GtkWidget *item)
{
    gboolean status = gtk_check_menu_item_get_active (GTK_CHECK_MENU_ITEM (item));

    e_destination_set_ignored (destination, !status);
}

static void
popup_activate_cut (ENameSelectorEntry *name_selector_entry,
                    GtkWidget *menu_item)
{
    EDestination *destination;
    const gchar *contact_email;
    gchar *pemail = NULL;
    GtkClipboard *clipboard;

    destination = name_selector_entry->priv->popup_destination;
    contact_email =e_destination_get_textrep (destination, TRUE);

    g_signal_handlers_block_by_func (name_selector_entry, user_insert_text, name_selector_entry);
    g_signal_handlers_block_by_func (name_selector_entry, user_delete_text, name_selector_entry);

    clipboard = gtk_clipboard_get (GDK_SELECTION_PRIMARY);
    pemail = g_strconcat (contact_email, ",", NULL);
    gtk_clipboard_set_text (clipboard, pemail, strlen (pemail));

    clipboard = gtk_clipboard_get (GDK_SELECTION_CLIPBOARD);
    gtk_clipboard_set_text (clipboard, pemail, strlen (pemail));

    gtk_editable_delete_text (GTK_EDITABLE (name_selector_entry), 0, 0);
    e_destination_store_remove_destination (name_selector_entry->priv->destination_store, destination);

    g_free (pemail);
    g_signal_handlers_unblock_by_func (name_selector_entry, user_delete_text, name_selector_entry);
    g_signal_handlers_unblock_by_func (name_selector_entry, user_insert_text, name_selector_entry);
}

static void
popup_activate_copy (ENameSelectorEntry *name_selector_entry,
                     GtkWidget *menu_item)
{
    EDestination *destination;
    const gchar *contact_email;
    gchar *pemail;
    GtkClipboard *clipboard;

    destination = name_selector_entry->priv->popup_destination;
    contact_email = e_destination_get_textrep (destination, TRUE);

    g_signal_handlers_block_by_func (name_selector_entry, user_insert_text, name_selector_entry);
    g_signal_handlers_block_by_func (name_selector_entry, user_delete_text, name_selector_entry);

    clipboard = gtk_clipboard_get (GDK_SELECTION_PRIMARY);
    pemail = g_strconcat (contact_email, ",", NULL);
    gtk_clipboard_set_text (clipboard, pemail, strlen (pemail));

    clipboard = gtk_clipboard_get (GDK_SELECTION_CLIPBOARD);
    gtk_clipboard_set_text (clipboard, pemail, strlen (pemail));
    g_free (pemail);
    g_signal_handlers_unblock_by_func (name_selector_entry, user_delete_text, name_selector_entry);
    g_signal_handlers_unblock_by_func (name_selector_entry, user_insert_text, name_selector_entry);
}

static void
destination_set_list (GtkWidget *item,
                      EDestination *destination)
{
    EContact *contact;
    gboolean status = gtk_check_menu_item_get_active (GTK_CHECK_MENU_ITEM (item));

    contact = e_destination_get_contact (destination);
    if (!contact)
        return;

    e_destination_set_ignored (destination, !status);
}

static void
destination_set_email (GtkWidget *item,
                       EDestination *destination)
{
    gint email_num;
    EContact *contact;

    if (!gtk_check_menu_item_get_active (GTK_CHECK_MENU_ITEM (item)))
        return;
    contact = e_destination_get_contact (destination);
    if (!contact)
        return;

    email_num = GPOINTER_TO_INT (g_object_get_data (G_OBJECT (item), "order"));
    e_destination_set_contact (destination, contact, email_num);
}

static void
populate_popup (ENameSelectorEntry *name_selector_entry,
                GtkMenu *menu)
{
    EDestination *destination;
    EContact     *contact;
    GtkWidget    *menu_item;
    GList        *email_list = NULL;
    GList        *l;
    gint          i;
    gchar        *edit_label;
    gchar        *cut_label;
    gchar         *copy_label;
    gint          email_num, len;
    GSList       *group = NULL;
    gboolean      is_list;
    gboolean      show_menu = FALSE;

    destination = name_selector_entry->priv->popup_destination;
    if (!destination)
        return;

    contact = e_destination_get_contact (destination);
    if (!contact)
        return;

    /* Prepend the menu items, backwards */

    /* Separator */

    menu_item = gtk_separator_menu_item_new ();
    gtk_widget_show (menu_item);
    gtk_menu_shell_prepend (GTK_MENU_SHELL (menu), menu_item);
    email_num = e_destination_get_email_num (destination);

    /* Addresses */
    is_list = e_contact_get (contact, E_CONTACT_IS_LIST) ? TRUE : FALSE;
    if (is_list) {
        const GList *dests = e_destination_list_get_dests (destination);
        GList *iter;
        gint length = g_list_length ((GList *) dests);

        for (iter = (GList *) dests; iter; iter = iter->next) {
            EDestination *dest = (EDestination *) iter->data;
            const gchar *email = e_destination_get_email (dest);

            if (!email || *email == '\0')
                continue;

            if (length > 1) {
                menu_item = gtk_check_menu_item_new_with_label (email);
                g_signal_connect (
                    menu_item, "toggled",
                    G_CALLBACK (destination_set_list), dest);
            } else {
                menu_item = gtk_menu_item_new_with_label (email);
            }

            gtk_widget_show (menu_item);
            gtk_menu_shell_prepend (GTK_MENU_SHELL (menu), menu_item);
            show_menu = TRUE;

            if (length > 1) {
                gtk_check_menu_item_set_active (
                    GTK_CHECK_MENU_ITEM (menu_item),
                    !e_destination_is_ignored (dest));
                g_signal_connect_swapped (
                    menu_item, "activate",
                    G_CALLBACK (popup_activate_list), dest);
            }
        }

    } else {
        email_list = e_contact_get (contact, E_CONTACT_EMAIL);
        len = g_list_length (email_list);

        for (l = email_list, i = 0; l; l = g_list_next (l), i++) {
            gchar *email = l->data;

            if (!email || *email == '\0')
                continue;

            if (len > 1) {
                menu_item = gtk_radio_menu_item_new_with_label (group, email);
                group = gtk_radio_menu_item_get_group (GTK_RADIO_MENU_ITEM (menu_item));
                g_signal_connect (menu_item, "toggled", G_CALLBACK (destination_set_email), destination);
            } else {
                menu_item = gtk_menu_item_new_with_label (email);
            }

            gtk_widget_show (menu_item);
            gtk_menu_shell_prepend (GTK_MENU_SHELL (menu), menu_item);
            show_menu = TRUE;
            g_object_set_data (G_OBJECT (menu_item), "order", GINT_TO_POINTER (i));

            if (i == email_num && len > 1) {
                gtk_check_menu_item_set_active (GTK_CHECK_MENU_ITEM (menu_item), TRUE);
                g_signal_connect_swapped (
                    menu_item, "activate",
                    G_CALLBACK (popup_activate_email),
                    name_selector_entry);
            }
        }
    }

    /* Separator */

    if (show_menu) {
        menu_item = gtk_separator_menu_item_new ();
        gtk_widget_show (menu_item);
        gtk_menu_shell_prepend (GTK_MENU_SHELL (menu), menu_item);
    }

    /* Expand a list inline */
    if (is_list) {
        /* To Translators: This would be similiar to "Expand MyList Inline" where MyList is a Contact List*/
        edit_label = g_strdup_printf (_("E_xpand %s Inline"), (gchar *) e_contact_get_const (contact, E_CONTACT_FILE_AS));
        menu_item = gtk_menu_item_new_with_mnemonic (edit_label);
        g_free (edit_label);
        gtk_widget_show (menu_item);
        gtk_menu_shell_prepend (GTK_MENU_SHELL (menu), menu_item);
        g_signal_connect_swapped (
            menu_item, "activate", G_CALLBACK (popup_activate_inline_expand),
            name_selector_entry);

        /* Separator */
        menu_item = gtk_separator_menu_item_new ();
        gtk_widget_show (menu_item);
        gtk_menu_shell_prepend (GTK_MENU_SHELL (menu), menu_item);
    }

    /* Copy Contact Item */
    copy_label = g_strdup_printf (_("Cop_y %s"), (gchar *) e_contact_get_const (contact, E_CONTACT_FILE_AS));
    menu_item = gtk_menu_item_new_with_mnemonic (copy_label);
    g_free (copy_label);
    gtk_widget_show (menu_item);
    gtk_menu_shell_prepend (GTK_MENU_SHELL (menu), menu_item);

    g_signal_connect_swapped (
        menu_item, "activate", G_CALLBACK (popup_activate_copy),
        name_selector_entry);

    /* Cut Contact Item */
    cut_label = g_strdup_printf (_("C_ut %s"), (gchar *) e_contact_get_const (contact, E_CONTACT_FILE_AS));
    menu_item = gtk_menu_item_new_with_mnemonic (cut_label);
    g_free (cut_label);
    gtk_widget_show (menu_item);
    gtk_menu_shell_prepend (GTK_MENU_SHELL (menu), menu_item);

    g_signal_connect_swapped (
        menu_item, "activate", G_CALLBACK (popup_activate_cut),
        name_selector_entry);

    if (show_menu) {
        menu_item = gtk_separator_menu_item_new ();
        gtk_widget_show (menu_item);
        gtk_menu_shell_prepend (GTK_MENU_SHELL (menu), menu_item);
    }

    /* Edit Contact item */

    edit_label = g_strdup_printf (_("_Edit %s"), (gchar *) e_contact_get_const (contact, E_CONTACT_FILE_AS));
    menu_item = gtk_menu_item_new_with_mnemonic (edit_label);
    g_free (edit_label);
    gtk_widget_show (menu_item);
    gtk_menu_shell_prepend (GTK_MENU_SHELL (menu), menu_item);

    g_signal_connect_swapped (
        menu_item, "activate", G_CALLBACK (popup_activate_contact),
        name_selector_entry);

    deep_free_list (email_list);
}

static gint
compare_gint_ptr_cb (gconstpointer a,
                     gconstpointer b)
{
    return GPOINTER_TO_INT (a) - GPOINTER_TO_INT (b);
}

static void
copy_or_cut_clipboard (ENameSelectorEntry *name_selector_entry,
                       gboolean is_cut)
{
    GtkClipboard *clipboard;
    GtkEditable *editable;
    const gchar *text, *cp;
    GHashTable *hash;
    GHashTableIter iter;
    gpointer key, value;
    GSList *sorted, *siter;
    GString *addresses;
    gint ii, start, end, ostart, oend;
    gunichar uc;

    editable = GTK_EDITABLE (name_selector_entry);
    text = gtk_entry_get_text (GTK_ENTRY (editable));

    if (!gtk_editable_get_selection_bounds (editable, &start, &end))
        return;

    g_return_if_fail (end > start);

    hash = g_hash_table_new (g_direct_hash, g_direct_equal);

    /* convert from character indexes to pointer indexes */
    ostart = g_utf8_offset_to_pointer (text, start) - text;
    oend = g_utf8_offset_to_pointer (text, end) - text;

    ii = end;
    cp = g_utf8_offset_to_pointer (text, end);
    uc = g_utf8_get_char (cp);

    /* Exclude trailing whitespace and commas. */
    while (ii >= start && (uc == ',' || g_unichar_isspace (uc))) {
        cp = g_utf8_prev_char (cp);
        uc = g_utf8_get_char (cp);
        ii--;
    }

    /* Determine the index of each remaining character. */
    while (ii >= start) {
        gint index = get_index_at_position (text, ii--);
        g_hash_table_insert (hash, GINT_TO_POINTER (index), NULL);
    }

    sorted = NULL;
    g_hash_table_iter_init (&iter, hash);
    while (g_hash_table_iter_next (&iter, &key, &value)) {
        sorted = g_slist_prepend (sorted, key);
    }

    sorted = g_slist_sort (sorted, compare_gint_ptr_cb);
    addresses = g_string_new ("");

    for (siter = sorted; siter != NULL; siter = g_slist_next (siter)) {
        gint index = GPOINTER_TO_INT (siter->data);
        EDestination *dest;
        gint rstart, rend;

        if (!get_range_by_index (text, index, &rstart, &rend))
            continue;

        /* convert from character indexes to pointer indexes */
        rstart = g_utf8_offset_to_pointer (text, rstart) - text;
        rend = g_utf8_offset_to_pointer (text, rend) - text;

        if (rstart < ostart) {
            if (addresses->str && *addresses->str)
                g_string_append (addresses, ", ");

            g_string_append_len (addresses, text + ostart, MIN (oend - ostart, rend - ostart));
        } else if (rend > oend) {
            if (addresses->str && *addresses->str)
                g_string_append (addresses, ", ");

            g_string_append_len (addresses, text + rstart, oend - rstart);
        } else {
            /* the contact is whole selected */
            dest = find_destination_by_index (name_selector_entry, index);
            if (dest && e_destination_get_textrep (dest, TRUE)) {
                if (addresses->str && *addresses->str)
                    g_string_append (addresses, ", ");

                g_string_append (addresses, e_destination_get_textrep (dest, TRUE));
            } else
                g_string_append_len (addresses, text + rstart, rend - rstart);
        }
    }

    g_slist_free (sorted);

    if (is_cut)
        gtk_editable_delete_text (editable, start, end);

    g_hash_table_unref (hash);

    clipboard = gtk_widget_get_clipboard (
        GTK_WIDGET (name_selector_entry), GDK_SELECTION_CLIPBOARD);
    gtk_clipboard_set_text (clipboard, addresses->str, -1);

    g_string_free (addresses, TRUE);
}

static void
copy_clipboard (GtkEntry *entry,
                ENameSelectorEntry *name_selector_entry)
{
    copy_or_cut_clipboard (name_selector_entry, FALSE);
    g_signal_stop_emission_by_name (entry, "copy-clipboard");
}

static void
cut_clipboard (GtkEntry *entry,
               ENameSelectorEntry *name_selector_entry)
{
    copy_or_cut_clipboard (name_selector_entry, TRUE);
    g_signal_stop_emission_by_name (entry, "cut-clipboard");
}

static void
e_name_selector_entry_init (ENameSelectorEntry *name_selector_entry)
{
    GtkCellRenderer *renderer;

    name_selector_entry->priv =
        E_NAME_SELECTOR_ENTRY_GET_PRIVATE (name_selector_entry);

    g_queue_init (&name_selector_entry->priv->cancellables);

    name_selector_entry->priv->minimum_query_length = 3;
    name_selector_entry->priv->show_address = FALSE;

    /* Edit signals */

    g_signal_connect (
        name_selector_entry, "insert-text",
        G_CALLBACK (user_insert_text), name_selector_entry);
    g_signal_connect (
        name_selector_entry, "delete-text",
        G_CALLBACK (user_delete_text), name_selector_entry);
    g_signal_connect (
        name_selector_entry, "focus-out-event",
        G_CALLBACK (user_focus_out), name_selector_entry);
    g_signal_connect_after (
        name_selector_entry, "focus-in-event",
        G_CALLBACK (user_focus_in), name_selector_entry);

    /* Drawing */

    g_signal_connect (
        name_selector_entry, "draw",
        G_CALLBACK (draw_event), name_selector_entry);

    /* Activation: Complete current entry if possible */

    g_signal_connect (
        name_selector_entry, "activate",
        G_CALLBACK (entry_activate), name_selector_entry);

    /* Pop-up menu */

    g_signal_connect (
        name_selector_entry, "button-press-event",
        G_CALLBACK (prepare_popup_destination), name_selector_entry);
    g_signal_connect (
        name_selector_entry, "populate-popup",
        G_CALLBACK (populate_popup), name_selector_entry);

    /* Clipboard signals */
    g_signal_connect (
        name_selector_entry, "copy-clipboard",
        G_CALLBACK (copy_clipboard), name_selector_entry);
    g_signal_connect (
        name_selector_entry, "cut-clipboard",
        G_CALLBACK (cut_clipboard), name_selector_entry);

    /* Completion */

    name_selector_entry->priv->email_generator = NULL;

    name_selector_entry->priv->entry_completion = gtk_entry_completion_new ();
    gtk_entry_completion_set_match_func (
        name_selector_entry->priv->entry_completion,
        (GtkEntryCompletionMatchFunc) completion_match_cb, NULL, NULL);
    g_signal_connect_swapped (
        name_selector_entry->priv->entry_completion, "match-selected",
        G_CALLBACK (completion_match_selected), name_selector_entry);

    gtk_entry_set_completion (
        GTK_ENTRY (name_selector_entry),
        name_selector_entry->priv->entry_completion);

    renderer = gtk_cell_renderer_pixbuf_new ();
    gtk_cell_layout_pack_start (
        GTK_CELL_LAYOUT (name_selector_entry->priv->entry_completion),
        renderer, FALSE);
    gtk_cell_layout_set_cell_data_func (
        GTK_CELL_LAYOUT (name_selector_entry->priv->entry_completion),
        GTK_CELL_RENDERER (renderer),
        (GtkCellLayoutDataFunc) contact_layout_pixbuffer,
        name_selector_entry, NULL);

    /* Completion list name renderer */
    renderer = gtk_cell_renderer_text_new ();
    gtk_cell_layout_pack_start (
        GTK_CELL_LAYOUT (name_selector_entry->priv->entry_completion),
        renderer, TRUE);
    gtk_cell_layout_set_cell_data_func (
        GTK_CELL_LAYOUT (name_selector_entry->priv->entry_completion),
        GTK_CELL_RENDERER (renderer),
        (GtkCellLayoutDataFunc) contact_layout_formatter,
        name_selector_entry, NULL);

    /* Destination store */

    name_selector_entry->priv->destination_store = e_destination_store_new ();
    setup_destination_store (name_selector_entry);
    name_selector_entry->priv->is_completing = FALSE;
}

/**
 * e_name_selector_entry_new:
 * @client_cache: an #EClientCache
 *
 * Creates a new #ENameSelectorEntry.
 *
 * Returns: A new #ENameSelectorEntry.
 **/
GtkWidget *
e_name_selector_entry_new (EClientCache *client_cache)
{
    g_return_val_if_fail (E_IS_CLIENT_CACHE (client_cache), NULL);

    return g_object_new (
        E_TYPE_NAME_SELECTOR_ENTRY,
        "client-cache", client_cache, NULL);
}

/**
 * e_name_selector_entry_ref_client_cache:
 * @name_selector_entry: an #ENameSelectorEntry
 *
 * Returns the #EClientCache passed to e_name_selector_entry_new().
 *
 * The returned #EClientCache is referenced for thread-safety and must be
 * unreferenced with g_object_unref() when finished with it.
 *
 * Returns: an #EClientCache
 *
 * Since: 3.8
 **/
EClientCache *
e_name_selector_entry_ref_client_cache (ENameSelectorEntry *name_selector_entry)
{
    g_return_val_if_fail (
        E_IS_NAME_SELECTOR_ENTRY (name_selector_entry), NULL);

    if (name_selector_entry->priv->client_cache == NULL)
        return NULL;

    return g_object_ref (name_selector_entry->priv->client_cache);
}

/**
 * e_name_selector_entry_set_client_cache:
 * @name_selector_entry: an #ENameSelectorEntry
 * @client_cache: an #EClientCache
 *
 * Sets the #EClientCache used to query address books.
 *
 * This function is intended for cases where @name_selector_entry is
 * instantiated by a #GtkBuilder and has to be given an #EClientCache
 * after it is fully constructed.
 *
 * Since: 3.6
 **/
void
e_name_selector_entry_set_client_cache (ENameSelectorEntry *name_selector_entry,
                                        EClientCache *client_cache)
{
    g_return_if_fail (E_IS_NAME_SELECTOR_ENTRY (name_selector_entry));

    if (client_cache == name_selector_entry->priv->client_cache)
        return;

    if (client_cache != NULL) {
        g_return_if_fail (E_IS_CLIENT_CACHE (client_cache));
        g_object_ref (client_cache);
    }

    if (name_selector_entry->priv->client_cache != NULL)
        g_object_unref (name_selector_entry->priv->client_cache);

    name_selector_entry->priv->client_cache = client_cache;

    g_object_notify (G_OBJECT (name_selector_entry), "client-cache");
}

/**
 * e_name_selector_entry_get_minimum_query_length:
 * @name_selector_entry: an #ENameSelectorEntry
 *
 * Returns: Minimum length of query before completion starts
 *
 * Since: 3.6
 **/
gint
e_name_selector_entry_get_minimum_query_length (ENameSelectorEntry *name_selector_entry)
{
    g_return_val_if_fail (E_IS_NAME_SELECTOR_ENTRY (name_selector_entry), -1);

    return name_selector_entry->priv->minimum_query_length;
}

/**
 * e_name_selector_entry_set_minimum_query_length:
 * @name_selector_entry: an #ENameSelectorEntry
 * @length: minimum query length
 *
 * Sets minimum length of query before completion starts.
 *
 * Since: 3.6
 **/
void
e_name_selector_entry_set_minimum_query_length (ENameSelectorEntry *name_selector_entry,
                                                gint length)
{
    g_return_if_fail (E_IS_NAME_SELECTOR_ENTRY (name_selector_entry));
    g_return_if_fail (length > 0);

    if (name_selector_entry->priv->minimum_query_length == length)
        return;

    name_selector_entry->priv->minimum_query_length = length;

    g_object_notify (G_OBJECT (name_selector_entry), "minimum-query-length");
}

/**
 * e_name_selector_entry_get_show_address:
 * @name_selector_entry: an #ENameSelectorEntry
 *
 * Returns: Whether always show email address for an auto-completed contact.
 *
 * Since: 3.6
 **/
gboolean
e_name_selector_entry_get_show_address (ENameSelectorEntry *name_selector_entry)
{
    g_return_val_if_fail (E_IS_NAME_SELECTOR_ENTRY (name_selector_entry), FALSE);

    return name_selector_entry->priv->show_address;
}

/**
 * e_name_selector_entry_set_show_address:
 * @name_selector_entry: an #ENameSelectorEntry
 * @show: new value to set
 *
 * Sets whether always show email address for an auto-completed contact.
 *
 * Since: 3.6
 **/
void
e_name_selector_entry_set_show_address (ENameSelectorEntry *name_selector_entry,
                                        gboolean show)
{
    g_return_if_fail (E_IS_NAME_SELECTOR_ENTRY (name_selector_entry));

    if ((name_selector_entry->priv->show_address ? 1 : 0) == (show ? 1 : 0))
        return;

    name_selector_entry->priv->show_address = show;

    sanitize_entry (name_selector_entry);

    g_object_notify (G_OBJECT (name_selector_entry), "show-address");
}

/**
 * e_name_selector_entry_peek_contact_store:
 * @name_selector_entry: an #ENameSelectorEntry
 *
 * Gets the #EContactStore being used by @name_selector_entry.
 *
 * Returns: An #EContactStore.
 **/
EContactStore *
e_name_selector_entry_peek_contact_store (ENameSelectorEntry *name_selector_entry)
{
    g_return_val_if_fail (E_IS_NAME_SELECTOR_ENTRY (name_selector_entry), NULL);

    return name_selector_entry->priv->contact_store;
}

/**
 * e_name_selector_entry_set_contact_store:
 * @name_selector_entry: an #ENameSelectorEntry
 * @contact_store: an #EContactStore to use
 *
 * Sets the #EContactStore being used by @name_selector_entry to @contact_store.
 **/
void
e_name_selector_entry_set_contact_store (ENameSelectorEntry *name_selector_entry,
                                         EContactStore *contact_store)
{
    g_return_if_fail (E_IS_NAME_SELECTOR_ENTRY (name_selector_entry));
    g_return_if_fail (contact_store == NULL || E_IS_CONTACT_STORE (contact_store));

    if (contact_store == name_selector_entry->priv->contact_store)
        return;

    if (name_selector_entry->priv->contact_store)
        g_object_unref (name_selector_entry->priv->contact_store);
    name_selector_entry->priv->contact_store = contact_store;
    if (name_selector_entry->priv->contact_store)
        g_object_ref (name_selector_entry->priv->contact_store);

    setup_contact_store (name_selector_entry);
}

/**
 * e_name_selector_entry_peek_destination_store:
 * @name_selector_entry: an #ENameSelectorEntry
 *
 * Gets the #EDestinationStore being used to store @name_selector_entry's destinations.
 *
 * Returns: An #EDestinationStore.
 **/
EDestinationStore *
e_name_selector_entry_peek_destination_store (ENameSelectorEntry *name_selector_entry)
{
    g_return_val_if_fail (E_IS_NAME_SELECTOR_ENTRY (name_selector_entry), NULL);

    return name_selector_entry->priv->destination_store;
}

/**
 * e_name_selector_entry_set_destination_store:
 * @name_selector_entry: an #ENameSelectorEntry
 * @destination_store: an #EDestinationStore to use
 *
 * Sets @destination_store as the #EDestinationStore to be used to store
 * destinations for @name_selector_entry.
 **/
void
e_name_selector_entry_set_destination_store (ENameSelectorEntry *name_selector_entry,
                                             EDestinationStore *destination_store)
{
    g_return_if_fail (E_IS_NAME_SELECTOR_ENTRY (name_selector_entry));
    g_return_if_fail (E_IS_DESTINATION_STORE (destination_store));

    if (destination_store == name_selector_entry->priv->destination_store)
        return;

    g_object_unref (name_selector_entry->priv->destination_store);
    name_selector_entry->priv->destination_store = g_object_ref (destination_store);

    setup_destination_store (name_selector_entry);
}

/**
 * e_name_selector_entry_get_popup_destination:
 *
 * Since: 2.32
 **/
EDestination *
e_name_selector_entry_get_popup_destination (ENameSelectorEntry *name_selector_entry)
{
    g_return_val_if_fail (E_IS_NAME_SELECTOR_ENTRY (name_selector_entry), NULL);

    return name_selector_entry->priv->popup_destination;
}

/**
 * e_name_selector_entry_set_contact_editor_func:
 *
 * DO NOT USE.
 **/
void
e_name_selector_entry_set_contact_editor_func (ENameSelectorEntry *name_selector_entry,
                                               gpointer func)
{
    name_selector_entry->priv->contact_editor_func = func;
}

/**
 * e_name_selector_entry_set_contact_list_editor_func:
 *
 * DO NOT USE.
 **/
void
e_name_selector_entry_set_contact_list_editor_func (ENameSelectorEntry *name_selector_entry,
                                                    gpointer func)
{
    name_selector_entry->priv->contact_list_editor_func = func;
}