path: root/addressbook/gui/contact-editor/e-contact-editor.c

/* -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8 -*- */
/* 
 * e-contact-editor.c
 * Copyright (C) 2000  Ximian, Inc.
 * Author: Chris Lahey <clahey@ximian.com>
 *
 * This library is free software; you can redistribute it and/or
 * modify it under the terms of version 2 of the GNU 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 General Public
 * License along with this library; if not, write to the
 * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
 * Boston, MA 02111-1307, USA.
 */

#include <config.h>

#include "e-contact-editor.h"

#include <string.h>
#include <time.h>
#include <gtk/gtkcheckbutton.h>
#include <gtk/gtkcheckmenuitem.h>
#include <gtk/gtkcombo.h>
#include <gtk/gtktextview.h>
#include <gtk/gtkmessagedialog.h>
#include <gtk/gtkstock.h>
#include <gtk/gtkentry.h>
#include <gtk/gtklabel.h>
#include <libgnomeui/gnome-popup-menu.h>
#include <libgnomeui/gnome-window-icon.h>
#include <libgnome/gnome-util.h>
#include <libgnome/gnome-i18n.h>

#include <bonobo/bonobo-ui-container.h>
#include <bonobo/bonobo-ui-util.h>
#include <bonobo/bonobo-window.h>
#include <gdk-pixbuf/gdk-pixbuf.h>
#include <gal/widgets/e-categories.h>
#include <gal/widgets/e-gui-utils.h>
#include <gal/e-text/e-entry.h>

#include <libebook/e-address-western.h>

#include <e-util/e-categories-master-list-wombat.h>

#include <camel/camel.h>

#include "addressbook/gui/component/addressbook.h"
#include "addressbook/printing/e-contact-print.h"
#include "addressbook/printing/e-contact-print-envelope.h"
#include "addressbook/gui/widgets/eab-gui-util.h"
#include "e-util/e-gui-utils.h"
#include "widgets/misc/e-dateedit.h"
#include "widgets/misc/e-image-chooser.h"
#include "widgets/misc/e-url-entry.h"
#include "widgets/misc/e-source-option-menu.h"
#include "shell/evolution-shell-component-utils.h"

#include "eab-contact-merging.h"

#include "e-contact-editor-address.h"
#include "e-contact-editor-im.h"
#include "e-contact-editor-fullname.h"
#include "e-contact-editor-marshal.h"

/* Signal IDs */
enum {
    CONTACT_ADDED,
    CONTACT_MODIFIED,
    CONTACT_DELETED,
    EDITOR_CLOSED,
    LAST_SIGNAL
};

/* IM columns */
enum {
    COLUMN_IM_ICON,
    COLUMN_IM_SERVICE,
    COLUMN_IM_SCREENNAME,
    COLUMN_IM_LOCATION,
    COLUMN_IM_LOCATION_TYPE,
    COLUMN_IM_SERVICE_FIELD,
    NUM_IM_COLUMNS
};


static void e_contact_editor_init       (EContactEditor      *editor);
static void e_contact_editor_class_init (EContactEditorClass     *klass);
static void e_contact_editor_set_property (GObject *object, guint prop_id, const GValue *value, GParamSpec *pspec);
static void e_contact_editor_get_property (GObject *object, guint prop_id, GValue *value, GParamSpec *pspec);
static void e_contact_editor_dispose (GObject *object);

static void _email_arrow_pressed (GtkWidget *widget, GdkEventButton *button, EContactEditor *editor);
static void _phone_arrow_pressed (GtkWidget *widget, GdkEventButton *button, EContactEditor *editor);
static void _address_arrow_pressed (GtkWidget *widget, GdkEventButton *button, EContactEditor *editor);
static void set_im_fields(EContactEditor *editor);
#if 0
static void find_address_mailing (EContactEditor *editor);
#endif
static void enable_writable_fields(EContactEditor *editor);
static void set_editable(EContactEditor *editor);
static void fill_in_info(EContactEditor *editor);
static void extract_info(EContactEditor *editor);
static void set_field(EContactEditor *editor, GtkEntry *entry, const char *string);
static void set_address_field(EContactEditor *editor, int result);
static void set_phone_field(EContactEditor *editor, GtkWidget *entry, const char *phone_number);
static void set_fields(EContactEditor *editor);
static void command_state_changed (EContactEditor *ce);
static void widget_changed (GtkWidget *widget, EContactEditor *editor);
static void close_dialog (EContactEditor *ce);
static void enable_widget (GtkWidget *widget, gboolean enabled);

static GtkObjectClass *parent_class = NULL;

static guint contact_editor_signals[LAST_SIGNAL];

/* The arguments we take */
enum {
    PROP_0,
    PROP_SOURCE_BOOK,
    PROP_TARGET_BOOK,
    PROP_CONTACT,
    PROP_IS_NEW_CONTACT,
    PROP_EDITABLE,
    PROP_CHANGED,
    PROP_WRITABLE_FIELDS
};

enum {
    DYNAMIC_LIST_EMAIL,
    DYNAMIC_LIST_PHONE,
    DYNAMIC_LIST_ADDRESS
};

static EContactField phones[] = {
    E_CONTACT_PHONE_ASSISTANT,
    E_CONTACT_PHONE_BUSINESS,
    E_CONTACT_PHONE_BUSINESS_2,
    E_CONTACT_PHONE_BUSINESS_FAX,
    E_CONTACT_PHONE_CALLBACK,
    E_CONTACT_PHONE_CAR,
    E_CONTACT_PHONE_COMPANY,
    E_CONTACT_PHONE_HOME,
    E_CONTACT_PHONE_HOME_2,
    E_CONTACT_PHONE_HOME_FAX,
    E_CONTACT_PHONE_ISDN,
    E_CONTACT_PHONE_MOBILE,
    E_CONTACT_PHONE_OTHER,
    E_CONTACT_PHONE_OTHER_FAX,
    E_CONTACT_PHONE_PAGER,
    E_CONTACT_PHONE_PRIMARY,
    E_CONTACT_PHONE_RADIO,
    E_CONTACT_PHONE_TELEX,
    E_CONTACT_PHONE_TTYTDD,
};

static EContactField emails[] = {
    E_CONTACT_EMAIL_1,
    E_CONTACT_EMAIL_2,
    E_CONTACT_EMAIL_3
};

static GSList *all_contact_editors = NULL;

GType
e_contact_editor_get_type (void)
{
    static GType contact_editor_type = 0;

    if (!contact_editor_type) {
        static const GTypeInfo contact_editor_info =  {
            sizeof (EContactEditorClass),
            NULL,           /* base_init */
            NULL,           /* base_finalize */
            (GClassInitFunc) e_contact_editor_class_init,
            NULL,           /* class_finalize */
            NULL,           /* class_data */
            sizeof (EContactEditor),
            0,             /* n_preallocs */
            (GInstanceInitFunc) e_contact_editor_init,
        };

        contact_editor_type = g_type_register_static (GTK_TYPE_OBJECT, "EContactEditor", &contact_editor_info, 0);
    }

    return contact_editor_type;
}

static void
e_contact_editor_class_init (EContactEditorClass *klass)
{
  GObjectClass *object_class = G_OBJECT_CLASS (klass);

  parent_class = g_type_class_ref (GTK_TYPE_OBJECT);

  object_class->set_property = e_contact_editor_set_property;
  object_class->get_property = e_contact_editor_get_property;
  object_class->dispose = e_contact_editor_dispose;

  g_object_class_install_property (object_class, PROP_SOURCE_BOOK, 
                   g_param_spec_object ("source_book",
                            _("Source Book"),
                            /*_( */"XXX blurb" /*)*/,
                            E_TYPE_BOOK,
                            G_PARAM_READWRITE));

  g_object_class_install_property (object_class, PROP_TARGET_BOOK, 
                   g_param_spec_object ("target_book",
                            _("Target Book"),
                            /*_( */"XXX blurb" /*)*/,
                            E_TYPE_BOOK,
                            G_PARAM_READWRITE));

  g_object_class_install_property (object_class, PROP_CONTACT, 
                   g_param_spec_object ("contact",
                            _("Contact"),
                            /*_( */"XXX blurb" /*)*/,
                            E_TYPE_CONTACT,
                            G_PARAM_READWRITE));

  g_object_class_install_property (object_class, PROP_IS_NEW_CONTACT, 
                   g_param_spec_boolean ("is_new_contact",
                             _("Is New Contact"),
                             /*_( */"XXX blurb" /*)*/,
                             FALSE,
                             G_PARAM_READWRITE));

  g_object_class_install_property (object_class, PROP_WRITABLE_FIELDS, 
                   g_param_spec_object ("writable_fields",
                            _("Writable Fields"),
                            /*_( */"XXX blurb" /*)*/,
                            E_TYPE_LIST,
                            G_PARAM_READWRITE));

  g_object_class_install_property (object_class, PROP_EDITABLE, 
                   g_param_spec_boolean ("editable",
                             _("Editable"),
                             /*_( */"XXX blurb" /*)*/,
                             FALSE,
                             G_PARAM_READWRITE));

  g_object_class_install_property (object_class, PROP_CHANGED, 
                   g_param_spec_boolean ("changed",
                             _("Changed"),
                             /*_( */"XXX blurb" /*)*/,
                             FALSE,
                             G_PARAM_READWRITE));

  contact_editor_signals[CONTACT_ADDED] =
      g_signal_new ("contact_added",
            G_OBJECT_CLASS_TYPE (object_class),
            G_SIGNAL_RUN_FIRST,
            G_STRUCT_OFFSET (EContactEditorClass, contact_added),
            NULL, NULL,
            e_contact_editor_marshal_NONE__INT_OBJECT,
            G_TYPE_NONE, 2,
            G_TYPE_INT, G_TYPE_OBJECT);

  contact_editor_signals[CONTACT_MODIFIED] =
      g_signal_new ("contact_modified",
            G_OBJECT_CLASS_TYPE (object_class),
            G_SIGNAL_RUN_FIRST,
            G_STRUCT_OFFSET (EContactEditorClass, contact_modified),
            NULL, NULL,
            e_contact_editor_marshal_NONE__INT_OBJECT,
            G_TYPE_NONE, 2,
            G_TYPE_INT, G_TYPE_OBJECT);

  contact_editor_signals[CONTACT_DELETED] =
      g_signal_new ("contact_deleted",
            G_OBJECT_CLASS_TYPE (object_class),
            G_SIGNAL_RUN_FIRST,
            G_STRUCT_OFFSET (EContactEditorClass, contact_deleted),
            NULL, NULL,
            e_contact_editor_marshal_NONE__INT_OBJECT,
            G_TYPE_NONE, 2,
            G_TYPE_INT, G_TYPE_OBJECT);

  contact_editor_signals[EDITOR_CLOSED] =
      g_signal_new ("editor_closed",
            G_OBJECT_CLASS_TYPE (object_class),
            G_SIGNAL_RUN_FIRST,
            G_STRUCT_OFFSET (EContactEditorClass, editor_closed),
            NULL, NULL,
            e_contact_editor_marshal_NONE__NONE,
            G_TYPE_NONE, 0);
}

static void
connect_arrow_button_signal (EContactEditor *editor, gchar *button_xml, GCallback func)
{
    GladeXML *gui = editor->gui;
    GtkWidget *button = glade_xml_get_widget(gui, button_xml);
    if (button && GTK_IS_BUTTON(button)) {
        g_signal_connect(button, "button_press_event", func, editor);
    }
}

static void
connect_arrow_button_signals (EContactEditor *editor)
{
    connect_arrow_button_signal(editor, "button-phone1", G_CALLBACK (_phone_arrow_pressed));
    connect_arrow_button_signal(editor, "button-phone2", G_CALLBACK (_phone_arrow_pressed));
    connect_arrow_button_signal(editor, "button-phone3", G_CALLBACK (_phone_arrow_pressed));
    connect_arrow_button_signal(editor, "button-phone4", G_CALLBACK (_phone_arrow_pressed));
    connect_arrow_button_signal(editor, "button-address", G_CALLBACK (_address_arrow_pressed));
    connect_arrow_button_signal(editor, "button-email1", G_CALLBACK (_email_arrow_pressed));
}

static void
add_im_clicked(GtkWidget *widget, EContactEditor *editor)
{
    GtkDialog *dialog;
    int result;
    EVCardAttribute *new_attr;

    dialog = GTK_DIALOG(e_contact_editor_im_new(E_CONTACT_IM_AIM, "HOME", NULL));

    gtk_widget_show(GTK_WIDGET(dialog));
    result = gtk_dialog_run(dialog);
    gtk_widget_hide(GTK_WIDGET(dialog));

    if (result == GTK_RESPONSE_OK) {
        GList *new_list = NULL;
        EContactField service;
        const char *screenname;
        const char *location;

        g_object_get(dialog,
                 "service", &service,
                 "location", &location,
                 "username", &screenname,
                 NULL);

        new_list = e_contact_get_attributes (editor->contact, service);

        new_attr = e_vcard_attribute_new ("", e_contact_vcard_attribute (service));
        if (location)
            e_vcard_attribute_add_param_with_value (new_attr,
                                e_vcard_attribute_param_new (EVC_TYPE),
                                location);
        e_vcard_attribute_add_value (new_attr, screenname);

        new_list = g_list_append(new_list, new_attr);

        e_contact_set_attributes (editor->contact, service, new_list);

        e_vcard_attribute_free (new_attr);
        g_list_free(new_list);

        set_im_fields(editor);

        widget_changed(NULL, editor);
    }

    gtk_widget_destroy(GTK_WIDGET(dialog));
}

static void
edit_im_clicked(GtkWidget *widget, EContactEditor *editor)
{
    GtkWidget *treeview;
    GtkTreeSelection *selection;
    GtkDialog *dialog;
    GtkTreeIter iter;
    EContactField old_service, service;
    const char *old_location, *location;
    const char *old_screenname, *screenname;
    int result;
    EVCardAttribute *new_attr;

    treeview = glade_xml_get_widget(editor->gui, "treeview-im");

    selection = gtk_tree_view_get_selection(GTK_TREE_VIEW(treeview));

    if (! gtk_tree_selection_get_selected(selection, NULL, &iter) ) {
        return;
    } 
    
    gtk_tree_model_get(GTK_TREE_MODEL(editor->im_model), &iter,
               COLUMN_IM_SERVICE_FIELD, &old_service,
               COLUMN_IM_LOCATION_TYPE, &old_location,
               COLUMN_IM_SCREENNAME, &old_screenname,
               -1);

    dialog = GTK_DIALOG(e_contact_editor_im_new(old_service, old_location, old_screenname));

    gtk_widget_show(GTK_WIDGET(dialog));
    result = gtk_dialog_run(dialog);
    gtk_widget_hide(GTK_WIDGET(dialog));

    if (result == GTK_RESPONSE_OK) {
        GList *old_list, *new_list = NULL, *l;
        gboolean found;

        g_object_get(dialog,
                 "service", &service,
                 "location", &location,
                 "username", &screenname,
                 NULL);

        if (service == old_service &&
            ((!location && !old_location) ||
             (location && old_location &&
              !strcmp(old_location, location))) &&
            !strcmp(screenname, old_screenname)) {

            gtk_widget_destroy(GTK_WIDGET(dialog));
            return;
        }

        /* Remove the old. */
        old_list = e_contact_get_attributes (editor->contact, old_service);
        found = FALSE;

        for (l = old_list; l != NULL; l = l->next) {
            EVCardAttribute *attr = l->data;
            
            if (!found
                && !strcmp(e_vcard_attribute_get_value (attr), old_screenname)
                && ((old_location && e_vcard_attribute_has_type (attr, old_location))
                || (!old_location && !e_vcard_attribute_has_type (attr, "HOME") && !e_vcard_attribute_has_type (attr, "WORK")))) {
                e_vcard_attribute_free (attr);
                found = TRUE;
            }
            else {
                new_list = g_list_append(new_list, attr);
            }
        }
        g_list_free (old_list);

        /* create a new attribute based on the new screenname */
        new_attr = e_vcard_attribute_new ("", e_contact_vcard_attribute (service));
        if (location)
            e_vcard_attribute_add_param_with_value (new_attr,
                                e_vcard_attribute_param_new (EVC_TYPE),
                                location);
        e_vcard_attribute_add_value (new_attr, screenname);

        if (service == old_service) {
            /* we're just appending it to the same list again */
            new_list = g_list_append(new_list, new_attr);

            e_contact_set_attributes (editor->contact, old_service, new_list);
        }
        else {
            /* we're appending it to a different list, so
               we need to write out the old service's list
               and then get the new service's list, then
               add the new attribute to that.  so
               confusing! */
            e_contact_set_attributes (editor->contact, old_service, new_list);
        
            /* We have to add this elsewhere. */
            new_list = e_contact_get_attributes (editor->contact, service);

            new_list = g_list_append(new_list, new_attr);

            e_contact_set_attributes (editor->contact, service, new_list);
        }

        set_im_fields(editor);

        widget_changed(NULL, editor);
    }

    gtk_widget_destroy(GTK_WIDGET(dialog));
}

static void
remove_im_clicked(GtkWidget *widget, EContactEditor *editor)
{
    GtkWidget *treeview;
    GtkTreeSelection *selection;
    GtkTreeIter iter;
    EContactField old_service;
    const char *old_screenname;
    GList *old_list, *new_list = NULL, *l;

    treeview = glade_xml_get_widget(editor->gui, "treeview-im");

    selection = gtk_tree_view_get_selection(GTK_TREE_VIEW(treeview));

    gtk_tree_selection_get_selected(selection, NULL, &iter);

    gtk_tree_model_get(GTK_TREE_MODEL(editor->im_model), &iter,
                       COLUMN_IM_SERVICE_FIELD, &old_service,
                       COLUMN_IM_SCREENNAME, &old_screenname,
                       -1);

    old_list = e_contact_get(editor->contact, old_service);

    for (l = old_list; l != NULL; l = l->next) {
        const char *temp_screenname = (const char *)l->data;

        if (strcmp(temp_screenname, old_screenname))
            new_list = g_list_append(new_list, g_strdup(temp_screenname));
    }

    e_contact_set(editor->contact, old_service, new_list);

    if (new_list != NULL) {
        g_list_foreach(new_list, (GFunc)g_free, NULL);
        g_list_free(new_list);
    }

    gtk_list_store_remove(editor->im_model, &iter);

    widget_changed(NULL, editor);
}


static gboolean
im_button_press_cb(GtkWidget *treeview, GdkEventButton *event,
                   EContactEditor *editor)
{
    if (event->button == 1 && event->type == GDK_2BUTTON_PRESS)
        edit_im_clicked(NULL, editor);

    return FALSE;
}

static void
im_selected_cb(GtkTreeSelection *selection, EContactEditor *editor)
{
    gboolean sensitive = gtk_tree_selection_get_selected(selection, NULL, NULL);

    gtk_widget_set_sensitive(glade_xml_get_widget(editor->gui, "button-im-remove"), sensitive);
    gtk_widget_set_sensitive(glade_xml_get_widget(editor->gui, "button-im-edit"),   sensitive);
}


static void
im_treeview_drag_data_get_cb(GtkWidget *widget, GdkDragContext *dc,
                             GtkSelectionData *data, guint info,
                             guint time, EContactEditor *editor)
{
    if (data->target == gdk_atom_intern("application/x-im-contact", FALSE)) {
        GtkTreeRowReference *ref;
        GtkTreePath *sourcerow;
        GtkTreeIter iter;
        const char *protocol;
        const char *screenname;
        const char *alias;
        GString *str;
        char *mime_str;
        EContactField service_field;
        static char *protocols[] = { "aim", "nov", "jabber", "yahoo", "msn", "icq" };

        ref = g_object_get_data(G_OBJECT(dc), "gtk-tree-view-source-row");
        sourcerow = gtk_tree_row_reference_get_path(ref);

        if (!sourcerow)
            return;

        gtk_tree_model_get_iter(GTK_TREE_MODEL(editor->im_model), &iter,
                                sourcerow);

        gtk_tree_model_get(GTK_TREE_MODEL(editor->im_model), &iter,
                           COLUMN_IM_SERVICE_FIELD, &service_field,
                           COLUMN_IM_SCREENNAME, &screenname,
                           -1);

        alias = e_contact_get_const(editor->contact, E_CONTACT_FULL_NAME);

        protocol = protocols[service_field - E_CONTACT_IM_AIM];

        str = g_string_new(NULL);

        g_string_printf(str,
                "MIME-Version: 1.0\r\n"
                "Content-Type: application/x-im-contact\r\n"
                "X-IM-Protocol: %s\r\n"
                "X-IM-Username: %s\r\n",
                protocol,
                screenname);

        if (alias && *alias)
            g_string_append_printf(str, "X-IM-Alias: %s\r\n", alias);

        str = g_string_append(str, "\r\n");

        mime_str = g_string_free(str, FALSE);

        gtk_selection_data_set(data,
                       gdk_atom_intern("application/x-im-contact", FALSE),
                       8,
                       mime_str,
                       strlen(mime_str) + 1);

        g_free(mime_str);
        gtk_tree_path_free(sourcerow);
    }
}

static void
im_treeview_drag_data_rcv_cb(GtkWidget *widget, GdkDragContext *dc,
                 guint x, guint y, GtkSelectionData *sd,
                 guint info, guint t, EContactEditor *editor)
{
    if (sd->target == gdk_atom_intern("application/x-im-contact", FALSE) && sd->data) {
        CamelMimeParser *parser;
        CamelStream *stream;
        char *buffer;
        char *username = NULL;
        char *protocol = NULL;
        int len;
        int state;

        parser = camel_mime_parser_new();

        stream = camel_stream_mem_new_with_buffer(sd->data, sd->length);

        if (camel_mime_parser_init_with_stream(parser, stream) == -1) {
            g_warning("Unable to create parser for stream");
            return;
        }

        while ((state = camel_mime_parser_step(parser, &buffer, &len)) != CAMEL_MIME_PARSER_STATE_EOF) {
            if (state == CAMEL_MIME_PARSER_STATE_HEADER) {
                const char *temp;
                char *temp2;

                if ((temp = camel_mime_parser_header(parser, "X-IM-Username", NULL)) != NULL) {
                    temp2 = g_strdup(temp);
                    username = g_strdup(g_strstrip(temp2));
                    g_free(temp2);
                }

                if ((temp = camel_mime_parser_header(parser, "X-IM-Protocol", NULL)) != NULL) {
                    temp2 = g_strdup(temp);
                    protocol = g_strdup(g_strstrip(temp2));
                    g_free(temp2);
                }

                break;
            }
        }

        camel_object_unref(parser);

        if (username != NULL && protocol != NULL) {
            GList *old_list, *new_list = NULL, *l;
            EContactField field;
            gboolean found = FALSE;

            if (!strcmp(protocol, "aim"))
                field = E_CONTACT_IM_AIM;
            else if (!strcmp(protocol, "nov"))
                field = E_CONTACT_IM_GROUPWISE;
            else if (!strcmp(protocol, "icq"))
                field = E_CONTACT_IM_ICQ;
            else if (!strcmp(protocol, "yahoo"))
                field = E_CONTACT_IM_YAHOO;
            else if (!strcmp(protocol, "msn"))
                field = E_CONTACT_IM_MSN;
            else if (!strcmp(protocol, "jabber"))
                field = E_CONTACT_IM_JABBER;
            else {
                g_free(username);
                g_free(protocol);
                gtk_drag_finish(dc, FALSE, (dc->action == GDK_ACTION_MOVE), t);
                return;
            }

            old_list = e_contact_get(editor->contact, field);

            for (l = old_list; l != NULL; l = l->next) {
                const char *name = (const char *)l->data;

                if (!strcmp(name, username)) {
                    found = TRUE;
                    break;
                }

                new_list = g_list_append(new_list, g_strdup(l->data));
            }

            if (!found) {
                new_list = g_list_append(new_list, g_strdup(username));

                e_contact_set(editor->contact, field, new_list);
            }

            if (new_list != NULL) {
                g_list_foreach(new_list, (GFunc)g_free, NULL);
                g_list_free(new_list);
            }

            set_im_fields(editor);
        }

        if (username != NULL)
            g_free(username);

        if (protocol != NULL)
            g_free(protocol);

        gtk_drag_finish(dc, TRUE, (dc->action == GDK_ACTION_MOVE), t);
    }
}

static void
setup_im_treeview(EContactEditor *editor)
{
    GtkWidget *treeview;
    GtkTreeSelection *selection;
    GtkTreeViewColumn *column;
    GtkCellRenderer *renderer;
    GtkTargetEntry gte[] = {{"application/x-im-contact", 0, 0}};

    treeview = glade_xml_get_widget(editor->gui, "treeview-im");

    if (!treeview || !GTK_IS_TREE_VIEW(treeview))
        return;

    editor->im_model = gtk_list_store_new(NUM_IM_COLUMNS,
                          GDK_TYPE_PIXBUF, G_TYPE_STRING,
                          G_TYPE_STRING, G_TYPE_STRING, G_TYPE_STRING, G_TYPE_INT);

    gtk_tree_view_set_model(GTK_TREE_VIEW(treeview),
                GTK_TREE_MODEL(editor->im_model));

    g_signal_connect(G_OBJECT(treeview), "button-press-event",
             G_CALLBACK(im_button_press_cb), editor);

    column = gtk_tree_view_column_new();
    gtk_tree_view_column_set_title(column, _("Service"));
    gtk_tree_view_insert_column(GTK_TREE_VIEW(treeview), column, -1);

    renderer = gtk_cell_renderer_pixbuf_new();
    gtk_tree_view_column_pack_start(column, renderer, FALSE);
    gtk_tree_view_column_add_attribute(column, renderer,
                       "pixbuf", COLUMN_IM_ICON);

    renderer = gtk_cell_renderer_text_new();
    gtk_tree_view_column_pack_start(column, renderer, TRUE);
    gtk_tree_view_column_add_attribute(column, renderer,
                       "text", COLUMN_IM_SERVICE);

    column = gtk_tree_view_column_new();
    gtk_tree_view_column_set_title(column, _("Account Name"));
    gtk_tree_view_insert_column(GTK_TREE_VIEW(treeview), column, -1);
    
    renderer = gtk_cell_renderer_text_new();
    gtk_tree_view_column_pack_start(column, renderer, TRUE);
    gtk_tree_view_column_add_attribute(column, renderer,
                       "text", COLUMN_IM_SCREENNAME);

    column = gtk_tree_view_column_new();
    gtk_tree_view_column_set_title(column, _("Location"));
    gtk_tree_view_insert_column(GTK_TREE_VIEW(treeview), column, -1);
    
    renderer = gtk_cell_renderer_text_new();
    gtk_tree_view_column_pack_start(column, renderer, TRUE);
    gtk_tree_view_column_add_attribute(column, renderer,
                       "text", COLUMN_IM_LOCATION);

    selection = gtk_tree_view_get_selection(GTK_TREE_VIEW(treeview));
    g_signal_connect(G_OBJECT(selection), "changed",
             G_CALLBACK(im_selected_cb), editor);

    /* Setup drag-and-drop */
    gtk_tree_view_enable_model_drag_source(GTK_TREE_VIEW(treeview),
                           GDK_BUTTON1_MASK, gte, 1,
                           GDK_ACTION_COPY);
    gtk_tree_view_enable_model_drag_dest(GTK_TREE_VIEW(treeview),
                         gte, 1,
                         GDK_ACTION_COPY | GDK_ACTION_MOVE);

    g_signal_connect(G_OBJECT(treeview), "drag-data-get",
             G_CALLBACK(im_treeview_drag_data_get_cb), editor);
    g_signal_connect(G_OBJECT(treeview), "drag-data-received",
             G_CALLBACK(im_treeview_drag_data_rcv_cb), editor);
}

static void
wants_html_changed (GtkWidget *widget, EContactEditor *editor)
{
    gboolean wants_html;
    g_object_get (widget,
              "active", &wants_html,
              NULL);

    e_contact_set (editor->contact, E_CONTACT_WANTS_HTML, GINT_TO_POINTER (wants_html));

    widget_changed (widget, editor);
}

static void
phone_entry_changed (GtkWidget *widget, EContactEditor *editor)
{
    int which;
    GtkEntry *entry = GTK_ENTRY(widget);

    if ( widget == glade_xml_get_widget(editor->gui, "entry-phone1") )
        which = 1;
    else if ( widget == glade_xml_get_widget(editor->gui, "entry-phone2") )
        which = 2;
    else if ( widget == glade_xml_get_widget(editor->gui, "entry-phone3") )
        which = 3;
    else if ( widget == glade_xml_get_widget(editor->gui, "entry-phone4") )
        which = 4;
    else
        return;

    e_contact_set(editor->contact, editor->phone_choice[which - 1], (char*)gtk_entry_get_text(entry));

    widget_changed (widget, editor);
}

static void
email_entry_changed (GtkWidget *widget, EContactEditor *editor)
{
    GtkEntry *entry = GTK_ENTRY(widget);

    e_contact_set (editor->contact, editor->email_choice, (char*)gtk_entry_get_text(entry));

    widget_changed (widget, editor);
}

static gchar *
address_to_text (const EContactAddress *address)
{
    GString *text;
    gchar *str;

    text = g_string_new ("");

    if (address->street && *address->street) {
        g_string_append (text, address->street);
        g_string_append_c (text, '\n');
    }
    if (address->ext && *address->ext) {
        g_string_append (text, address->ext);
        g_string_append_c (text, '\n');
    }
    if (address->po && *address->po) {
        g_string_append (text, address->po);
        g_string_append_c (text, '\n');
    }
    if (address->locality && *address->locality) {
        g_string_append (text, address->locality);
        g_string_append_c (text, '\n');
    }
    if (address->region && *address->region) {
        g_string_append (text, address->region);
        g_string_append_c (text, '\n');
    }
    if (address->code && *address->code) {
        g_string_append (text, address->code);
        g_string_append_c (text, '\n');
    }
    if (address->country && *address->country) {
        g_string_append (text, address->country);
        g_string_append_c (text, '\n');
    }

    str = text->str;
    g_string_free (text, FALSE);
    return str;
}

static EContactAddress *
text_to_address (const gchar *text)
{
    EAddressWestern *western;
    EContactAddress *address;

    g_return_val_if_fail (text != NULL, NULL);

    western = e_address_western_parse (text);
    if (!western)
        return NULL;

    address = g_new0 (EContactAddress, 1);
    address->po = western->po_box;
    address->ext = western->extended;
    address->street = western->street;
    address->locality = western->locality;
    address->region = western->region;
    address->code = western->postal_code;
    address->country = western->country;

    g_free (western);

    return address;
}

static void
address_text_changed (GtkTextBuffer *buffer, EContactEditor *editor)
{
    EContactAddress *address;
    GtkTextIter start_iter, end_iter;
    gchar *text;

    g_print ("editor->address_choice == %d\n", editor->address_choice);

    if (editor->address_choice == -1)
        return;

    gtk_text_buffer_get_start_iter (GTK_TEXT_BUFFER (buffer), &start_iter);
    gtk_text_buffer_get_end_iter (GTK_TEXT_BUFFER (buffer), &end_iter);

    text = gtk_text_buffer_get_text (GTK_TEXT_BUFFER (buffer), &start_iter, &end_iter, FALSE);
    address = text_to_address (text);
    g_free (text);

    if (editor->address_mailing == editor->address_choice || editor->address_mailing == -1) {
        GtkWidget *check;

#if 0
        address->flags |= E_CARD_ADDR_DEFAULT;
#endif

        check = glade_xml_get_widget(editor->gui, "checkbutton-mailingaddress");
        if (check && GTK_IS_CHECK_BUTTON (check)) {
            g_signal_handlers_block_matched (check,
                             G_SIGNAL_MATCH_DATA,
                             0, 0,
                             NULL, NULL, editor);
            gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (check), TRUE);
            g_signal_handlers_unblock_matched (check,
                               G_SIGNAL_MATCH_DATA,
                               0, 0,
                               NULL, NULL, editor);
        }
    }
    
    e_contact_set (editor->contact, editor->address_choice, address);

    g_boxed_free (e_contact_address_get_type (), address);

    widget_changed (NULL, editor);
}


static void
address_mailing_changed (GtkWidget *widget, EContactEditor *editor)
{
#if notyet
    const ECardDeliveryAddress *curr;
    ECardDeliveryAddress *address;
    gboolean mailing_address;

    if (editor->address_choice == -1)
        return;

    mailing_address = gtk_toggle_button_get_active (GTK_TOGGLE_BUTTON (widget));
    
    /* Mark the current address as the mailing address */
    curr = e_card_simple_get_delivery_address (editor->simple,
                           editor->address_choice);

    address = e_card_delivery_address_copy (curr);

    if (!address)
        address = e_card_delivery_address_new ();

    if (mailing_address)
        address->flags |= E_CARD_ADDR_DEFAULT;
    else
        address->flags &= ~E_CARD_ADDR_DEFAULT;

    e_card_simple_set_delivery_address(editor->simple, editor->address_choice, address);
    e_card_delivery_address_unref (address);

    /* Unset the previous mailing address flag */
    if (mailing_address && editor->address_mailing != -1) {
        const ECardDeliveryAddress *curr;

        curr = e_card_simple_get_delivery_address(editor->simple, 
                              editor->address_mailing);
        address = e_card_delivery_address_copy (curr);
        address->flags &= ~E_CARD_ADDR_DEFAULT;
        e_card_simple_set_delivery_address(editor->simple, 
                           editor->address_mailing,
                           address);
        e_card_delivery_address_unref (address);
    }

    /* Remember the new mailing address */
    if (mailing_address)
        editor->address_mailing = editor->address_choice;
    else
        editor->address_mailing = -1;

    widget_changed (widget, editor);
#endif
}

static void
new_target_cb (EBook *new_book, EBookStatus status, EContactEditor *editor)
{
    editor->load_source_id = 0;
    editor->load_book      = NULL;

    if (status != E_BOOK_ERROR_OK || new_book == NULL) {
        GtkWidget *source_option_menu;

        addressbook_show_load_error_dialog (NULL, e_book_get_source (new_book), status);

        source_option_menu = glade_xml_get_widget (editor->gui, "source-option-menu-source");
        e_source_option_menu_select (E_SOURCE_OPTION_MENU (source_option_menu),
                         e_book_get_source (editor->target_book));

        if (new_book)
            g_object_unref (new_book);
        return;
    }

    g_object_set (editor, "target_book", new_book, NULL);
    g_object_unref (new_book);
    widget_changed (NULL, editor);
}

static void
cancel_load (EContactEditor *editor)
{
    if (editor->load_source_id) {
        addressbook_load_source_cancel (editor->load_source_id);
        editor->load_source_id = 0;

        g_object_unref (editor->load_book);
        editor->load_book = NULL;
    }
}

static void
source_selected (GtkWidget *source_option_menu, ESource *source, EContactEditor *editor)
{
    cancel_load (editor);

    if (e_source_equal (e_book_get_source (editor->target_book), source))
        return;

    if (e_source_equal (e_book_get_source (editor->source_book), source)) {
        g_object_set (editor, "target_book", editor->source_book, NULL);
        return;
    }

    editor->load_book = e_book_new ();
    editor->load_source_id = addressbook_load_source (editor->load_book, source,
                              (EBookCallback) new_target_cb, editor);
}

/* This function tells you whether name_to_style will make sense.  */
static gboolean
style_makes_sense(const EContactName *name, char *company, int style)
{
    switch (style) {
    case 0: /* Fall Through */
    case 1:
        return TRUE;
    case 2:
        if (company && *company)
            return TRUE;
        else
            return FALSE;
    case 3: /* Fall Through */
    case 4:
        if (company && *company && name && ((name->given && *name->given) || (name->family && *name->family)))
            return TRUE;
        else
            return FALSE;
    default:
        return FALSE;
    }
}

static char *
name_to_style(const EContactName *name, char *company, int style)
{
    char *string;
    char *strings[4], **stringptr;
    char *substring;
    switch (style) {
    case 0:
        stringptr = strings;
        if (name) {
            if (name->family && *name->family)
                *(stringptr++) = name->family;
            if (name->given && *name->given)
                *(stringptr++) = name->given;
        }
        *stringptr = NULL;
        string = g_strjoinv(", ", strings);
        break;
    case 1:
        stringptr = strings;
        if (name) {
            if (name->given && *name->given)
                *(stringptr++) = name->given;
            if (name->family && *name->family)
                *(stringptr++) = name->family;
        }
        *stringptr = NULL;
        string = g_strjoinv(" ", strings);
        break;
    case 2:
        string = g_strdup(company);
        break;
    case 3: /* Fall Through */
    case 4:
        stringptr = strings;
        if (name) {
            if (name->family && *name->family)
                *(stringptr++) = name->family;
            if (name->given && *name->given)
                *(stringptr++) = name->given;
        }
        *stringptr = NULL;
        substring = g_strjoinv(", ", strings);
        if (!(company && *company))
            company = "";
        if (style == 3)
            string = g_strdup_printf("%s (%s)", substring, company);
        else
            string = g_strdup_printf("%s (%s)", company, substring);
        g_free(substring);
        break;
    default:
        string = g_strdup("");
    }
    return string;
}

static int
file_as_get_style (EContactEditor *editor)
{
    GtkEntry *file_as = GTK_ENTRY(glade_xml_get_widget(editor->gui, "entry-file-as"));
    char *filestring;
    char *trystring;
    EContactName *name = editor->name;
    int i;
    int style;

    if (!(file_as && GTK_IS_ENTRY(file_as)))
        return -1;

    filestring = g_strdup (gtk_entry_get_text(file_as));

    style = -1;
    for (i = 0; i < 5; i++) {
        trystring = name_to_style(name, editor->company, i);
        if (!strcmp(trystring, filestring)) {
            g_free(trystring);
            g_free(filestring);
            return i;
        }
        g_free(trystring);
    }
    g_free (filestring);
    return -1;
}

static void
file_as_set_style(EContactEditor *editor, int style)
{
    char *string;
    int i;
    GList *strings = NULL;
    GtkEntry *file_as = GTK_ENTRY(glade_xml_get_widget(editor->gui, "entry-file-as"));
    GtkWidget *widget;
        

    if (!(file_as && GTK_IS_ENTRY(file_as)))
        return;

    if (style == -1) {
        string = g_strdup (gtk_entry_get_text(file_as));
        strings = g_list_append(strings, string);
    }

    widget = glade_xml_get_widget(editor->gui, "combo-file-as");

    for (i = 0; i < 5; i++) {
        if (style_makes_sense(editor->name, editor->company, i)) {
            char *u;
            u = name_to_style(editor->name, editor->company, i);
            if (u) strings = g_list_append(strings, u);
        }
    }

    if (widget && GTK_IS_COMBO(widget)) {
        GtkCombo *combo = GTK_COMBO(widget);
        gtk_combo_set_popdown_strings(combo, strings);
        g_list_foreach(strings, (GFunc) g_free, NULL);
        g_list_free(strings);
    }

    if (style != -1) {
        string = name_to_style(editor->name, editor->company, style);
        gtk_entry_set_text(file_as, string);
        g_free(string);
    }
}

static void
name_entry_changed (GtkWidget *widget, EContactEditor *editor)
{
    int style = 0;
    const char *string;

    style = file_as_get_style(editor);

    e_contact_name_free (editor->name);

    string = gtk_entry_get_text (GTK_ENTRY(widget));

    editor->name = e_contact_name_from_string(string);
    
    file_as_set_style(editor, style);

    widget_changed (widget, editor);
}

static void
company_entry_changed (GtkWidget *widget, EContactEditor *editor)
{
    int style = 0;

    style = file_as_get_style(editor);
    
    g_free(editor->company);
    
    editor->company = g_strdup (gtk_entry_get_text(GTK_ENTRY(widget)));
    
    file_as_set_style(editor, style);

    widget_changed (widget, editor);
}

static void
image_chooser_changed (GtkWidget *widget, EContactEditor *editor)
{
    editor->image_set = TRUE;

    widget_changed (widget, editor);
}

static void
field_changed (GtkWidget *widget, EContactEditor *editor)
{
    if (!editor->changed) {
        editor->changed = TRUE;
        command_state_changed (editor);
    }
}

static void
set_entry_changed_signal_phone(EContactEditor *editor, char *id)
{
    GtkWidget *widget = glade_xml_get_widget(editor->gui, id);
    if (widget && GTK_IS_ENTRY(widget))
        g_signal_connect(widget, "changed",
                 G_CALLBACK (phone_entry_changed), editor);
}

static void
set_entry_changed_signal_email(EContactEditor *editor, char *id)
{
    GtkWidget *widget = glade_xml_get_widget(editor->gui, id);
    if (widget && GTK_IS_ENTRY(widget))
        g_signal_connect(widget, "changed",
                 G_CALLBACK (email_entry_changed), editor);
}

static void
widget_changed (GtkWidget *widget, EContactEditor *editor)
{
    if (!editor->target_editable) {
        g_warning ("non-editable contact editor has an editable field in it.");
        return;
    }

    if (!editor->changed) {
        editor->changed = TRUE;
        command_state_changed (editor);
    }
}

static void
set_entry_changed_signal_field(EContactEditor *editor, char *id)
{
    GtkWidget *widget = glade_xml_get_widget(editor->gui, id);
    if (widget && GTK_IS_ENTRY(widget))
        g_signal_connect(widget, "changed",
                 G_CALLBACK (field_changed), editor);
}

static void
set_urlentry_changed_signal_field (EContactEditor *editor, char *id)
{
    GtkWidget *widget = glade_xml_get_widget(editor->gui, id);
    if (widget && E_IS_URL_ENTRY(widget)) {
        GtkWidget *entry = e_url_entry_get_entry (E_URL_ENTRY (widget));
        g_signal_connect (entry, "changed",
                  G_CALLBACK (field_changed), editor);
    }
}

static void
set_entry_changed_signals(EContactEditor *editor)
{
    GtkWidget *widget;
    set_entry_changed_signal_phone(editor, "entry-phone1");
    set_entry_changed_signal_phone(editor, "entry-phone2");
    set_entry_changed_signal_phone(editor, "entry-phone3");
    set_entry_changed_signal_phone(editor, "entry-phone4");

    set_entry_changed_signal_email(editor, "entry-email1");

    widget = glade_xml_get_widget(editor->gui, "text-address");
    if (widget && GTK_IS_TEXT_VIEW(widget)) {
        GtkTextBuffer *buffer = gtk_text_view_get_buffer (GTK_TEXT_VIEW (widget));
        g_signal_connect(buffer, "changed",
                 G_CALLBACK (address_text_changed), editor);
    }

    widget = glade_xml_get_widget(editor->gui, "entry-fullname");
    if (widget && GTK_IS_ENTRY(widget)) {
        g_signal_connect (widget, "changed",
                  G_CALLBACK (name_entry_changed), editor);
    }

    widget = glade_xml_get_widget(editor->gui, "entry-company");
    if (widget && GTK_IS_ENTRY(widget)) {
        g_signal_connect (widget, "changed",
                  G_CALLBACK (company_entry_changed), editor);
    }

    set_urlentry_changed_signal_field (editor, "entry-web");
    set_urlentry_changed_signal_field (editor, "entry-blog");
    set_urlentry_changed_signal_field (editor, "entry-caluri");
    set_urlentry_changed_signal_field (editor, "entry-fburl");
    set_urlentry_changed_signal_field (editor, "entry-videourl");

    set_entry_changed_signal_field(editor, "entry-categories");
    set_entry_changed_signal_field(editor, "entry-jobtitle");
    set_entry_changed_signal_field(editor, "entry-file-as");
    set_entry_changed_signal_field(editor, "entry-manager");
    set_entry_changed_signal_field(editor, "entry-assistant");
    set_entry_changed_signal_field(editor, "entry-office");
    set_entry_changed_signal_field(editor, "entry-department");
    set_entry_changed_signal_field(editor, "entry-profession");
    set_entry_changed_signal_field(editor, "entry-nickname");
    set_entry_changed_signal_field(editor, "entry-spouse");

    widget = glade_xml_get_widget(editor->gui, "text-comments");
    if (widget && GTK_IS_TEXT_VIEW(widget)) {
        GtkTextBuffer *buffer = gtk_text_view_get_buffer (GTK_TEXT_VIEW (widget));
        g_signal_connect (buffer, "changed",
                  G_CALLBACK (widget_changed), editor);
    }
    widget = glade_xml_get_widget(editor->gui, "dateedit-birthday");
    if (widget && E_IS_DATE_EDIT(widget)) {
        g_signal_connect (widget, "changed",
                  G_CALLBACK (widget_changed), editor);
    }
    widget = glade_xml_get_widget(editor->gui, "dateedit-anniversary");
    if (widget && E_IS_DATE_EDIT(widget)) {
        g_signal_connect (widget, "changed",
                  G_CALLBACK (widget_changed), editor);
    }

    widget = glade_xml_get_widget (editor->gui, "image-chooser");
    if (widget && E_IS_IMAGE_CHOOSER (widget)) {
        g_signal_connect (widget, "changed",
                  G_CALLBACK (image_chooser_changed), editor);
    }
}

static void
full_name_clicked(GtkWidget *button, EContactEditor *editor)
{
    GtkDialog *dialog = GTK_DIALOG(e_contact_editor_fullname_new(editor->name));
    int result;

    g_object_set (dialog,
              "editable", editor->fullname_editable,
              NULL);
    gtk_widget_show(GTK_WIDGET(dialog));
    result = gtk_dialog_run (dialog);
    gtk_widget_hide (GTK_WIDGET (dialog));

    if (editor->fullname_editable && result == GTK_RESPONSE_OK) {
        EContactName *name;
        GtkWidget *fname_widget;
        int style = 0;

        g_object_get (dialog,
                  "name", &name,
                  NULL);

        style = file_as_get_style(editor);

        fname_widget = glade_xml_get_widget(editor->gui, "entry-fullname");
        if (fname_widget && GTK_IS_ENTRY(fname_widget)) {
            char *full_name = e_contact_name_to_string(name);
            gtk_entry_set_text(GTK_ENTRY(fname_widget), full_name);
            g_free(full_name);
        }

        e_contact_name_free(editor->name);
        editor->name = name;

        file_as_set_style(editor, style);
    }
    gtk_widget_destroy (GTK_WIDGET (dialog));
}

static void
full_addr_clicked(GtkWidget *button, EContactEditor *editor)
{
    GtkDialog *dialog;
    int result;
    EContactAddress *address;

    address = e_contact_get (editor->contact, editor->address_choice);

    dialog = GTK_DIALOG(e_contact_editor_address_new(address));
    g_object_set (dialog,
              "editable", editor->address_editable[editor->address_choice - E_CONTACT_FIRST_ADDRESS_ID],
              NULL);
    gtk_widget_show(GTK_WIDGET(dialog));

    result = gtk_dialog_run (dialog);

    gtk_widget_hide (GTK_WIDGET (dialog));

    if (editor->address_editable[editor->address_choice - E_CONTACT_FIRST_ADDRESS_ID] && result == GTK_RESPONSE_OK) {
        EContactAddress *new_address;
        GtkWidget *address_widget;
        int saved_choice = editor->address_choice;

        editor->address_choice = -1;

        g_object_get (dialog,
                  "address", &new_address,
                  NULL);

        address_widget = glade_xml_get_widget(editor->gui, "text-address");
        if (address_widget && GTK_IS_TEXT_VIEW(address_widget)) {
            GtkTextBuffer *buffer;
            char *string = address_to_text (new_address);

            buffer = gtk_text_view_get_buffer (GTK_TEXT_VIEW (address_widget));

            gtk_text_buffer_set_text (buffer, string, strlen (string));

            g_free(string);
        }

        editor->address_choice = saved_choice;

        e_contact_set (editor->contact, editor->address_choice, new_address);

        g_boxed_free (e_contact_address_get_type (), new_address);

        widget_changed (NULL, editor);
    }
    gtk_widget_destroy (GTK_WIDGET (dialog));

    g_boxed_free (e_contact_address_get_type (), address);
}

static void
categories_clicked(GtkWidget *button, EContactEditor *editor)
{
    char *categories = NULL;
    GtkDialog *dialog;
    int result;
    GtkWidget *entry = glade_xml_get_widget(editor->gui, "entry-categories");
    ECategoriesMasterList *ecml;
    if (entry && GTK_IS_ENTRY(entry))
        categories = g_strdup (gtk_entry_get_text(GTK_ENTRY(entry)));
    else if (editor->contact)
        categories = e_contact_get (editor->contact, E_CONTACT_CATEGORIES);

    dialog = GTK_DIALOG(e_categories_new(categories));

    if (dialog == NULL) {
        GtkWidget *uh_oh = gtk_message_dialog_new (NULL,
                               0, GTK_MESSAGE_ERROR,
                               GTK_RESPONSE_OK,
                               _("Category editor not available."));
        g_free (categories);
        gtk_widget_show (uh_oh);
        return;
    }

    ecml = e_categories_master_list_wombat_new ();
    g_object_set (dialog,
               "header", _("This contact belongs to these categories:"),
               "ecml", ecml,
               NULL);
    g_object_unref (ecml);
    gtk_widget_show(GTK_WIDGET(dialog));
    result = gtk_dialog_run (dialog);
    g_free (categories);
    if (result == GTK_RESPONSE_OK) {
        g_object_get (dialog,
                  "categories", &categories,
                  NULL);
        if (entry && GTK_IS_ENTRY(entry))
            gtk_entry_set_text(GTK_ENTRY(entry), categories);
        else
            e_contact_set (editor->contact, E_CONTACT_CATEGORIES, categories);

        g_free(categories);
    }
    gtk_widget_destroy(GTK_WIDGET(dialog));
}


typedef struct {
    EContactEditor *ce;
    gboolean should_close;
    gchar *new_id;
} EditorCloseStruct;

static void
contact_moved_cb (EBook *book, EBookStatus status, EditorCloseStruct *ecs)
{
    EContactEditor *ce = ecs->ce;
    gboolean should_close = ecs->should_close;

    gtk_widget_set_sensitive (ce->app, TRUE);
    ce->in_async_call = FALSE;

    e_contact_set (ce->contact, E_CONTACT_UID, ecs->new_id);

    g_signal_emit (ce, contact_editor_signals[CONTACT_DELETED], 0,
               status, ce->contact);

    ce->is_new_contact = FALSE;

    if (should_close) {
        close_dialog (ce);
    }
    else {
        ce->changed = FALSE;

        g_object_ref (ce->target_book);
        g_object_unref (ce->source_book);
        ce->source_book = ce->target_book;

        command_state_changed (ce);
    }

    g_object_unref (ce);
    g_free (ecs->new_id);
    g_free (ecs);
}

static void
contact_added_cb (EBook *book, EBookStatus status, const char *id, EditorCloseStruct *ecs)
{
    EContactEditor *ce = ecs->ce;
    gboolean should_close = ecs->should_close;

    if (ce->source_book != ce->target_book && ce->source_editable &&
        status == E_BOOK_ERROR_OK && ce->is_new_contact == FALSE) {
        ecs->new_id = g_strdup (id);
        e_book_async_remove_contact (ce->source_book, ce->contact,
                         (EBookCallback) contact_moved_cb, ecs);
        return;
    }

    gtk_widget_set_sensitive (ce->app, TRUE);
    ce->in_async_call = FALSE;

    e_contact_set (ce->contact, E_CONTACT_UID, (char *) id);

    g_signal_emit (ce, contact_editor_signals[CONTACT_ADDED], 0,
               status, ce->contact);

    if (status == E_BOOK_ERROR_OK) {
        ce->is_new_contact = FALSE;

        if (should_close) {
            close_dialog (ce);
        }
        else {
            ce->changed = FALSE;
            command_state_changed (ce);
        }
    }

    g_object_unref (ce);
    g_free (ecs);
}

static void
contact_modified_cb (EBook *book, EBookStatus status, EditorCloseStruct *ecs)
{
    EContactEditor *ce = ecs->ce;
    gboolean should_close = ecs->should_close;

    gtk_widget_set_sensitive (ce->app, TRUE);
    ce->in_async_call = FALSE;

    g_signal_emit (ce, contact_editor_signals[CONTACT_MODIFIED], 0,
               status, ce->contact);

    if (status == E_BOOK_ERROR_OK) {
        if (should_close) {
            close_dialog (ce);
        }
        else {
            ce->changed = FALSE;
            command_state_changed (ce);
        }
    }

    g_object_unref (ce);
    g_free (ecs);
}

/* Emits the signal to request saving a contact */
static void
save_contact (EContactEditor *ce, gboolean should_close)
{
    EditorCloseStruct *ecs = g_new(EditorCloseStruct, 1);

    extract_info (ce);
    if (!ce->target_book)
        return;

    ecs->ce = ce;
    g_object_ref (ecs->ce);

    ecs->should_close = should_close;

    gtk_widget_set_sensitive (ce->app, FALSE);
    ce->in_async_call = TRUE;

    if (ce->source_book != ce->target_book) {
        /* Two-step move; add to target, then remove from source */
        eab_merging_book_add_contact (ce->target_book, ce->contact,
                          (EBookIdCallback) contact_added_cb, ecs);
    } else {
        if (ce->is_new_contact)
            eab_merging_book_add_contact (ce->target_book, ce->contact,
                              (EBookIdCallback) contact_added_cb, ecs);
        else
            eab_merging_book_commit_contact (ce->target_book, ce->contact,
                             (EBookCallback) contact_modified_cb, ecs);
    }
}

/* Closes the dialog box and emits the appropriate signals */
static void
close_dialog (EContactEditor *ce)
{
    if (ce->app != NULL) {
        gtk_widget_destroy (ce->app);
        ce->app = NULL;
        g_signal_emit (ce, contact_editor_signals[EDITOR_CLOSED], 0);
    }
}

static gboolean
prompt_to_save_changes (EContactEditor *editor)
{
    if (!editor->changed)
        return TRUE;

    switch (eab_prompt_save_dialog (GTK_WINDOW(editor->app))) {
    case GTK_RESPONSE_YES:
        save_contact (editor, FALSE);
        return TRUE;
    case GTK_RESPONSE_NO:
        return TRUE;
    case GTK_RESPONSE_CANCEL:
    default:
        return FALSE;
    }
}

/* Menu callbacks */

/* File/Save callback */
static void
file_save_cb (GtkWidget *widget, gpointer data)
{
    EContactEditor *ce;

    ce = E_CONTACT_EDITOR (data);
    save_contact (ce, FALSE);
}

/* File/Close callback */
static void
file_close_cb (GtkWidget *widget, gpointer data)
{
    EContactEditor *ce;

    ce = E_CONTACT_EDITOR (data);
    if (!prompt_to_save_changes (ce))
        return;

    close_dialog (ce);
}

static void
file_save_as_cb (GtkWidget *widget, gpointer data)
{
    EContactEditor *ce;
    EContact *contact;

    ce = E_CONTACT_EDITOR (data);

    extract_info (ce);

    contact = ce->contact;
    eab_contact_save(_("Save Contact as VCard"), contact, GTK_WINDOW (ce->app));
}

static void
file_send_as_cb (GtkWidget *widget, gpointer data)
{
    EContactEditor *ce;

    ce = E_CONTACT_EDITOR (data);

    extract_info (ce);

    eab_send_contact(ce->contact, EAB_DISPOSITION_AS_ATTACHMENT);
}

static void
file_send_to_cb (GtkWidget *widget, gpointer data)
{
    EContactEditor *ce;

    ce = E_CONTACT_EDITOR (data);

    extract_info (ce);

    eab_send_contact(ce->contact, EAB_DISPOSITION_AS_TO);
}

gboolean
e_contact_editor_confirm_delete (GtkWindow *parent)
{
    GtkWidget *dialog;
    gint result;

    dialog = gtk_message_dialog_new (parent,
                     0,
                     GTK_MESSAGE_QUESTION,
                     GTK_BUTTONS_NONE,
#if notyet
                     /* XXX we really need to handle the plural case here.. */
                     (plural
                      ? _("Are you sure you want\n"
                          "to delete these contacts?"))
#endif
                      _("Are you sure you want\n"
                        "to delete this contact?"));

    gtk_dialog_add_buttons (GTK_DIALOG (dialog),
                GTK_STOCK_CANCEL, GTK_RESPONSE_CANCEL,
                GTK_STOCK_DELETE, GTK_RESPONSE_ACCEPT,
                NULL);

    result = gtk_dialog_run(GTK_DIALOG (dialog));

    gtk_widget_destroy (dialog);

    return (result == GTK_RESPONSE_ACCEPT);
}

static void
contact_deleted_cb (EBook *book, EBookStatus status, EContactEditor *ce)
{
    gtk_widget_set_sensitive (ce->app, TRUE);
    ce->in_async_call = FALSE;

    g_signal_emit (ce, contact_editor_signals[CONTACT_DELETED], 0,
               status, ce->contact);

    /* always close the dialog after we successfully delete a card */
    if (status == E_BOOK_ERROR_OK)
        close_dialog (ce);
}

static void
delete_cb (GtkWidget *widget, gpointer data)
{
    EContactEditor *ce = E_CONTACT_EDITOR (data);
    EContact *contact = ce->contact;

    g_object_ref(contact);

    if (e_contact_editor_confirm_delete(GTK_WINDOW(ce->app))) {

        extract_info (ce);
        
        if (!ce->is_new_contact && ce->source_book) {
            gtk_widget_set_sensitive (ce->app, FALSE);
            ce->in_async_call = TRUE;

            e_book_async_remove_contact (ce->source_book, contact, (EBookCallback)contact_deleted_cb, ce);
        }
    }

    g_object_unref(contact);
}

/* Emits the signal to request printing a card */
static void
print_cb (BonoboUIComponent *uih, void *data, const char *path)
{
    EContactEditor *ce;

    ce = E_CONTACT_EDITOR (data);

    extract_info (ce);

    gtk_widget_show(e_contact_print_contact_dialog_new(ce->contact));
}

#if 0 /* Envelope printing is disabled for Evolution 1.0. */
/* Emits the signal to request printing a card */
static void
print_envelope_cb (BonoboUIComponent *uih, void *data, const char *path)
{
    EContactEditor *ce;

    ce = E_CONTACT_EDITOR (data);

    extract_info (ce);
    e_card_simple_sync_card (ce->simple);

    gtk_widget_show(e_contact_print_envelope_dialog_new(ce->card));
}
#endif

/* Toolbar/Save and Close callback */
static void
tb_save_and_close_cb (BonoboUIComponent *uih, void *data, const char *path)
{
    EContactEditor *ce;

    ce = E_CONTACT_EDITOR (data);
    save_contact (ce, TRUE);
}

static
BonoboUIVerb verbs [] = {
    BONOBO_UI_UNSAFE_VERB ("ContactEditorSave", file_save_cb),
    BONOBO_UI_UNSAFE_VERB ("ContactEditorSaveAs", file_save_as_cb),
    BONOBO_UI_UNSAFE_VERB ("ContactEditorSaveClose", tb_save_and_close_cb),
    BONOBO_UI_UNSAFE_VERB ("ContactEditorSendAs", file_send_as_cb),
    BONOBO_UI_UNSAFE_VERB ("ContactEditorSendTo", file_send_to_cb),
    BONOBO_UI_UNSAFE_VERB ("ContactEditorDelete", delete_cb),
    BONOBO_UI_UNSAFE_VERB ("ContactEditorPrint", print_cb),
#if 0 /* Envelope printing is disabled for Evolution 1.0. */
    BONOBO_UI_UNSAFE_VERB ("ContactEditorPrintEnvelope", print_envelope_cb),
#endif
    /*  BONOBO_UI_UNSAFE_VERB ("ContactEditorPageSetup", file_page_setup_menu), */
    BONOBO_UI_UNSAFE_VERB ("ContactEditorClose", file_close_cb),
    
    BONOBO_UI_VERB_END
};

EPixmap pixmaps[] = {
    E_PIXMAP ("/commands/ContactEditorSave", "save-16.png"),
    E_PIXMAP ("/commands/ContactEditorSaveClose", "save-16.png"),
    E_PIXMAP ("/commands/ContactEditorSaveAs", "save-as-16.png"),
    E_PIXMAP ("/commands/ContactEditorDelete", "evolution-trash-mini.png"),
    E_PIXMAP ("/commands/ContactEditorPrint", "print.xpm"),
#if 0 /* Envelope printing is disabled for Evolution 1.0. */
    E_PIXMAP ("/commands/ContactEditorPrintEnvelope", "print.xpm"),
#endif
    E_PIXMAP ("/Toolbar/ContactEditorSaveClose", "buttons/save-24.png"),
    E_PIXMAP ("/Toolbar/ContactEditorDelete", "buttons/delete-message.png"),
    E_PIXMAP ("/Toolbar/ContactEditorPrint", "buttons/print.png"),

    E_PIXMAP_END
};

static void
create_ui (EContactEditor *ce)
{
    bonobo_ui_component_add_verb_list_with_data (ce->uic, verbs, ce);

    bonobo_ui_util_set_ui (ce->uic, PREFIX,
                   EVOLUTION_UIDIR "/evolution-contact-editor.xml",
                   "evolution-contact-editor", NULL);

    e_pixmaps_update (ce->uic, pixmaps);
}

/* Callback used when the dialog box is destroyed */
static gint
app_delete_event_cb (GtkWidget *widget, GdkEvent *event, gpointer data)
{
    EContactEditor *ce;

    ce = E_CONTACT_EDITOR (data);

    /* if we're saving, don't allow the dialog to close */
    if (ce->in_async_call)
        return TRUE;

    if (!prompt_to_save_changes (ce))
        return TRUE;

    close_dialog (ce);
    return TRUE;
}

static GList *
add_to_tab_order(GList *list, GladeXML *gui, char *name)
{
    GtkWidget *widget = glade_xml_get_widget(gui, name);
    return g_list_prepend(list, widget);
}

static void
setup_tab_order(GladeXML *gui)
{
    GtkWidget *container;
    GList *list = NULL;

    container = glade_xml_get_widget(gui, "table-contact-editor-general");

    if (container) {
        list = add_to_tab_order(list, gui, "entry-fullname");
        list = add_to_tab_order(list, gui, "entry-jobtitle");
        list = add_to_tab_order(list, gui, "entry-company");
        list = add_to_tab_order(list, gui, "combo-file-as");
        list = add_to_tab_order(list, gui, "entry-phone1");
        list = add_to_tab_order(list, gui, "entry-phone2");
        list = add_to_tab_order(list, gui, "entry-phone3");
        list = add_to_tab_order(list, gui, "entry-phone4");

        list = add_to_tab_order(list, gui, "entry-email1");
        list = add_to_tab_order(list, gui, "alignment-htmlmail");
        list = add_to_tab_order(list, gui, "entry-web");
        list = add_to_tab_order(list, gui, "entry-blog");
        list = add_to_tab_order(list, gui, "button-fulladdr");
        list = add_to_tab_order(list, gui, "text-address");
        list = g_list_reverse(list);
        e_container_change_tab_order(GTK_CONTAINER(container), list);
        g_list_free(list);
    }
}

static void
e_contact_editor_init (EContactEditor *e_contact_editor)
{
    GladeXML *gui;
    GtkWidget *widget;
    GtkWidget *bonobo_win;
    GtkWidget *wants_html;
    BonoboUIContainer *container;
    char *icon_path;

    e_contact_editor->email_info = NULL;
    e_contact_editor->phone_info = NULL;
    e_contact_editor->address_info = NULL;
    e_contact_editor->email_popup = NULL;
    e_contact_editor->phone_popup = NULL;
    e_contact_editor->address_popup = NULL;
    e_contact_editor->email_list = NULL;
    e_contact_editor->phone_list = NULL;
    e_contact_editor->address_list = NULL;
    e_contact_editor->name = e_contact_name_new();
    e_contact_editor->company = g_strdup("");
    
    e_contact_editor->email_choice = E_CONTACT_EMAIL_1;
    e_contact_editor->phone_choice[0] = E_CONTACT_PHONE_BUSINESS;
    e_contact_editor->phone_choice[1] = E_CONTACT_PHONE_HOME;
    e_contact_editor->phone_choice[2] = E_CONTACT_PHONE_BUSINESS_FAX;
    e_contact_editor->phone_choice[3] = E_CONTACT_PHONE_MOBILE;
#if 1
    e_contact_editor->address_choice = E_CONTACT_FIRST_ADDRESS_ID;
    e_contact_editor->address_mailing = -1;
#endif  

    e_contact_editor->contact = NULL;
    e_contact_editor->changed = FALSE;
    e_contact_editor->image_set = FALSE;
    e_contact_editor->in_async_call = FALSE;
    e_contact_editor->source_editable = TRUE;
    e_contact_editor->target_editable = TRUE;

    e_contact_editor->load_source_id = 0;
    e_contact_editor->load_book = NULL;

    gui = glade_xml_new (EVOLUTION_GLADEDIR "/contact-editor.glade", NULL, NULL);
    e_contact_editor->gui = gui;

    setup_tab_order(gui);

    e_contact_editor->app = glade_xml_get_widget (gui, "contact editor");

    connect_arrow_button_signals(e_contact_editor);
    set_entry_changed_signals(e_contact_editor);

    setup_im_treeview(e_contact_editor);

    wants_html = glade_xml_get_widget(e_contact_editor->gui, "checkbutton-htmlmail");
    if (wants_html && GTK_IS_TOGGLE_BUTTON(wants_html))
        g_signal_connect (wants_html, "toggled",
                  G_CALLBACK (wants_html_changed), e_contact_editor);

    widget = glade_xml_get_widget(e_contact_editor->gui, "checkbutton-mailingaddress");
    if (widget && GTK_IS_TOGGLE_BUTTON(widget))
        g_signal_connect (widget, "toggled",
                  G_CALLBACK (address_mailing_changed), e_contact_editor);
    
    widget = glade_xml_get_widget(e_contact_editor->gui, "button-fullname");
    if (widget && GTK_IS_BUTTON(widget))
        g_signal_connect (widget, "clicked",
                  G_CALLBACK (full_name_clicked), e_contact_editor);

    widget = glade_xml_get_widget(e_contact_editor->gui, "button-fulladdr");
    if (widget && GTK_IS_BUTTON(widget))
        g_signal_connect (widget, "clicked",
                  G_CALLBACK (full_addr_clicked), e_contact_editor);

    widget = glade_xml_get_widget(e_contact_editor->gui, "button-categories");
    if (widget && GTK_IS_BUTTON(widget))
        g_signal_connect (widget, "clicked",
                  G_CALLBACK (categories_clicked), e_contact_editor);
    widget = glade_xml_get_widget (e_contact_editor->gui, "source-option-menu-source");
    if (widget && E_IS_SOURCE_OPTION_MENU (widget))
        g_signal_connect (widget, "source_selected",
                  G_CALLBACK (source_selected), e_contact_editor);

    widget = glade_xml_get_widget(e_contact_editor->gui, "button-im-add");
    if (widget && GTK_IS_BUTTON(widget))
        g_signal_connect (widget, "clicked",
                  G_CALLBACK (add_im_clicked), e_contact_editor);

    widget = glade_xml_get_widget(e_contact_editor->gui, "button-im-edit");
    if (widget && GTK_IS_BUTTON(widget))
        g_signal_connect (widget, "clicked",
                  G_CALLBACK (edit_im_clicked), e_contact_editor);

    widget = glade_xml_get_widget(e_contact_editor->gui, "button-im-remove");
    if (widget && GTK_IS_BUTTON(widget))
        g_signal_connect (widget, "clicked",
                  G_CALLBACK (remove_im_clicked), e_contact_editor);


    /* Construct the app */
    bonobo_win = bonobo_window_new ("contact-editor-dialog", _("Contact Editor"));

    /* FIXME: The sucking bit */
    {
        GtkWidget *contents;

        contents = bonobo_dock_get_client_area (gnome_app_get_dock (GNOME_APP(e_contact_editor->app)));

        if (!contents) {
            g_message ("contact_editor_construct(): Could not get contents");
            return;
        }
        g_object_ref (contents);
        gtk_container_remove (GTK_CONTAINER (contents->parent), contents);
        bonobo_window_set_contents (BONOBO_WINDOW (bonobo_win), contents);
        gtk_widget_destroy (e_contact_editor->app);
        e_contact_editor->app = bonobo_win;
    }

    /* Build the menu and toolbar */
    container = bonobo_window_get_ui_container (BONOBO_WINDOW (e_contact_editor->app));

    e_contact_editor->uic = bonobo_ui_component_new_default ();
    if (!e_contact_editor->uic) {
        g_message ("e_contact_editor_init(): eeeeek, could not create the UI handler!");
        return;
    }
    bonobo_ui_component_set_container (e_contact_editor->uic,
                       bonobo_object_corba_objref (BONOBO_OBJECT (container)),
                       NULL);

    create_ui (e_contact_editor);

    widget = glade_xml_get_widget(e_contact_editor->gui, "entry-fullname");
    if (widget)
        gtk_widget_grab_focus (widget);

    /* Connect to the deletion of the dialog */

    g_signal_connect (e_contact_editor->app, "delete_event",
                GTK_SIGNAL_FUNC (app_delete_event_cb), e_contact_editor);

    /* set the icon */
    icon_path = g_build_filename (EVOLUTION_IMAGESDIR, "evolution-contacts-mini.png", NULL);
    gnome_window_icon_set_from_file (GTK_WINDOW (e_contact_editor->app), icon_path);
    g_free (icon_path);
}

void
e_contact_editor_dispose (GObject *object) {
    EContactEditor *e_contact_editor = E_CONTACT_EDITOR(object);

    if (e_contact_editor->writable_fields) {
        g_object_unref(e_contact_editor->writable_fields);
        e_contact_editor->writable_fields = NULL;
    }
    if (e_contact_editor->email_list) {
        g_list_foreach(e_contact_editor->email_list, (GFunc) g_free, NULL);
        g_list_free(e_contact_editor->email_list);
        e_contact_editor->email_list = NULL;
    }
    if (e_contact_editor->email_info) {
        g_free(e_contact_editor->email_info);
        e_contact_editor->email_info = NULL;
    }
    if (e_contact_editor->email_popup) {
        g_object_unref(e_contact_editor->email_popup);
        e_contact_editor->email_popup = NULL;
    }
    
    if (e_contact_editor->phone_list) {
        g_list_foreach(e_contact_editor->phone_list, (GFunc) g_free, NULL);
        g_list_free(e_contact_editor->phone_list);
        e_contact_editor->phone_list = NULL;
    }
    if (e_contact_editor->phone_info) {
        g_free(e_contact_editor->phone_info);
        e_contact_editor->phone_info = NULL;
    }
    if (e_contact_editor->phone_popup) {
        g_object_unref(e_contact_editor->phone_popup);
        e_contact_editor->phone_popup = NULL;
    }
    
    if (e_contact_editor->address_list) {
        g_list_foreach(e_contact_editor->address_list, (GFunc) g_free, NULL);
        g_list_free(e_contact_editor->address_list);
        e_contact_editor->address_list = NULL;
    }
    if (e_contact_editor->address_info) {
        g_free(e_contact_editor->address_info);
        e_contact_editor->address_info = NULL;
    }
    if (e_contact_editor->address_popup) {
        g_object_unref(e_contact_editor->address_popup);
        e_contact_editor->address_popup = NULL;
    }
    
    if (e_contact_editor->contact) {
        g_object_unref(e_contact_editor->contact);
        e_contact_editor->contact = NULL;
    }
    
    if (e_contact_editor->source_book) {
        g_object_unref(e_contact_editor->source_book);
        e_contact_editor->source_book = NULL;
    }

    if (e_contact_editor->target_book) {
        g_object_unref(e_contact_editor->target_book);
        e_contact_editor->target_book = NULL;
    }

    if (e_contact_editor->name) {
        e_contact_name_free(e_contact_editor->name);
        e_contact_editor->name = NULL;
    }

    if (e_contact_editor->company) {
        g_free (e_contact_editor->company);
        e_contact_editor->company = NULL;
    }

    if (e_contact_editor->gui) {
        g_object_unref(e_contact_editor->gui);
        e_contact_editor->gui = NULL;
    }

    cancel_load (e_contact_editor);
}

static void
command_state_changed (EContactEditor *ce)
{
    bonobo_ui_component_set_prop (ce->uic,
                      "/commands/ContactEditorSaveClose",
                      "sensitive",
                      (ce->target_editable && ce->changed) ? "1" : "0", NULL);
    bonobo_ui_component_set_prop (ce->uic,
                      "/commands/ContactEditorSave",
                      "sensitive",
                      (ce->target_editable && ce->changed) ? "1" : "0", NULL);
    bonobo_ui_component_set_prop (ce->uic,
                      "/commands/ContactEditorDelete",
                      "sensitive",
                      (ce->source_editable && !ce->is_new_contact) ? "1" : "0", NULL);
}

static void
supported_fields_cb (EBook *book, EBookStatus status,
             EList *fields, EContactEditor *ce)
{
    if (!g_slist_find (all_contact_editors, ce)) {
        g_warning ("supported_fields_cb called for book that's still around, but contact editor that's been destroyed.");
        return;
    }

    g_object_set (ce,
            "writable_fields", fields,
            NULL);

    e_contact_editor_show (ce);

    command_state_changed (ce);
}

static void
contact_editor_destroy_notify (void *data,
                   GObject *where_the_object_was)
{
    EContactEditor *ce = E_CONTACT_EDITOR (data);

    all_contact_editors = g_slist_remove (all_contact_editors, ce);
}

EContactEditor *
e_contact_editor_new (EBook *book,
              EContact *contact,
              gboolean is_new_contact,
              gboolean editable)
{
    EContactEditor *ce;

    g_return_val_if_fail (E_IS_BOOK (book), NULL);
    g_return_val_if_fail (E_IS_CONTACT (contact), NULL);

    ce = g_object_new (E_TYPE_CONTACT_EDITOR, NULL);

    all_contact_editors = g_slist_prepend (all_contact_editors, ce);
    g_object_weak_ref (G_OBJECT (ce), contact_editor_destroy_notify, ce);

    g_object_ref (ce);
    gtk_object_sink (GTK_OBJECT (ce));

    g_object_set (ce,
              "source_book", book,
              "contact", contact,
              "is_new_contact", is_new_contact,
              "editable", editable,
              NULL);

    if (book)
        e_book_async_get_supported_fields (book, (EBookFieldsCallback)supported_fields_cb, ce);

    return ce;
}

static void
e_contact_editor_set_property (GObject *object, guint prop_id, const GValue *value, GParamSpec *pspec)
{
    EContactEditor *editor;

    editor = E_CONTACT_EDITOR (object);
    
    switch (prop_id){
    case PROP_SOURCE_BOOK: {
        gboolean writable;
        gboolean changed = FALSE;

        if (editor->source_book)
            g_object_unref(editor->source_book);
        editor->source_book = E_BOOK (g_value_get_object (value));
        g_object_ref (editor->source_book);

        if (!editor->target_book) {
            editor->target_book = editor->source_book;
            g_object_ref (editor->target_book);

            e_book_async_get_supported_fields (editor->target_book,
                               (EBookFieldsCallback) supported_fields_cb, editor);
        }

        writable = e_book_is_writable (editor->source_book);
        if (writable != editor->source_editable) {
            editor->source_editable = writable;
            changed = TRUE;
        }

        writable = e_book_is_writable (editor->target_book);
        if (writable != editor->target_editable) {
            editor->target_editable = writable;
            changed = TRUE;
        }

        if (changed) {
            set_editable (editor);
            command_state_changed (editor);
        }

        /* XXX more here about editable/etc. */
        break;
    }

    case PROP_TARGET_BOOK: {
        gboolean writable;
        gboolean changed = FALSE;

        if (editor->target_book)
            g_object_unref(editor->target_book);
        editor->target_book = E_BOOK (g_value_get_object (value));
        g_object_ref (editor->target_book);

        e_book_async_get_supported_fields (editor->target_book,
                           (EBookFieldsCallback) supported_fields_cb, editor);

        if (!editor->changed && !editor->is_new_contact) {
            editor->changed = TRUE;
            changed = TRUE;
        }

        writable = e_book_is_writable (editor->target_book);
        if (writable != editor->target_editable) {
            editor->target_editable = writable;
            set_editable (editor);
            changed = TRUE;
        }

        if (changed)
            command_state_changed (editor);

        /* If we're trying to load a new target book, cancel that here. */
        cancel_load (editor);

        /* XXX more here about editable/etc. */
        break;
    }

    case PROP_CONTACT:
        if (editor->contact)
            g_object_unref(editor->contact);
        editor->contact = e_contact_duplicate(E_CONTACT(g_value_get_object (value)));
        fill_in_info(editor);
        editor->changed = FALSE;
        break;

    case PROP_IS_NEW_CONTACT:
        editor->is_new_contact = g_value_get_boolean (value) ? TRUE : FALSE;
        break;

    case PROP_EDITABLE: {
        gboolean new_value = g_value_get_boolean (value) ? TRUE : FALSE;
        gboolean changed = (editor->target_editable != new_value);

        editor->target_editable = new_value;

        if (changed) {
            set_editable (editor);
            command_state_changed (editor);
        }
        break;
    }

    case PROP_CHANGED: {
        gboolean new_value = g_value_get_boolean (value) ? TRUE : FALSE;
        gboolean changed = (editor->changed != new_value);

        editor->changed = new_value;

        if (changed)
            command_state_changed (editor);
        break;
    }
    case PROP_WRITABLE_FIELDS:
        if (editor->writable_fields)
            g_object_unref(editor->writable_fields);
        editor->writable_fields = g_value_get_object (value);
        if (editor->writable_fields)
            g_object_ref (editor->writable_fields);
        else
            editor->writable_fields = e_list_new(NULL, NULL, NULL);
        enable_writable_fields (editor);
        break;
    default:
        G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
        break;
    }
}

static void
e_contact_editor_get_property (GObject *object, guint prop_id, GValue *value, GParamSpec *pspec)
{
    EContactEditor *e_contact_editor;

    e_contact_editor = E_CONTACT_EDITOR (object);

    switch (prop_id) {
    case PROP_SOURCE_BOOK:
        g_value_set_object (value, e_contact_editor->source_book);
        break;

    case PROP_TARGET_BOOK:
        g_value_set_object (value, e_contact_editor->target_book);
        break;

    case PROP_CONTACT:
        extract_info(e_contact_editor);
        g_value_set_object (value, e_contact_editor->contact);
        break;

    case PROP_IS_NEW_CONTACT:
        g_value_set_boolean (value, e_contact_editor->is_new_contact ? TRUE : FALSE);
        break;

    case PROP_EDITABLE:
        g_value_set_boolean (value, e_contact_editor->target_editable ? TRUE : FALSE);
        break;

    case PROP_CHANGED:
        g_value_set_boolean (value, e_contact_editor->changed ? TRUE : FALSE);
        break;

    case PROP_WRITABLE_FIELDS:
        if (e_contact_editor->writable_fields)
            g_value_set_object (value, e_list_duplicate (e_contact_editor->writable_fields));
        else
            g_value_set_object (value, NULL);
        break;
    default:
        G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
        break;
    }
}

static void
_popup_position(GtkMenu *menu,
        gint *x,
        gint *y,
        gboolean *push_in,
        gpointer data)
{
    GtkWidget *button = GTK_WIDGET(data);
    GtkRequisition request;
    int mh, mw;
    gdk_window_get_origin (button->window, x, y);
    *x += button->allocation.x;
    *y += button->allocation.y;

    gtk_widget_size_request(GTK_WIDGET(menu), &request);

    mh = request.height;
    mw = request.width;

    *x -= mw;
    if (*x < 0)
        *x = 0;
    
    if (*y < 0)
        *y = 0;
    
    if ((*x + mw) > gdk_screen_width ())
        *x = gdk_screen_width () - mw;
    
    if ((*y + mh) > gdk_screen_height ())
        *y = gdk_screen_height () - mh;

    *push_in = FALSE;
}

static gint
_arrow_pressed (GtkWidget *widget, GdkEventButton *button, EContactEditor *editor, GtkWidget *popup, GList **list, GnomeUIInfo **info, gchar *label)
{
    gint menu_item;

    g_signal_stop_emission_by_name (widget, "button_press_event");

    gtk_widget_realize(popup);
    menu_item = gnome_popup_menu_do_popup_modal(popup, _popup_position, widget, button, editor, widget);
    if ( menu_item != -1 ) {
        GtkWidget *label_widget = glade_xml_get_widget(editor->gui, label);
        if (label_widget && GTK_IS_LABEL(label_widget)) {
            g_object_set (label_widget,
                      "label", _(g_list_nth_data(*list, menu_item)),
                      NULL);
        }
    }
    return menu_item;
}

static void
e_contact_editor_build_ui_info(GList *list, GnomeUIInfo **infop)
{
    GnomeUIInfo *info;
    GnomeUIInfo singleton = { GNOME_APP_UI_TOGGLEITEM, NULL, NULL, NULL, NULL, NULL, GNOME_APP_PIXMAP_NONE, 0, 0, 0, NULL };
    GnomeUIInfo end = GNOMEUIINFO_END;
    int length;
    int i;

    info = *infop;

    if ( info )
        g_free(info);
    length = g_list_length( list );
    info = g_new(GnomeUIInfo, length + 2);
    for (i = 0; i < length; i++) {
        info[i] = singleton;
        info[i].label = _(list->data);
        list = list->next;
    }
    info[i] = end;

    *infop = info;
}

static void
e_contact_editor_build_phone_ui (EContactEditor *editor)
{
    if (editor->phone_list == NULL) {
        int i;

        for (i = 0; i < G_N_ELEMENTS (phones); i ++) {
            editor->phone_list = g_list_append(editor->phone_list, g_strdup(e_contact_pretty_name (phones[i])));
        }
    }
    if (editor->phone_info == NULL) {
        e_contact_editor_build_ui_info(editor->phone_list, &editor->phone_info);
        
        if ( editor->phone_popup )
            g_object_unref(editor->phone_popup);
        
        editor->phone_popup = gnome_popup_menu_new(editor->phone_info);
        g_object_ref (editor->phone_popup);
        gtk_object_sink (GTK_OBJECT (editor->phone_popup));
    }
}

static void
e_contact_editor_build_email_ui (EContactEditor *editor)
{
    int i;

    if (editor->email_list == NULL) {
        for (i = 0; i < G_N_ELEMENTS (emails); i++)
            editor->email_list = g_list_append(editor->email_list, g_strdup(e_contact_pretty_name (emails[i])));
    }
    if (editor->email_info == NULL) {
        e_contact_editor_build_ui_info(editor->email_list, &editor->email_info);

        if ( editor->email_popup )
            g_object_unref(editor->email_popup);
        
        editor->email_popup = gnome_popup_menu_new(editor->email_info);
        g_object_ref (editor->email_popup);
        gtk_object_sink (GTK_OBJECT (editor->email_popup));
    }
}

static void
e_contact_editor_build_address_ui (EContactEditor *editor)
{
    int i;

    if (editor->address_list == NULL) {
        static char *info[] = {
            N_("Business"),
            N_("Home"),
            N_("Other")
        };
        
        for (i = 0; i < sizeof(info) / sizeof(info[0]); i++) {
            editor->address_list = g_list_append(editor->address_list, g_strdup(info[i]));
        }
    }
    if (editor->address_info == NULL) {
        e_contact_editor_build_ui_info(editor->address_list, &editor->address_info);

        if ( editor->address_popup )
            g_object_unref(editor->address_popup);
        
        editor->address_popup = gnome_popup_menu_new(editor->address_info);
        g_object_ref (editor->address_popup);
        gtk_object_sink (GTK_OBJECT (editor->address_popup));
    }
}

static void
_phone_arrow_pressed (GtkWidget *widget, GdkEventButton *button, EContactEditor *editor)
{
    int which;
    int i;
    gchar *label;
    gchar *entry;
    int result;
    if ( widget == glade_xml_get_widget(editor->gui, "button-phone1") ) {
        which = 1;
    } else if ( widget == glade_xml_get_widget(editor->gui, "button-phone2") ) {
        which = 2;
    } else if ( widget == glade_xml_get_widget(editor->gui, "button-phone3") ) {
        which = 3;
    } else if ( widget == glade_xml_get_widget(editor->gui, "button-phone4") ) {
        which = 4;
    } else
        return;
    
    label = g_strdup_printf("label-phone%d", which);
    entry = g_strdup_printf("entry-phone%d", which);

    e_contact_editor_build_phone_ui (editor);
    
    for(i = 0; i < G_N_ELEMENTS (phones); i++) {
        char *phone = e_contact_get (editor->contact, phones[i]);
        gtk_check_menu_item_set_active(GTK_CHECK_MENU_ITEM(editor->phone_info[i].widget),
                           phone && *phone);
        g_free (phone);
    }
    
    result = _arrow_pressed (widget, button, editor, editor->phone_popup, &editor->phone_list, &editor->phone_info, label);
    
    if (result != -1) {
        GtkWidget *w = glade_xml_get_widget (editor->gui, entry);
        editor->phone_choice[which - 1] = phones[result];
        set_fields (editor);
        enable_widget (glade_xml_get_widget (editor->gui, label), TRUE);
        enable_widget (w, editor->target_editable);
    }

    g_free(label);
    g_free(entry);
}

static void
_email_arrow_pressed (GtkWidget *widget, GdkEventButton *button, EContactEditor *editor)
{
    int i;
    int result;

    e_contact_editor_build_email_ui (editor);

    for(i = 0; i < G_N_ELEMENTS (emails); i++) {
        char *string = e_contact_get (editor->contact, emails[i]);
        gboolean checked;
        checked = string && *string;
        gtk_check_menu_item_set_active(GTK_CHECK_MENU_ITEM(editor->email_info[i].widget),
                           checked);
        g_free (string);
    }
    
    result = _arrow_pressed (widget, button, editor, editor->email_popup, &editor->email_list, &editor->email_info, "label-email1");
    
    if (result != -1) {
        GtkWidget *entry = glade_xml_get_widget (editor->gui, "entry-email1");
        editor->email_choice = result + E_CONTACT_FIRST_EMAIL_ID;

        set_fields (editor);

        /* make sure the buttons/entry is/are sensitive */
        enable_widget (glade_xml_get_widget (editor->gui, "label-email1"), TRUE);
        enable_widget (entry, editor->target_editable);
        enable_widget (glade_xml_get_widget (editor->gui, "checkbutton-htmlmail"), editor->target_editable);
    }
}

static void
_address_arrow_pressed (GtkWidget *widget, GdkEventButton *button, EContactEditor *editor)
{
    int i;
    int result;

    e_contact_editor_build_address_ui (editor);

    for (i = E_CONTACT_FIRST_ADDRESS_ID; i <= E_CONTACT_LAST_ADDRESS_ID; i++) {
        EContactAddress *address = e_contact_get (editor->contact, i);
        gboolean checked;

        checked = (address != NULL);
        gtk_check_menu_item_set_active (
            GTK_CHECK_MENU_ITEM (editor->address_info [i - E_CONTACT_FIRST_ADDRESS_ID].widget),
            checked);

        if (address)
            g_boxed_free (e_contact_address_get_type (), address);
    }

    result = _arrow_pressed (widget, button, editor, editor->address_popup, &editor->address_list, &editor->address_info, "label-address");

    if (result != -1) {
        set_address_field(editor, result + E_CONTACT_FIRST_ADDRESS_ID);

        /* make sure the buttons/entry is/are sensitive */
        enable_widget (glade_xml_get_widget (editor->gui, "label-address"), TRUE);
        enable_widget (glade_xml_get_widget (editor->gui, "text-address"), editor->address_editable[result]);
        enable_widget (glade_xml_get_widget (editor->gui, "checkbutton-mailingaddress"), editor->address_editable[result]);
    }
}

#if 0
static void
find_address_mailing (EContactEditor *editor)
{
    const EContactAddress *address;
    int i;
    
    editor->address_mailing = -1;
    for (i = E_CONTACT_FIRST_ADDRESS_ID; i <= E_CONTACT_LAST_ADDRESS_ID; i++) {
        address = e_contact_get_const (editor->contact, i);
        if (address && (address->flags & E_CARD_ADDR_DEFAULT)) {
            if (editor->address_mailing == -1) {
                editor->address_mailing = i;
            } else {
                EContactAddress *new;
                
                new = e_card_delivery_address_copy (address);
                new = g_boxed_copy (e_contact_address_get_type (), address);
                new->flags &= ~E_CARD_ADDR_DEFAULT;
                e_card_simple_set_delivery_address(editor->simple, i, new);
                e_card_delivery_address_unref (new);
            }
        }
    }
}
#endif

static void
set_field(EContactEditor *editor, GtkEntry *entry, const char *string)
{
    const char *oldstring = gtk_entry_get_text(entry);
    if (!string)
        string = "";
    if (strcmp(string, oldstring)) {
        g_signal_handlers_block_matched (entry,
                         G_SIGNAL_MATCH_DATA,
                         0, 0, NULL, NULL, editor);
        gtk_entry_set_text(entry, string);
        g_signal_handlers_unblock_matched (entry,
                           G_SIGNAL_MATCH_DATA,
                           0, 0, NULL, NULL, editor);
    }
}

static void
set_phone_field(EContactEditor *editor, GtkWidget *entry, const char *phone_number)
{
    set_field(editor, GTK_ENTRY(entry), phone_number ? phone_number : "");
}

static void
set_source_field (EContactEditor *editor)
{
    GtkWidget *source_menu;
    ESource   *source;

    if (!editor->target_book)
        return;

    source_menu = glade_xml_get_widget (editor->gui, "source-option-menu-source");
    source = e_book_get_source (editor->target_book);

    e_source_option_menu_select (E_SOURCE_OPTION_MENU (source_menu), source);
}

static void
set_fields(EContactEditor *editor)
{
    EContactAddress *address;
    GtkWidget *entry;
    GtkWidget *label_widget;
    int i;

    entry = glade_xml_get_widget(editor->gui, "entry-phone1");
    if (entry && GTK_IS_ENTRY(entry))
        set_phone_field(editor, entry, e_contact_get_const(editor->contact, editor->phone_choice[0]));

    entry = glade_xml_get_widget(editor->gui, "entry-phone2");
    if (entry && GTK_IS_ENTRY(entry))
        set_phone_field(editor, entry, e_contact_get_const(editor->contact, editor->phone_choice[1]));

    entry = glade_xml_get_widget(editor->gui, "entry-phone3");
    if (entry && GTK_IS_ENTRY(entry))
        set_phone_field(editor, entry, e_contact_get_const(editor->contact, editor->phone_choice[2]));

    entry = glade_xml_get_widget(editor->gui, "entry-phone4");
    if (entry && GTK_IS_ENTRY(entry))
        set_phone_field(editor, entry, e_contact_get_const(editor->contact, editor->phone_choice[3]));
    
    entry = glade_xml_get_widget(editor->gui, "entry-email1");
    if (entry && GTK_IS_ENTRY(entry))
        set_field(editor, GTK_ENTRY(entry), e_contact_get_const(editor->contact, editor->email_choice));


    e_contact_editor_build_address_ui (editor);

    /* If address field is selected, try that first. If we don't have that, start
     * from top of field list */
    if (editor->address_choice == -1)
        address = NULL;
    else
        address = e_contact_get (editor->contact, editor->address_choice);

    if (address) {
        i = editor->address_choice;
        g_boxed_free (e_contact_address_get_type (), address);
    } else {
        for (i = E_CONTACT_FIRST_ADDRESS_ID; i <= E_CONTACT_LAST_ADDRESS_ID; i++) {
            address = e_contact_get (editor->contact, i);

            if (address) {
                g_boxed_free (e_contact_address_get_type (), address);
                break;
            }
        }
        if (i > E_CONTACT_LAST_ADDRESS_ID)
            i = E_CONTACT_FIRST_ADDRESS_ID;

        label_widget = glade_xml_get_widget(editor->gui, "label-address");
        if (label_widget && GTK_IS_LABEL(label_widget)) {
            g_object_set (label_widget,
                      "label", _(g_list_nth_data(editor->address_list, i - E_CONTACT_FIRST_ADDRESS_ID)),
                      NULL);
        }
    }

    set_address_field(editor, i);
    set_source_field (editor);
}

static void
add_im_field(EContactEditor *editor,
         EContactField field,
         const char *service,
         const char *desc)
{
    GList *list;
    GList *l;
    GtkTreeIter iter;
    GdkPixbuf *pixbuf;
    GdkPixbuf *scale = NULL;
    char *icon_path;
    char *buf;

    list = e_contact_get_attributes (editor->contact, field);

    buf = g_strdup_printf("im-%s.png", service);
    icon_path = g_concat_dir_and_file(EVOLUTION_IMAGESDIR, buf);
    pixbuf = gdk_pixbuf_new_from_file(icon_path, NULL);
    g_free(icon_path);
    g_free(buf);

    if (pixbuf != NULL)
        scale = gdk_pixbuf_scale_simple(pixbuf, 16, 16, GDK_INTERP_BILINEAR);

    for (l = list; l != NULL; l = l->next) {
        EVCardAttribute *attr = l->data;
        char *account_name;
        char *location;
        char *location_type;

        account_name = e_vcard_attribute_get_value (attr);
        if (!account_name)
            continue;

        if (e_vcard_attribute_has_type (attr, "HOME")) {
            location_type = "HOME";
            location = _("Home");
        }
        else if (e_vcard_attribute_has_type (attr, "WORK")) {
            location_type = "WORK";
            location = _("Work");
        }
        else {
            location_type = NULL;
            location = _("Other");
        }

        gtk_list_store_append(editor->im_model, &iter);

        gtk_list_store_set(editor->im_model, &iter,
                   COLUMN_IM_ICON, scale,
                   COLUMN_IM_SERVICE,  desc,
                   COLUMN_IM_LOCATION, location,
                   COLUMN_IM_LOCATION_TYPE, location_type,
                   COLUMN_IM_SCREENNAME, account_name,
                   COLUMN_IM_SERVICE_FIELD, field,
                   -1);
    }

    if (scale != NULL)
        g_object_unref(G_OBJECT(scale));

    if (pixbuf != NULL)
        g_object_unref(G_OBJECT(pixbuf));
}

static void
set_im_fields(EContactEditor *editor)
{
    gtk_list_store_clear(editor->im_model);

    add_im_field(editor, E_CONTACT_IM_AIM,    "aim",    _("AIM"));
    add_im_field(editor, E_CONTACT_IM_JABBER, "jabber", _("Jabber"));
    add_im_field(editor, E_CONTACT_IM_YAHOO,  "yahoo",  _("Yahoo"));
    add_im_field(editor, E_CONTACT_IM_MSN,    "msn",    _("MSN"));
    add_im_field(editor, E_CONTACT_IM_ICQ,    "icq",    _("ICQ"));
    add_im_field(editor, E_CONTACT_IM_GROUPWISE, "nov", _("GroupWise"));
}

static void
set_address_field(EContactEditor *editor, int result)
{
    GtkWidget *text, *check;
    
    text = glade_xml_get_widget(editor->gui, "text-address");

    if (text && GTK_IS_TEXT_VIEW(text)) {
        GtkTextBuffer *buffer;
        GtkTextIter start_iter, end_iter;
        EContactAddress *address;

        if (result == -1)
            result = editor->address_choice;
        editor->address_choice = -1;

        buffer = gtk_text_view_get_buffer (GTK_TEXT_VIEW (text));

        gtk_text_buffer_get_start_iter (buffer, &start_iter);
        gtk_text_buffer_get_end_iter (buffer, &end_iter);

        gtk_text_buffer_delete (buffer, &start_iter, &end_iter);

        address = e_contact_get (editor->contact, result);
        if (address) {
            gchar *text;

            text = address_to_text (address);
            gtk_text_buffer_insert (buffer, &start_iter, text, strlen (text));
            g_free (text);
        }

        check = glade_xml_get_widget(editor->gui, "checkbutton-mailingaddress");
        if (check && GTK_IS_CHECK_BUTTON (check)) {
#if 0
            if (address && address->data)
                gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (check), 
                                  address->flags & E_CARD_ADDR_DEFAULT);
            else
                gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (check), FALSE);
#endif
        }
        
        editor->address_choice = result;

        if (address)
            g_boxed_free (e_contact_address_get_type (), address);
    }
}

static struct {
    char *id;
    EContactField field;
} field_mapping [] = {
    { "entry-fullname", E_CONTACT_FULL_NAME },
    { "entry-web", E_CONTACT_HOMEPAGE_URL },
    { "entry-blog", E_CONTACT_BLOG_URL },
    { "entry-company", E_CONTACT_ORG },
    { "entry-department", E_CONTACT_ORG_UNIT },
    { "entry-office", E_CONTACT_OFFICE },
    { "entry-jobtitle", E_CONTACT_TITLE },
    { "entry-profession", E_CONTACT_ROLE },
    { "entry-manager", E_CONTACT_MANAGER },
    { "entry-assistant", E_CONTACT_ASSISTANT },
    { "entry-nickname", E_CONTACT_NICKNAME },
    { "entry-spouse", E_CONTACT_SPOUSE },
    { "text-comments", E_CONTACT_NOTE },
    { "entry-categories", E_CONTACT_CATEGORIES },
    { "entry-caluri", E_CONTACT_CALENDAR_URI },
    { "entry-fburl", E_CONTACT_FREEBUSY_URL },
    { "entry-videourl", E_CONTACT_VIDEO_URL },
};

static void
fill_in_field(EContactEditor *editor, char *id, char *value)
{
    GtkWidget *widget = glade_xml_get_widget(editor->gui, id);

    if (!widget)
        return;

    if (E_IS_URL_ENTRY (widget))
        widget = e_url_entry_get_entry (E_URL_ENTRY (widget));

    if (GTK_IS_TEXT_VIEW (widget)) {
        if (value)
            gtk_text_buffer_set_text (gtk_text_view_get_buffer (GTK_TEXT_VIEW (widget)),
                          value, strlen (value));
    }
    else if (GTK_IS_EDITABLE(widget)) {
        int position = 0;
        GtkEditable *editable = GTK_EDITABLE(widget);
        gtk_editable_delete_text(editable, 0, -1);
        if (value)
            gtk_editable_insert_text(editable, value, strlen(value), &position);
    }
}

static void
disable_widget_foreach (char *key, GtkWidget *widget, gpointer closure)
{
    enable_widget (widget, FALSE);
}

static struct {
    char *widget_name;
    EContactField field_id;
    gboolean desensitize_for_read_only;
} widget_field_mappings[] = {
    { "entry-web", E_CONTACT_HOMEPAGE_URL, TRUE },
    { "accellabel-web", E_CONTACT_HOMEPAGE_URL },

    { "entry-blog", E_CONTACT_BLOG_URL, TRUE },
    { "accellabel-blog", E_CONTACT_BLOG_URL },

    { "entry-jobtitle", E_CONTACT_TITLE, TRUE },
    { "label-jobtitle", E_CONTACT_TITLE },

    { "entry-company", E_CONTACT_ORG, TRUE },
    { "label-company", E_CONTACT_ORG },

    { "combo-file-as", E_CONTACT_FILE_AS, TRUE },
    { "entry-file-as", E_CONTACT_FILE_AS, TRUE },
    { "accellabel-fileas", E_CONTACT_FILE_AS },

    { "label-department", E_CONTACT_ORG_UNIT },
    { "entry-department", E_CONTACT_ORG_UNIT, TRUE },

    { "label-office", E_CONTACT_OFFICE },
    { "entry-office", E_CONTACT_OFFICE, TRUE },

    { "label-profession", E_CONTACT_ROLE },
    { "entry-profession", E_CONTACT_ROLE, TRUE },

    { "label-manager", E_CONTACT_MANAGER },
    { "entry-manager", E_CONTACT_MANAGER, TRUE },

    { "label-assistant", E_CONTACT_ASSISTANT },
    { "entry-assistant", E_CONTACT_ASSISTANT, TRUE },

    { "label-nickname", E_CONTACT_NICKNAME },
    { "entry-nickname", E_CONTACT_NICKNAME, TRUE },

    { "label-spouse", E_CONTACT_SPOUSE },
    { "entry-spouse", E_CONTACT_SPOUSE, TRUE },

    { "label-birthday", E_CONTACT_BIRTH_DATE },
    { "dateedit-birthday", E_CONTACT_BIRTH_DATE, TRUE },

    { "label-anniversary", E_CONTACT_ANNIVERSARY },
    { "dateedit-anniversary", E_CONTACT_ANNIVERSARY, TRUE },

    { "label-comments", E_CONTACT_NOTE },
    { "text-comments", E_CONTACT_NOTE, TRUE },

    { "entry-fullname", E_CONTACT_FULL_NAME, TRUE },

    { "button-categories", E_CONTACT_CATEGORIES, TRUE },
    { "entry-categories", E_CONTACT_CATEGORIES, TRUE },

    { "label-caluri", E_CONTACT_CALENDAR_URI },
    { "entry-caluri", E_CONTACT_CALENDAR_URI, TRUE },

    { "label-fburl", E_CONTACT_FREEBUSY_URL },
    { "entry-fburl", E_CONTACT_FREEBUSY_URL, TRUE },

    { "label-videourl", E_CONTACT_VIDEO_URL },
    { "entry-videourl", E_CONTACT_VIDEO_URL, TRUE }
};
static int num_widget_field_mappings = sizeof(widget_field_mappings) / sizeof (widget_field_mappings[0]);

static void
enable_writable_fields(EContactEditor *editor)
{
    EList *fields = editor->writable_fields;
    EIterator *iter;
    GHashTable *dropdown_hash, *supported_hash;
    int i;
    char *widget_name;

    if (!fields)
        return;

    dropdown_hash = g_hash_table_new (g_str_hash, g_str_equal);
    supported_hash = g_hash_table_new (g_str_hash, g_str_equal);

    /* build our hashtable of the drop down menu items */
    e_contact_editor_build_phone_ui (editor);
    for (i = 0; i < G_N_ELEMENTS (phones); i ++)
        g_hash_table_insert (dropdown_hash,
                     (char*)e_contact_field_name(phones[i]),
                     editor->phone_info[i].widget);
    e_contact_editor_build_email_ui (editor);
    for (i = 0; i < G_N_ELEMENTS (emails); i ++)
        g_hash_table_insert (dropdown_hash,
                     (char*)e_contact_field_name(phones[i]),
                     editor->email_info[i].widget);
    e_contact_editor_build_address_ui (editor);
    for (i = E_CONTACT_FIRST_ADDRESS_ID; i <= E_CONTACT_LAST_ADDRESS_ID; i ++)
        g_hash_table_insert (dropdown_hash,
                     (char*)e_contact_field_name (i),
                     editor->address_info[i - E_CONTACT_FIRST_ADDRESS_ID].widget);

    /* then disable them all */
    g_hash_table_foreach (dropdown_hash, (GHFunc)disable_widget_foreach, NULL);

    /* disable the label widgets for the dropdowns (4 phone, 1
           email and the toggle button, and 1 address and one for
           the full address button */
    for (i = 0; i < 4; i ++) {
        widget_name = g_strdup_printf ("label-phone%d", i+1);
        enable_widget (glade_xml_get_widget (editor->gui, widget_name), FALSE);
        g_free (widget_name);
        widget_name = g_strdup_printf ("entry-phone%d", i+1);
        enable_widget (glade_xml_get_widget (editor->gui, widget_name), FALSE);
        g_free (widget_name);
    }
    enable_widget (glade_xml_get_widget (editor->gui, "label-email1"), FALSE);
    enable_widget (glade_xml_get_widget (editor->gui, "entry-email1"), FALSE);
    enable_widget (glade_xml_get_widget (editor->gui, "checkbutton-htmlmail"), FALSE);
    enable_widget (glade_xml_get_widget (editor->gui, "checkbutton-mailingaddress"), FALSE);
    enable_widget (glade_xml_get_widget (editor->gui, "label-address"), FALSE);
    enable_widget (glade_xml_get_widget (editor->gui, "text-address"), FALSE);

    editor->fullname_editable = FALSE;

    /* enable widgets that map directly from a field to a widget (the drop down items) */
    iter = e_list_get_iterator (fields);
    for (; e_iterator_is_valid (iter); e_iterator_next (iter)) {
        char *field = (char*)e_iterator_get (iter);
        GtkWidget *widget = g_hash_table_lookup (dropdown_hash, field);
        int i;

        if (widget) {
            enable_widget (widget, TRUE);
        }
        else {
            /* if it's not a field that's handled by the
                           dropdown items, add it to the has to be
                           used in the second step */
            g_hash_table_insert (supported_hash, field, field);
        }

        for (i = E_CONTACT_FIRST_ADDRESS_ID; i <= E_CONTACT_LAST_ADDRESS_ID; i ++) {
            if (!strcmp (field, e_contact_field_name (i))) {
                editor->address_editable [i - E_CONTACT_FIRST_ADDRESS_ID] = TRUE;
            }
        }

        /* ugh - this is needed to make sure we don't have a
                   disabled label next to a drop down when the item in
                   the menu (the one reflected in the label) is
                   enabled. */
        if (!strcmp (field, e_contact_field_name (editor->email_choice))) {
            enable_widget (glade_xml_get_widget (editor->gui, "label-email1"), TRUE);
            enable_widget (glade_xml_get_widget (editor->gui, "entry-email1"), editor->target_editable);
            enable_widget (glade_xml_get_widget (editor->gui, "checkbutton-htmlmail"), editor->target_editable);
        }
        else if (!strcmp (field, e_contact_field_name (editor->address_choice))) {
            enable_widget (glade_xml_get_widget (editor->gui, "label-address"), TRUE);
            enable_widget (glade_xml_get_widget (editor->gui, "checkbutton-mailingaddress"), editor->target_editable);
            enable_widget (glade_xml_get_widget (editor->gui, "text-address"), editor->target_editable);
        }
        else for (i = 0; i < 4; i ++) {
            if (!strcmp (field, e_contact_field_name (editor->phone_choice[i]))) {
                widget_name = g_strdup_printf ("label-phone%d", i+1);
                enable_widget (glade_xml_get_widget (editor->gui, widget_name), TRUE);
                g_free (widget_name);
                widget_name = g_strdup_printf ("entry-phone%d", i+1);
                enable_widget (glade_xml_get_widget (editor->gui, widget_name), editor->target_editable);
                g_free (widget_name);
            }
        }
    }

    /* handle the label next to the dropdown widgets */

    for (i = 0; i < num_widget_field_mappings; i ++) {
        gboolean enabled;
        GtkWidget *w;
        const char *field;

        w = glade_xml_get_widget(editor->gui, widget_field_mappings[i].widget_name);
        if (!w) {
            g_warning (_("Could not find widget for a field: `%s'"),
                   widget_field_mappings[i].widget_name);
            continue;
        }
        field = e_contact_field_name (widget_field_mappings[i].field_id);

        enabled = (g_hash_table_lookup (supported_hash, field) != NULL);

        if (widget_field_mappings[i].desensitize_for_read_only && !editor->target_editable) {
            enabled = FALSE;
        }

        enable_widget (w, enabled);
    }

    editor->fullname_editable = (g_hash_table_lookup (supported_hash, "full_name") != NULL);

    g_hash_table_destroy (dropdown_hash);
    g_hash_table_destroy (supported_hash);
}

static void
set_editable (EContactEditor *editor)
{
    int i;
    char *entry;
    /* set the sensitivity of all the non-dropdown entry/texts/dateedits */
    for (i = 0; i < num_widget_field_mappings; i ++) {
        if (widget_field_mappings[i].desensitize_for_read_only) {
            GtkWidget *widget = glade_xml_get_widget(editor->gui, widget_field_mappings[i].widget_name);
            enable_widget (widget, editor->target_editable);
        }
    }

    /* handle the phone dropdown entries */
    for (i = 0; i < 4; i ++) {
        entry = g_strdup_printf ("entry-phone%d", i+1);

        enable_widget (glade_xml_get_widget(editor->gui, entry),
                   editor->target_editable);

        g_free (entry);
    }

    /* handle the email dropdown entry */
    entry = "entry-email1";
    enable_widget (glade_xml_get_widget(editor->gui, entry),
               editor->target_editable);
    enable_widget (glade_xml_get_widget(editor->gui, "checkbutton-htmlmail"),
               editor->target_editable);

    /* handle the address dropdown entry */
    entry = "text-address";
    enable_widget (glade_xml_get_widget(editor->gui, entry),
               editor->target_editable);

    entry = "image-chooser";
    enable_widget (glade_xml_get_widget(editor->gui, entry),
               editor->target_editable);
}

static void
fill_in_info(EContactEditor *editor)
{
    EContact *contact = editor->contact;
    if (contact) {
        char *file_as;
        EContactName *name;
        EContactDate *anniversary;
        EContactDate *bday;
        EContactPhoto *photo;
        int i;
        GtkWidget *widget;
        gboolean wants_html;

        g_object_get (contact,
                  "file_as",          &file_as,
                  "name",             &name,
                  "anniversary",      &anniversary,
                  "birth_date",       &bday,
                  "wants_html",       &wants_html,
                  "photo",            &photo,
                  NULL);

        for (i = 0; i < sizeof(field_mapping) / sizeof(field_mapping[0]); i++) {
            char *string = e_contact_get (contact, field_mapping[i].field);
            fill_in_field(editor, field_mapping[i].id, string);
            g_free (string);
        }

#if 0
        find_address_mailing (editor);
#endif
        
        widget = glade_xml_get_widget(editor->gui, "checkbutton-htmlmail");
        if (widget && GTK_IS_CHECK_BUTTON(widget)) {
            g_object_set (widget,
                      "active", wants_html,
                      NULL);
        }

        /* File as has to come after company and name or else it'll get messed up when setting them. */
        fill_in_field(editor, "entry-file-as", file_as);

        g_free (file_as);
        if (editor->name)
            e_contact_name_free(editor->name);
        editor->name = name;

        widget = glade_xml_get_widget(editor->gui, "dateedit-anniversary");
        if (widget && E_IS_DATE_EDIT(widget)) {
            EDateEdit *dateedit;
            dateedit = E_DATE_EDIT(widget);
            if (anniversary)
                e_date_edit_set_date (dateedit,
                              anniversary->year,
                              anniversary->month,
                              anniversary->day);
            else
                e_date_edit_set_time (dateedit, -1);
        }

        widget = glade_xml_get_widget(editor->gui, "dateedit-birthday");
        if (widget && E_IS_DATE_EDIT(widget)) {
            EDateEdit *dateedit;
            dateedit = E_DATE_EDIT(widget);
            if (bday)
                e_date_edit_set_date (dateedit,
                              bday->year,
                              bday->month,
                              bday->day);
            else
                e_date_edit_set_time (dateedit, -1);
        }

        if (photo) {
            widget = glade_xml_get_widget(editor->gui, "image-chooser");
            if (widget && E_IS_IMAGE_CHOOSER(widget))
                e_image_chooser_set_image_data (E_IMAGE_CHOOSER (widget), photo->data, photo->length);
        }

        e_contact_date_free (anniversary);
        e_contact_date_free (bday);
        e_contact_photo_free (photo);

        set_fields(editor);

        set_im_fields(editor);
    }
}

static void
extract_field(EContactEditor *editor, EContact *contact, char *editable_id, EContactField field)
{
    GtkWidget *widget = glade_xml_get_widget(editor->gui, editable_id);
    char *string = NULL;

    if (!widget)
        return;

    if (E_IS_URL_ENTRY (widget))
        widget = e_url_entry_get_entry (E_URL_ENTRY (widget));

    if (GTK_IS_EDITABLE (widget))
        string = gtk_editable_get_chars(GTK_EDITABLE (widget), 0, -1);
    else if (GTK_IS_TEXT_VIEW (widget)) {
        GtkTextIter start, end;
        GtkTextBuffer *buffer;

        buffer = gtk_text_view_get_buffer (GTK_TEXT_VIEW (widget));
        gtk_text_buffer_get_start_iter (buffer, &start);
        gtk_text_buffer_get_end_iter (buffer, &end);

        string = gtk_text_buffer_get_text (buffer, &start, &end, TRUE);
    }

    if (string && *string)
        e_contact_set (contact, field, string);
    else
        e_contact_set (contact, field, NULL);

    if (string) g_free(string);
}

static void
extract_info(EContactEditor *editor)
{
    EContact *contact = editor->contact;
    if (contact) {
        EContactDate anniversary;
        EContactDate bday;
        int i;
        GtkWidget *widget;

        widget = glade_xml_get_widget(editor->gui, "entry-file-as");
        if (widget && GTK_IS_EDITABLE(widget)) {
            GtkEditable *editable = GTK_EDITABLE(widget);
            char *string = gtk_editable_get_chars(editable, 0, -1);

            if (string && *string)
                e_contact_set (contact, E_CONTACT_FILE_AS, string);

            g_free(string);
        }

        for (i = 0; i < sizeof(field_mapping) / sizeof(field_mapping[0]); i++) {
            extract_field(editor, contact, field_mapping[i].id, field_mapping[i].field);
        }

        if (editor->name)
            e_contact_set (contact, E_CONTACT_NAME, editor->name);

        widget = glade_xml_get_widget(editor->gui, "dateedit-anniversary");
        if (widget && E_IS_DATE_EDIT(widget)) {
            if (e_date_edit_get_date (E_DATE_EDIT (widget),
                          &anniversary.year,
                          &anniversary.month,
                          &anniversary.day)) {
                /* g_print ("%d %d %d\n", anniversary.year, anniversary.month, anniversary.day); */
                e_contact_set (contact, E_CONTACT_ANNIVERSARY, &anniversary);
            } else
                e_contact_set (contact, E_CONTACT_ANNIVERSARY, NULL);
        }

        widget = glade_xml_get_widget(editor->gui, "dateedit-birthday");
        if (widget && E_IS_DATE_EDIT(widget)) {
            if (e_date_edit_get_date (E_DATE_EDIT (widget),
                          &bday.year,
                          &bday.month,
                          &bday.day)) {
                /* g_print ("%d %d %d\n", bday.year, bday.month, bday.day); */
                e_contact_set (contact, E_CONTACT_BIRTH_DATE, &bday);
            } else
                e_contact_set (contact, E_CONTACT_BIRTH_DATE, NULL);
        }

        widget = glade_xml_get_widget (editor->gui, "image-chooser");
        if (widget && E_IS_IMAGE_CHOOSER (widget)) {
            char *image_data;
            gsize image_data_len;

            if (editor->image_set
                && e_image_chooser_get_image_data (E_IMAGE_CHOOSER (widget),
                                   &image_data,
                                   &image_data_len)) {
                EContactPhoto photo;

                photo.data = image_data;
                photo.length = image_data_len;

                e_contact_set (contact, E_CONTACT_PHOTO, &photo);
                g_free (image_data);
            }
            else {
                e_contact_set (contact, E_CONTACT_PHOTO, NULL);
            }
        }
    }
}

/**
 * e_contact_editor_raise:
 * @config: The %EContactEditor object.
 *
 * Raises the dialog associated with this %EContactEditor object.
 */
void
e_contact_editor_raise (EContactEditor *editor)
{
    /* FIXME: perhaps we should raise at realize time */
    if (GTK_WIDGET (editor->app)->window)
        gdk_window_raise (GTK_WIDGET (editor->app)->window);
}

/**
 * e_contact_editor_show:
 * @ce: The %EContactEditor object.
 *
 * Shows the dialog associated with this %EContactEditor object.
 */
void
e_contact_editor_show (EContactEditor *ce)
{
    gtk_widget_show (ce->app);
}

GtkWidget *
e_contact_editor_create_date(gchar *name,
                 gchar *string1, gchar *string2,
                 gint int1, gint int2);

GtkWidget *
e_contact_editor_create_date(gchar *name,
                 gchar *string1, gchar *string2,
                 gint int1, gint int2)
{
    GtkWidget *widget = e_date_edit_new ();
    e_date_edit_set_allow_no_date_set (E_DATE_EDIT (widget),
                       TRUE);
    e_date_edit_set_show_time (E_DATE_EDIT (widget), FALSE);
    e_date_edit_set_time (E_DATE_EDIT (widget), -1);
    gtk_widget_show (widget);
    return widget;
}

GtkWidget *
e_contact_editor_create_web(gchar *name,
                gchar *string1, gchar *string2,
                gint int1, gint int2);

GtkWidget *
e_contact_editor_create_web(gchar *name,
                gchar *string1, gchar *string2,
                gint int1, gint int2)
{
    GtkWidget *widget = e_url_entry_new ();
    gtk_widget_show (widget);
    return widget;
}

GtkWidget *
e_contact_editor_create_source_option_menu (gchar *name,
                        gchar *string1, gchar *string2,
                        gint int1, gint int2);

GtkWidget *
e_contact_editor_create_source_option_menu (gchar *name,
                        gchar *string1, gchar *string2,
                        gint int1, gint int2)
{
    GtkWidget   *menu;
    GConfClient *gconf_client;
    ESourceList *source_list;

    gconf_client = gconf_client_get_default ();
    source_list = e_source_list_new_for_gconf (gconf_client, "/apps/evolution/addressbook/sources");

    menu = e_source_option_menu_new (source_list);
    g_object_unref (source_list);

    gtk_widget_show (menu);
    return menu;
}

static void
enable_widget (GtkWidget *widget, gboolean enabled)
{
    if (GTK_IS_ENTRY (widget)) {
        gtk_editable_set_editable (GTK_EDITABLE (widget), enabled);
    }
    else if (GTK_IS_TEXT_VIEW (widget)) {
        gtk_text_view_set_editable (GTK_TEXT_VIEW (widget), enabled);
    }
    else if (GTK_IS_COMBO (widget)) {
        gtk_editable_set_editable (GTK_EDITABLE (GTK_COMBO (widget)->entry),
                       enabled);
        gtk_widget_set_sensitive (GTK_COMBO (widget)->button, enabled);
    }
    else if (E_IS_URL_ENTRY (widget)) {
        GtkWidget *e = e_url_entry_get_entry (E_URL_ENTRY (widget));
        gtk_editable_set_editable (GTK_EDITABLE (e), enabled);
    }
    else if (E_IS_DATE_EDIT (widget)) {
        e_date_edit_set_editable (E_DATE_EDIT (widget), enabled);
    }
    else if (E_IS_IMAGE_CHOOSER (widget)) {
        e_image_chooser_set_editable (E_IMAGE_CHOOSER (widget), enabled);
    }
    else
        gtk_widget_set_sensitive (widget, enabled);
}


gboolean
e_contact_editor_request_close_all (void)
{
    GSList *p;
    GSList *pnext;
    gboolean retval;

    retval = TRUE;
    for (p = all_contact_editors; p != NULL; p = pnext) {
        pnext = p->next;

        e_contact_editor_raise (E_CONTACT_EDITOR (p->data));
        if (! prompt_to_save_changes (E_CONTACT_EDITOR (p->data))) {
            retval = FALSE;
            break;
        }

        close_dialog (E_CONTACT_EDITOR (p->data));
    }

    return retval;
}