path: root/addressbook/gui/component/e-address-popup.c

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

/*
 * e-address-popup.c
 *
 * Copyright (C) 2001 Ximian, Inc.
 *
 * Developed by Jon Trowbridge <trow@ximian.com>
 */

/*
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU General Public License as
 * published by the Free Software Foundation; either version 2 of the
 * License, or (at your option) any later version.
 * 
 * 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 program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
 * USA.
 */

#include <config.h>
#include "e-address-popup.h"
#include <bonobo/bonobo-control.h>
#include <bonobo/bonobo-property-bag.h>
#include <bonobo/bonobo-generic-factory.h>
#include <gal/widgets/e-popup-menu.h>
#include <gal/widgets/e-unicode.h>
#include <addressbook/backend/ebook/e-book.h>
#include <addressbook/backend/ebook/e-book-util.h>
#include <addressbook/gui/contact-editor/e-contact-editor.h>
#include <addressbook/gui/contact-editor/e-contact-quick-add.h>
#include <addressbook/gui/widgets/e-minicard-widget.h>
#include <addressbook/gui/widgets/e-addressbook-util.h>
static GtkObjectClass *parent_class;

static void e_address_popup_destroy (GtkObject *);
static void e_address_popup_query   (EAddressPopup *);


static void
e_address_popup_class_init (EAddressPopupClass *klass)
{
    GtkObjectClass *object_class = (GtkObjectClass *) klass;

    parent_class = GTK_OBJECT_CLASS (gtk_type_class (gtk_event_box_get_type ()));

    object_class->destroy = e_address_popup_destroy;
}

static void
e_address_popup_init (EAddressPopup *pop)
{
    
}

static void
e_address_popup_destroy (GtkObject *obj)
{
    EAddressPopup *pop = E_ADDRESS_POPUP (obj);

    if (pop->card)
        gtk_object_unref (GTK_OBJECT (pop->card));

    if (pop->scheduled_refresh)
        gtk_idle_remove (pop->scheduled_refresh);

    if (pop->leave_timeout_tag)
        gtk_timeout_remove (pop->leave_timeout_tag);

    g_free (pop->name);
    g_free (pop->email);

    if (GTK_OBJECT_CLASS (parent_class)->destroy)
        GTK_OBJECT_CLASS (parent_class)->destroy (obj);
}

GtkType
e_address_popup_get_type (void)
{
    static GtkType pop_type = 0;

    if (!pop_type) {
        GtkTypeInfo pop_info = {
            "EAddressPopup",
            sizeof (EAddressPopup),
            sizeof (EAddressPopupClass),
            (GtkClassInitFunc) e_address_popup_class_init,
            (GtkObjectInitFunc) e_address_popup_init,
            NULL, NULL,
            (GtkClassInitFunc) NULL
        };

        pop_type = gtk_type_unique (gtk_event_box_get_type (), &pop_info);
    }

    return pop_type;
}

static void
e_address_popup_refresh_names (EAddressPopup *pop)
{
    if (pop->name_widget) {
        if (pop->name && *pop->name) {
            gchar *s = e_utf8_to_gtk_string (pop->name_widget, pop->name);
            gtk_label_set_text (GTK_LABEL (pop->name_widget), s);
            g_free (s);
            gtk_widget_show (pop->name_widget);
        } else {
            gtk_widget_hide (pop->name_widget);
        }
    }

    if (pop->email_widget) {
        if (pop->email && *pop->email) {
            gchar *s = e_utf8_to_gtk_string (pop->email_widget, pop->email);
            gtk_label_set_text (GTK_LABEL (pop->email_widget), s);
            g_free (s);
            gtk_widget_show (pop->email_widget);
        } else {
            gtk_widget_hide (pop->email_widget);
        }
    }

    e_address_popup_query (pop);
}

static gint
refresh_idle_cb (gpointer ptr)
{
    EAddressPopup *pop = E_ADDRESS_POPUP (ptr);
    e_address_popup_refresh_names (pop);
    pop->scheduled_refresh = 0;
    return 0;
}

static void
e_address_popup_schedule_refresh (EAddressPopup *pop)
{
    if (pop->scheduled_refresh == 0)
        pop->scheduled_refresh = gtk_idle_add (refresh_idle_cb, pop);
}

/* If we are handed something of the form "Foo <bar@bar.com>",
   do the right thing. */
static gboolean
e_address_popup_set_free_form (EAddressPopup *pop, const gchar *txt)
{
    gchar *lt, *gt = NULL;

    g_return_val_if_fail (pop && E_IS_ADDRESS_POPUP (pop), FALSE);

    if (txt == NULL)
        return FALSE;

    lt = strchr (txt, '<');
    if (lt)
        gt = strchr (txt, '>');

    if (lt && gt && lt+1 < gt) {
        gchar *name  = g_strndup (txt,  lt-txt);
        gchar *email = g_strndup (lt+1, gt-lt-1);
        e_address_popup_set_name (pop, name);
        e_address_popup_set_email (pop, email);

        return TRUE;
    }
    
    return FALSE;
}

void
e_address_popup_set_name (EAddressPopup *pop, const gchar *name)
{
    g_return_if_fail (pop && E_IS_ADDRESS_POPUP (pop));

    /* We only allow the name to be set once. */
    if (pop->name)
        return;

    if (!e_address_popup_set_free_form (pop, name)) {
        pop->name = g_strdup (name);
        if (pop->name)
            g_strstrip (pop->name);
    }

    e_address_popup_schedule_refresh (pop);
}

void
e_address_popup_set_email (EAddressPopup *pop, const gchar *email)
{
    g_return_if_fail (pop && E_IS_ADDRESS_POPUP (pop));

    /* We only allow the e-mail to be set once. */
    if (pop->email)
        return;

    if (!e_address_popup_set_free_form (pop, email)) {
        pop->email = g_strdup (email);
        if (pop->email)
            g_strstrip (pop->email);
    }

    e_address_popup_schedule_refresh (pop);
}

void
e_address_popup_construct (EAddressPopup *pop)
{
    GtkWidget *vbox, *name_holder;
    GdkColor color = { 0x0, 0xffff, 0xffff, 0xffff };

    g_return_if_fail (pop && E_IS_ADDRESS_POPUP (pop));

    pop->main_vbox = gtk_vbox_new (FALSE, 0);

    /* Build Generic View */

    name_holder = gtk_event_box_new ();
    vbox = gtk_vbox_new (FALSE, 2);
    pop->name_widget = gtk_label_new ("");
    pop->email_widget = gtk_label_new ("");

    gtk_box_pack_start (GTK_BOX (vbox), pop->name_widget, TRUE, TRUE, 2);
    gtk_box_pack_start (GTK_BOX (vbox), pop->email_widget, TRUE, TRUE, 2);
    gtk_container_add (GTK_CONTAINER (name_holder), GTK_WIDGET (vbox));

    if (gdk_colormap_alloc_color (gtk_widget_get_colormap (GTK_WIDGET (name_holder)), &color, FALSE, TRUE)) {
        GtkStyle *style = gtk_style_copy (gtk_widget_get_style (GTK_WIDGET (name_holder)));
        style->bg[0] = color;
        gtk_widget_set_style (GTK_WIDGET (name_holder), style);
    }

    pop->generic_view = gtk_frame_new (NULL);
    gtk_container_add (GTK_CONTAINER (pop->generic_view), name_holder);
    gtk_box_pack_start (GTK_BOX (pop->main_vbox), pop->generic_view, TRUE, TRUE, 0);
    gtk_widget_show_all (pop->generic_view);

    pop->query_msg = gtk_label_new ("Querying Addressbook...");
    gtk_box_pack_start (GTK_BOX (pop->main_vbox), pop->query_msg, TRUE, TRUE, 0);
    gtk_widget_show (pop->query_msg);

    /* Build Minicard View */
    pop->minicard_view = e_minicard_widget_new ();
    gtk_box_pack_start (GTK_BOX (pop->main_vbox), pop->minicard_view, TRUE, TRUE, 0);


    /* Final assembly */

    gtk_container_add (GTK_CONTAINER (pop), pop->main_vbox);
    gtk_widget_show (pop->main_vbox);

    gtk_container_set_border_width (GTK_CONTAINER (vbox), 3);
    gtk_container_set_border_width (GTK_CONTAINER (pop), 2);
}

GtkWidget *
e_address_popup_new (void)
{
    EAddressPopup *pop = gtk_type_new (E_ADDRESS_POPUP_TYPE);
    e_address_popup_construct (pop);
    return GTK_WIDGET (pop);
}

static void
contact_editor_cb (EBook *book, gpointer closure)
{
    EAddressPopup *pop = E_ADDRESS_POPUP (closure);
    EContactEditor *ce = e_addressbook_show_contact_editor (book, pop->card, FALSE, TRUE);
    e_contact_editor_raise (ce);    
}

static void
edit_contact_info_cb (EAddressPopup *pop)
{
    e_book_use_local_address_book (contact_editor_cb, pop);
    gtk_widget_destroy (GTK_WIDGET (pop));
}

static void
e_address_popup_cardify (EAddressPopup *pop, ECard *card)
{
    GtkWidget *b;

    g_return_if_fail (pop && E_IS_ADDRESS_POPUP (pop));
    g_return_if_fail (card && E_IS_CARD (card));
    g_return_if_fail (pop->card == NULL);

    pop->card = card;
    gtk_object_ref (GTK_OBJECT (pop->card));

    e_minicard_widget_set_card (E_MINICARD_WIDGET (pop->minicard_view), card);
    gtk_widget_show (pop->minicard_view);
    gtk_widget_hide (pop->generic_view);

    b = gtk_button_new_with_label ("Edit Contact Info");
    gtk_box_pack_start (GTK_BOX (pop->main_vbox), b, TRUE, TRUE, 0);
    gtk_signal_connect_object (GTK_OBJECT (b),
                   "clicked",
                   GTK_SIGNAL_FUNC (edit_contact_info_cb),
                   GTK_OBJECT (pop));
    gtk_widget_show (b);
}

static void
add_contacts_cb (EAddressPopup *pop)
{
    if (pop->email && *pop->email) {
        if (pop->name && *pop->name)
            e_contact_quick_add (pop->name, pop->email, NULL, NULL);
        else
            e_contact_quick_add_free_form (pop->email, NULL, NULL);

    }

    gtk_widget_destroy (GTK_WIDGET (pop));
}

static void
e_address_popup_no_matches (EAddressPopup *pop)
{
    GtkWidget *b;

    g_return_if_fail (pop && E_IS_ADDRESS_POPUP (pop));

    b = gtk_button_new_with_label ("Add to Contacts");
    gtk_box_pack_start (GTK_BOX (pop->main_vbox), b, TRUE, TRUE, 0);
    gtk_signal_connect_object (GTK_OBJECT (b),
                   "clicked",
                   GTK_SIGNAL_FUNC (add_contacts_cb),
                   GTK_OBJECT (pop));
    gtk_widget_show (b);
}

static void
e_address_popup_multiple_matches (EAddressPopup *pop)
{
    pop->multiple_matches = TRUE;
}

static void
e_address_popup_name_only_matches (EAddressPopup *pop, const GList *cards)
{
    const GList *iter;
    for (iter = cards; iter != NULL; iter = g_list_next (iter)) {
        const ECard *card = E_CARD (iter->data);
        gchar *name = e_card_name_to_string (card->name);
        gchar *s = g_strdup_printf ("Matched %s", name);
        GtkWidget *w = gtk_label_new (s);
        gtk_widget_show (w);
        g_free (name);
        g_free (s);
        gtk_box_pack_start (GTK_BOX (pop->main_vbox), w, TRUE, TRUE, 0);
    }
}


/** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** **/

/*
 *  Addressbook Query Fun
 */

static void
name_only_query_cb (EBook *book, EBookSimpleQueryStatus status, const GList *cards, gpointer closure)
{
    EAddressPopup *pop;

    if (status != E_BOOK_SIMPLE_QUERY_STATUS_SUCCESS)
        return;

    pop = E_ADDRESS_POPUP (closure);

    pop->query_tag = 0;

    if (cards == NULL) {
        e_address_popup_no_matches (pop);
    } else {
        e_address_popup_name_only_matches (pop, cards);
    }
}

static void
query_cb (EBook *book, EBookSimpleQueryStatus status, const GList *cards, gpointer closure)
{
    EAddressPopup *pop;

    if (status != E_BOOK_SIMPLE_QUERY_STATUS_SUCCESS)
        return;

    pop = E_ADDRESS_POPUP (closure);

    pop->query_tag = 0;
    gtk_widget_hide (pop->query_msg);

    if (cards == NULL) {
        
        /* Do a name-only query if:
           (1) The name is non-empty.
           (2) The e-mail is also non-empty (so that the query we just did wasn't actually a name-only query.
        */
        if (pop->name && *pop->name && pop->email && *pop->email) {
            pop->query_tag = e_book_name_and_email_query (book, pop->name, NULL, name_only_query_cb, pop);
        } else {
            e_address_popup_no_matches (pop);
        }
        
    } else {
        if (g_list_length ((GList *) cards) == 1)
            e_address_popup_cardify (pop, E_CARD (cards->data));
        else
            e_address_popup_multiple_matches (pop);
    }
}

static void
start_query (EBook *book, gpointer closure)
{
    EAddressPopup *pop = E_ADDRESS_POPUP (closure);

    if (pop->query_tag)
        e_book_simple_query_cancel (book, pop->query_tag);

    pop->query_tag = e_book_name_and_email_query (book, pop->name, pop->email, query_cb, pop);
}

static void
e_address_popup_query (EAddressPopup *pop)
{
    g_return_if_fail (pop && E_IS_ADDRESS_POPUP (pop));

    e_book_use_local_address_book (start_query, pop);
}

/** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** **/

enum {
    PROPERTY_NAME,
    PROPERTY_EMAIL
};

static void
set_prop (BonoboPropertyBag *bag, const BonoboArg *arg, guint arg_id, CORBA_Environment *ev, gpointer user_data)
{
    EAddressPopup *pop = E_ADDRESS_POPUP (user_data);

    switch (arg_id) {

    case PROPERTY_NAME:
        e_address_popup_set_name (pop, BONOBO_ARG_GET_STRING (arg));
        break;

    case PROPERTY_EMAIL:
        e_address_popup_set_email (pop, BONOBO_ARG_GET_STRING (arg));
        break;

    default:
        g_assert_not_reached ();
    }
            
}

static BonoboControl *
e_address_popup_factory_new_control (void)
{
        BonoboControl *control;
        BonoboPropertyBag *bag;
    GtkWidget *w;

    w = e_address_popup_new ();
    control = bonobo_control_new (w);
    gtk_widget_show (w);

    gtk_signal_connect_object (GTK_OBJECT (w),
                   "destroy",
                   GTK_SIGNAL_FUNC (bonobo_object_unref),
                   GTK_OBJECT (control));

        bag = bonobo_property_bag_new (NULL, set_prop, w);
        bonobo_property_bag_add (bag, "name", PROPERTY_NAME,
                                 BONOBO_ARG_STRING, NULL, NULL,
                                 BONOBO_PROPERTY_WRITEABLE);

        bonobo_property_bag_add (bag, "email", PROPERTY_EMAIL,
                                 BONOBO_ARG_STRING, NULL, NULL,
                                 BONOBO_PROPERTY_WRITEABLE);

        bonobo_control_set_properties (control, bag);
        bonobo_object_unref (BONOBO_OBJECT (bag));

        return control;
}

static BonoboObject *
e_address_popup_factory (BonoboGenericFactory *factory, gpointer user_data)
{
    return BONOBO_OBJECT (e_address_popup_factory_new_control ());
}

void
e_address_popup_factory_init (void)
{
    static BonoboGenericFactory *factory = NULL;

    if (factory != NULL)
        return;

    factory = bonobo_generic_factory_new ("OAFIID:GNOME_Evolution_Addressbook_AddressPopupFactory",
                          e_address_popup_factory, NULL);
    
    if (factory == NULL)
        g_error ("I could not register an AddressPopup factory.");
}