/* -*- 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 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 program; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
* USA.
*/
/*
* This file is too big and this widget is too complicated. Forgive me.
*/
#include <config.h>
#include <string.h>
#include "addressbook.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 <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>
/*
* Some general scaffolding for our widgets. Think of this as a really, really
* lame implementation of a wizard (...which is still somewhat more general that
* we really need it to be).
*/
typedef struct _MiniWizard MiniWizard;
struct _MiniWizard {
GtkWidget *body;
GtkWidget *vbox;
GtkWidget *ok_button;
GtkWidget *cancel_button;
void (*ok_cb) (MiniWizard *, gpointer);
void (*cleanup_cb) (gpointer);
gpointer closure;
void (*destroy_cb) (MiniWizard *, gpointer);
gpointer destroy_closure;
};
static void
mini_wizard_container_add (MiniWizard *wiz, GtkWidget *w)
{
GList *iter = gtk_container_children (GTK_CONTAINER (wiz->vbox));
while (iter != NULL) {
GtkWidget *oldw = (GtkWidget *) iter->data;
iter = g_list_next (iter);
gtk_container_remove (GTK_CONTAINER (wiz->vbox), oldw);
gtk_widget_destroy (oldw);
}
gtk_container_add (GTK_CONTAINER (wiz->vbox), w);
}
static void
mini_wizard_destroy (MiniWizard *wiz)
{
if (wiz->cleanup_cb)
wiz->cleanup_cb (wiz->closure);
wiz->cleanup_cb = NULL;
if (wiz->destroy_cb)
wiz->destroy_cb (wiz, wiz->destroy_closure);
}
static void
mini_wizard_ok_cb (GtkWidget *b, gpointer closure)
{
MiniWizard *wiz = (MiniWizard *) closure;
gpointer old_closure = wiz->closure;
void (*old_cleanup) (gpointer) = wiz->cleanup_cb;
wiz->cleanup_cb = NULL;
if (wiz->ok_cb)
wiz->ok_cb (wiz, wiz->closure);
if (old_cleanup)
old_cleanup (old_closure);
}
static void
mini_wizard_cancel_cb (GtkWidget *b, gpointer closure)
{
mini_wizard_destroy ((MiniWizard *) closure);
}
static void
mini_wizard_destroy_cb (GtkWidget *w, gpointer closure)
{
MiniWizard *wiz = (MiniWizard *) closure;
if (wiz->cleanup_cb)
wiz->cleanup_cb (wiz->closure);
g_free (wiz);
}
static MiniWizard *
mini_wizard_new (void)
{
MiniWizard *wiz = g_new (MiniWizard, 1);
GtkWidget *hbox;
wiz->body = gtk_vbox_new (FALSE, 2);
wiz->vbox = gtk_vbox_new (FALSE, 2);
wiz->ok_button = gtk_button_new_from_stock (GTK_STOCK_OK);
wiz->cancel_button = gtk_button_new_from_stock (GTK_STOCK_CANCEL);
wiz->ok_cb = NULL;
wiz->cleanup_cb = NULL;
wiz->closure = NULL;
wiz->destroy_cb = NULL;
wiz->destroy_closure = NULL;
hbox = gtk_hbox_new (FALSE, 2);
gtk_box_pack_start (GTK_BOX (hbox), wiz->ok_button, TRUE, FALSE, 2);
gtk_box_pack_start (GTK_BOX (hbox), wiz->cancel_button, TRUE, FALSE, 2);
gtk_box_pack_start (GTK_BOX (wiz->body), wiz->vbox, TRUE, TRUE, 2);
gtk_box_pack_start (GTK_BOX (wiz->body), gtk_hseparator_new (), FALSE, TRUE, 2);
gtk_box_pack_start (GTK_BOX (wiz->body), hbox, FALSE, TRUE, 2);
gtk_widget_show_all (wiz->body);
g_signal_connect (wiz->ok_button,
"clicked",
G_CALLBACK (mini_wizard_ok_cb),
wiz);
g_signal_connect (wiz->cancel_button,
"clicked",
G_CALLBACK (mini_wizard_cancel_cb),
wiz);
g_signal_connect (wiz->body,
"destroy",
G_CALLBACK (mini_wizard_destroy_cb),
wiz);
return wiz;
}
/*
* This is the code for the UI thingie that lets you manipulate the e-mail
* addresses (and *only* the e-mail addresses) associated with an existing
* card.
*/
#define EMPTY_ENTRY N_("(none)")
typedef struct _EMailMenu EMailMenu;
struct _EMailMenu {
GtkWidget *option_menu;
GList *options;
gchar *current_selection;
};
static void
email_menu_free (EMailMenu *menu)
{
if (menu == NULL)
return;
g_list_foreach (menu->options, (GFunc) g_free, NULL);
g_list_free (menu->options);
g_free (menu);
}
static EMailMenu *
email_menu_new (void)
{
EMailMenu *menu = g_new (EMailMenu, 1);
menu->option_menu = gtk_option_menu_new ();
menu->options = NULL;
menu->current_selection = NULL;
gtk_option_menu_set_menu (GTK_OPTION_MENU (menu->option_menu), gtk_menu_new ());
return menu;
}
static void
menu_activate_cb (GtkWidget *w, gpointer closure)
{
EMailMenu *menu = (EMailMenu *) closure;
gchar *addr = (gchar *) g_object_get_data (G_OBJECT (w), "addr");
menu->current_selection = addr;
}
static void
email_menu_add_option (EMailMenu *menu, const gchar *addr)
{
GtkWidget *menu_item;
gchar *addr_cpy;
g_return_if_fail (menu != NULL);
if (addr == NULL)
return;
addr_cpy = g_strdup (addr);
menu->options = g_list_append (menu->options, addr_cpy);
menu_item = gtk_menu_item_new_with_label (addr);
g_object_set_data (G_OBJECT (menu_item), "addr", addr_cpy);
gtk_widget_show_all (menu_item);
gtk_menu_append (GTK_MENU (gtk_option_menu_get_menu (GTK_OPTION_MENU (menu->option_menu))), menu_item);
g_signal_connect (menu_item,
"activate",
G_CALLBACK (menu_activate_cb),
menu);
}
static void
email_menu_add_options_from_card (EMailMenu *menu, ECard *card, const gchar *extra_addr)
{
ECardSimple *simple;
g_return_if_fail (card && E_IS_CARD (card));
simple = e_card_simple_new (card);
/* If any of these three e-mail fields are NULL, email_menu_add_option will just
return without doing anything. */
email_menu_add_option (menu, e_card_simple_get_email (simple, E_CARD_SIMPLE_EMAIL_ID_EMAIL));
email_menu_add_option (menu, e_card_simple_get_email (simple, E_CARD_SIMPLE_EMAIL_ID_EMAIL_2));
email_menu_add_option (menu, e_card_simple_get_email (simple, E_CARD_SIMPLE_EMAIL_ID_EMAIL_3));
email_menu_add_option (menu, extra_addr);
email_menu_add_option (menu, EMPTY_ENTRY);
g_object_unref (simple);
}
static void
email_menu_set_option (EMailMenu *menu, const gchar *addr)
{
guint count = 0;
GList *iter;
g_return_if_fail (menu != NULL);
if (addr == NULL) {
email_menu_set_option (menu, EMPTY_ENTRY);
return;
}
iter = menu->options;
while (iter && strcmp (addr, (gchar *) iter->data)) {
++count;
iter = g_list_next (iter);
}
if (iter) {
gtk_option_menu_set_history (GTK_OPTION_MENU (menu->option_menu), count);
menu->current_selection = (gchar *) iter->data;
}
}
#ifdef UNDEFINED_FUNCTIONS_SHOULD_PLEASE_BE_INCLUDED
static void
email_menu_unset_option (EMailMenu *menu, const gchar *addr)
{
GList *iter;
g_return_if_fail (menu != NULL);
g_return_if_fail (addr != NULL);
if (menu->current_selection == NULL || strcmp (addr, menu->current_selection))
return;
iter = menu->options;
while (iter && strcmp (addr, (gchar *) iter->data)) {
iter = g_list_next (iter);
}
if (iter) {
iter = g_list_next (iter);
if (iter) {
email_menu_set_option (menu, (gchar *) iter->data);
} else {
email_menu_set_option (menu, EMPTY_ENTRY);
}
}
}
#endif
typedef struct _EMailTable EMailTable;
struct _EMailTable {
GtkWidget *table;
ECard *card;
EMailMenu *primary;
EMailMenu *email2;
EMailMenu *email3;
};
static void
email_table_cleanup_cb (gpointer closure)
{
EMailTable *et = (EMailTable *) closure;
if (et == NULL)
return;
g_object_unref (et->card);
email_menu_free (et->primary);
email_menu_free (et->email2);
email_menu_free (et->email3);
g_free (et);
}
static void
email_table_from_card (EMailTable *et)
{
ECardSimple *simple;
g_return_if_fail (et != NULL);
simple = e_card_simple_new (et->card);
email_menu_set_option (et->primary, e_card_simple_get_email (simple, E_CARD_SIMPLE_EMAIL_ID_EMAIL));
email_menu_set_option (et->email2, e_card_simple_get_email (simple, E_CARD_SIMPLE_EMAIL_ID_EMAIL_2));
email_menu_set_option (et->email3, e_card_simple_get_email (simple, E_CARD_SIMPLE_EMAIL_ID_EMAIL_3));
g_object_unref (simple);
}
static void
email_table_to_card (EMailTable *et)
{
ECardSimple *simple;
gchar *curr;
g_return_if_fail (et != NULL);
simple = e_card_simple_new (et->card);
curr = et->primary->current_selection;
if (curr && !strcmp (curr, _(EMPTY_ENTRY)))
curr = NULL;
e_card_simple_set_email (simple, E_CARD_SIMPLE_EMAIL_ID_EMAIL, curr);
curr = et->email2->current_selection;
if (curr && !strcmp (curr, _(EMPTY_ENTRY)))
curr = NULL;
e_card_simple_set_email (simple, E_CARD_SIMPLE_EMAIL_ID_EMAIL_2, curr);
curr = et->email3->current_selection;
if (curr && !strcmp (curr, _(EMPTY_ENTRY)))
curr = NULL;
e_card_simple_set_email (simple, E_CARD_SIMPLE_EMAIL_ID_EMAIL_3, curr);
e_card_simple_sync_card (simple);
g_object_unref (simple);
}
static void
email_table_save_card_cb (EBook *book, EBookStatus status, gpointer closure)
{
ECard *card = E_CARD (closure);
if (book) {
e_book_commit_card (book, card, NULL, NULL);
g_object_unref (book);
}
g_object_unref (card);
}
/*
* We have to do this in an idle function because of what might be a
* re-entrancy problems with EBook.
*/
static gint
add_card_idle_cb (gpointer closure)
{
EBook *book;
book = e_book_new ();
if (!addressbook_load_default_book (book, email_table_save_card_cb, closure)) {
g_object_unref (book);
email_table_save_card_cb (NULL, E_BOOK_STATUS_OTHER_ERROR, closure);
}
return 0;
}
static void
email_table_ok_cb (MiniWizard *wiz, gpointer closure)
{
EMailTable *et = (EMailTable *) closure;
email_table_to_card (et);
g_object_ref (et->card);
gtk_idle_add (add_card_idle_cb, et->card);
mini_wizard_destroy (wiz);
}
static void
email_table_init (MiniWizard *wiz, ECard *card, const gchar *extra_address)
{
EMailTable *et;
gchar *name_str;
gint xpad, ypad;
GtkAttachOptions label_x_opts, label_y_opts;
GtkAttachOptions menu_x_opts, menu_y_opts;
g_return_if_fail (card && E_IS_CARD (card));
et = g_new (EMailTable, 1);
et->card = card;
g_object_ref (et->card);
et->table = gtk_table_new (4, 2, FALSE);
et->primary = email_menu_new ();
et->email2 = email_menu_new ();
et->email3 = email_menu_new ();
email_menu_add_options_from_card (et->primary, et->card, extra_address);
email_menu_add_options_from_card (et->email2, et->card, extra_address);
email_menu_add_options_from_card (et->email3, et->card, extra_address);
email_table_from_card (et);
label_x_opts = GTK_FILL;
label_y_opts = GTK_FILL;
menu_x_opts = GTK_EXPAND | GTK_FILL;
menu_y_opts = GTK_EXPAND | GTK_FILL;
xpad = 3;
ypad = 3;
name_str = e_card_name_to_string (et->card->name);
gtk_table_attach (GTK_TABLE (et->table),
gtk_label_new (name_str),
0, 2, 0, 1,
label_x_opts, label_y_opts, xpad, ypad);
g_free (name_str);
gtk_table_attach (GTK_TABLE (et->table),
gtk_label_new (_("Primary Email")),
0, 1, 1, 2,
label_x_opts, label_y_opts, xpad, ypad);
gtk_table_attach (GTK_TABLE (et->table),
et->primary->option_menu,
1, 2, 1, 2,
menu_x_opts, menu_y_opts, xpad, ypad);
gtk_table_attach (GTK_TABLE (et->table),
gtk_label_new (_("Email 2")),
0, 1, 2, 3,
label_x_opts, label_y_opts, xpad, ypad);
gtk_table_attach (GTK_TABLE (et->table),
et->email2->option_menu,
1, 2, 2, 3,
menu_x_opts, menu_y_opts, xpad, ypad);
gtk_table_attach (GTK_TABLE (et->table),
gtk_label_new (_("Email 3")),
0, 1, 3, 4,
label_x_opts, label_y_opts, xpad, ypad);
gtk_table_attach (GTK_TABLE (et->table),
et->email3->option_menu,
1, 2, 3, 4,
menu_x_opts, menu_y_opts, xpad, ypad);
gtk_widget_show_all (et->primary->option_menu);
gtk_widget_show_all (et->email2->option_menu);
gtk_widget_show_all (et->email3->option_menu);
gtk_widget_show_all (et->table);
mini_wizard_container_add (wiz, et->table);
wiz->ok_cb = email_table_ok_cb;
wiz->cleanup_cb = email_table_cleanup_cb;
wiz->closure = et;
}
/*
* This code is for the little UI thing that lets you pick from a set of cards
* and decide which one you want to add the e-mail address to.
*/
typedef struct _CardPicker CardPicker;
struct _CardPicker {
GtkWidget *body;
GtkWidget *clist;
GList *cards;
gchar *new_name;
gchar *new_email;
gint current_row;
};
static void
card_picker_row_select_cb (GtkCList *clist, gint row, gint col, GdkEventButton *ev, gpointer closure)
{
MiniWizard *wiz = (MiniWizard *) closure;
CardPicker *pick = (CardPicker *) wiz->closure;
pick->current_row = row;
gtk_widget_set_sensitive (wiz->ok_button, TRUE);
}
static void
card_picker_row_unselect_cb (GtkCList *clist, gint row, gint col, GdkEventButton *ev, gpointer closure)
{
MiniWizard *wiz = (MiniWizard *) closure;
CardPicker *pick = (CardPicker *) wiz->closure;
pick->current_row = -1;
gtk_widget_set_sensitive (wiz->ok_button, FALSE);
}
static void
card_picker_ok_cb (MiniWizard *wiz, gpointer closure)
{
CardPicker *pick = (CardPicker *) closure;
g_return_if_fail (pick->current_row >= 0);
if (pick->current_row == 0) {
e_contact_quick_add (pick->new_name, pick->new_email, NULL, NULL);
mini_wizard_destroy (wiz);
} else {
ECard *card = (ECard *) g_list_nth_data (pick->cards, pick->current_row-1);
email_table_init (wiz, card, pick->new_email);
}
}
static void
card_picker_cleanup_cb (gpointer closure)
{
CardPicker *pick = (CardPicker *) closure;
g_list_foreach (pick->cards, (GFunc) g_object_unref, NULL);
g_list_free (pick->cards);
g_free (pick->new_name);
g_free (pick->new_email);
}
static void
card_picker_init (MiniWizard *wiz, const GList *cards, const gchar *new_name, const gchar *new_email)
{
CardPicker *pick;
gchar *str;
GtkWidget *w, *swin;
pick = g_new (CardPicker, 1);
pick->body = gtk_vbox_new (FALSE, 2);
pick->clist = gtk_clist_new (1);
gtk_clist_set_column_title (GTK_CLIST (pick->clist), 0, _("Select an Action"));
gtk_clist_column_titles_show (GTK_CLIST (pick->clist));
gtk_clist_set_selection_mode (GTK_CLIST (pick->clist), GTK_SELECTION_SINGLE);
gtk_clist_freeze (GTK_CLIST (pick->clist));
str = g_strdup_printf (_("Create a new contact \"%s\""), new_name);
gtk_clist_append (GTK_CLIST (pick->clist), &str);
g_free (str);
pick->cards = NULL;
while (cards) {
ECard *card = (ECard *) cards->data;
gchar *name_str = e_card_name_to_string (card->name);
pick->cards = g_list_append (pick->cards, card);
g_object_ref (card);
str = g_strdup_printf (_("Add address to existing contact \"%s\""), name_str);
gtk_clist_append (GTK_CLIST (pick->clist), &str);
g_free (name_str);
g_free (str);
cards = g_list_next (cards);
}
gtk_clist_thaw (GTK_CLIST (pick->clist));
pick->new_name = g_strdup (new_name);
pick->new_email = g_strdup (new_email);
pick->current_row = -1;
gtk_widget_set_sensitive (wiz->ok_button, FALSE);
/* Connect some signals & callbacks */
wiz->ok_cb = card_picker_ok_cb;
wiz->cleanup_cb = card_picker_cleanup_cb;
g_signal_connect (pick->clist,
"select-row",
G_CALLBACK (card_picker_row_select_cb),
wiz);
g_signal_connect (pick->clist,
"unselect-row",
G_CALLBACK (card_picker_row_unselect_cb),
wiz);
/* Build our widget */
w = gtk_label_new (new_email);
gtk_box_pack_start (GTK_BOX (pick->body), w, FALSE, TRUE, 3);
swin = gtk_scrolled_window_new (NULL, NULL);
gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (swin),
GTK_POLICY_AUTOMATIC, GTK_POLICY_AUTOMATIC);
gtk_scrolled_window_add_with_viewport (GTK_SCROLLED_WINDOW (swin), pick->clist);
gtk_box_pack_start (GTK_BOX (pick->body), swin, TRUE, TRUE, 2);
gtk_widget_show_all (pick->body);
/* Put it in our mini-wizard */
wiz->closure = pick;
mini_wizard_container_add (wiz, pick->body);
}
/* ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** */
/*
* The code for the actual EAddressPopup widget begins here.
*/
/* ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** */
static GtkObjectClass *parent_class;
static void e_address_popup_dispose (GObject *);
static void e_address_popup_query (EAddressPopup *);
static void
e_address_popup_class_init (EAddressPopupClass *klass)
{
GObjectClass *object_class = G_OBJECT_CLASS (klass);
parent_class = g_type_class_peek_parent (klass);
object_class->dispose = e_address_popup_dispose;
}
static void
e_address_popup_init (EAddressPopup *pop)
{
pop->transitory = TRUE;
}
static void
e_address_popup_cleanup (EAddressPopup *pop)
{
if (pop->card) {
g_object_unref (pop->card);
pop->card = NULL;
}
if (pop->scheduled_refresh) {
gtk_timeout_remove (pop->scheduled_refresh);
pop->scheduled_refresh = 0;
}
if (pop->query_tag) {
e_book_simple_query_cancel (pop->book, pop->query_tag);
pop->query_tag = 0;
}
if (pop->book) {
g_object_unref (pop->book);
pop->book = NULL;
}
g_free (pop->name);
pop->name = NULL;
g_free (pop->email);
pop->email = NULL;
}
static void
e_address_popup_dispose (GObject *obj)
{
EAddressPopup *pop = E_ADDRESS_POPUP (obj);
e_address_popup_cleanup (pop);
if (G_OBJECT_CLASS (parent_class)->dispose)
G_OBJECT_CLASS (parent_class)->dispose (obj);
}
GType
e_address_popup_get_type (void)
{
static GType pop_type = 0;
if (!pop_type) {
static const GTypeInfo pop_info = {
sizeof (EAddressPopupClass),
NULL, /* base_init */
NULL, /* base_finalize */
(GClassInitFunc) e_address_popup_class_init,
NULL, /* class_finalize */
NULL, /* class_data */
sizeof (EAddressPopup),
0, /* n_preallocs */
(GInstanceInitFunc) e_address_popup_init,
};
pop_type = g_type_register_static (gtk_event_box_get_type (), "EAddressPopup", &pop_info, 0);
}
return pop_type;
}
static void
e_address_popup_refresh_names (EAddressPopup *pop)
{
if (pop->name_widget) {
if (pop->name && *pop->name) {
gtk_label_set_text (GTK_LABEL (pop->name_widget), pop->name);
gtk_widget_show (pop->name_widget);
} else {
gtk_widget_hide (pop->name_widget);
}
}
if (pop->email_widget) {
if (pop->email && *pop->email) {
gtk_label_set_text (GTK_LABEL (pop->email_widget), pop->email);
gtk_widget_show (pop->email_widget);
} else {
gtk_widget_hide (pop->email_widget);
}
}
e_address_popup_query (pop);
}
static gint
refresh_timeout_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_timeout_add (20, refresh_timeout_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);
gtk_style_unref (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 = g_object_new (E_TYPE_ADDRESS_POPUP, NULL);
e_address_popup_construct (pop);
return GTK_WIDGET (pop);
}
static void
emit_event (EAddressPopup *pop, const char *event)
{
if (pop->es) {
BonoboArg *arg;
arg = bonobo_arg_new (BONOBO_ARG_BOOLEAN);
BONOBO_ARG_SET_BOOLEAN (arg, TRUE);
bonobo_event_source_notify_listeners_full (pop->es,
"GNOME/Evolution/Addressbook/AddressPopup",
"Event",
event,
arg, NULL);
bonobo_arg_release (arg);
}
}
static void
contact_editor_cb (EBook *book, EBookStatus status, gpointer closure)
{
EAddressPopup *pop = E_ADDRESS_POPUP (closure);
EContactEditor *ce = e_addressbook_show_contact_editor (book, pop->card, FALSE, TRUE);
e_address_popup_cleanup (pop);
emit_event (pop, "Destroy");
e_contact_editor_raise (ce);
}
static void
edit_contact_info_cb (EAddressPopup *pop)
{
EBook *book;
emit_event (pop, "Hide");
book = e_book_new ();
if (!addressbook_load_default_book (book, contact_editor_cb, pop)) {
g_object_unref (book);
contact_editor_cb (NULL, E_BOOK_STATUS_OTHER_ERROR, 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;
g_object_ref (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);
g_signal_connect (b,
"clicked",
G_CALLBACK (edit_contact_info_cb),
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);
}
e_address_popup_cleanup (pop);
emit_event (pop, "Destroy");
}
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);
g_signal_connect (b,
"clicked",
G_CALLBACK (add_contacts_cb),
pop);
gtk_widget_show (b);
}
static void
wizard_destroy_cb (MiniWizard *wiz, gpointer closure)
{
gtk_widget_destroy (GTK_WIDGET (closure));
}
static void
popup_size_allocate_cb (GtkWidget *widget, GtkAllocation *alloc, gpointer user_data)
{
gint x, y, w, h, xmax, ymax;
xmax = gdk_screen_width ();
ymax = gdk_screen_height ();
if (g_object_get_data (G_OBJECT (widget), "size_allocate") == NULL) {
gdk_window_get_pointer (NULL, &x, &y, NULL);
w = alloc->width;
h = alloc->height;
x = CLAMP (x - w/2, 0, xmax - w);
y = CLAMP (y - h/2, 0, ymax - h);
gtk_widget_set_uposition (widget, x, y);
g_object_set_data (G_OBJECT (widget), "size_allocate", widget);
}
}
static void
e_address_popup_ambiguous_email_add (EAddressPopup *pop, const GList *cards)
{
MiniWizard *wiz = mini_wizard_new ();
GtkWidget *win = gtk_window_new (GTK_WINDOW_TOPLEVEL);
wiz->destroy_cb = wizard_destroy_cb;
wiz->destroy_closure = win;
gtk_window_set_title (GTK_WINDOW (win), _("Merge E-Mail Address"));
g_signal_connect (win,
"size_allocate",
G_CALLBACK (popup_size_allocate_cb),
NULL);
/* FIXME: This hard-wired size is evil. */
gtk_widget_set_usize (win, 275, 170);
card_picker_init (wiz, cards, pop->name, pop->email);
e_address_popup_cleanup (pop);
emit_event (pop, "Destroy");
gtk_container_add (GTK_CONTAINER (win), wiz->body);
gtk_widget_show_all (win);
}
static void
e_address_popup_multiple_matches (EAddressPopup *pop, const GList *cards)
{
pop->multiple_matches = TRUE;
e_address_popup_ambiguous_email_add (pop, cards);
}
/** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** **/
/*
* 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_ambiguous_email_add (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, cards);
}
}
static void
start_query (EBook *book, EBookStatus status, gpointer closure)
{
EAddressPopup *pop = E_ADDRESS_POPUP (closure);
if (status != E_BOOK_STATUS_SUCCESS) {
e_address_popup_no_matches (pop);
return;
}
if (pop->query_tag)
e_book_simple_query_cancel (book, pop->query_tag);
if (pop->book != book) {
g_object_ref (book);
if (pop->book)
g_object_unref (pop->book);
pop->book = book;
}
pop->query_tag = e_book_name_and_email_query (book, pop->name, pop->email, query_cb, pop);
g_object_unref (pop);
}
static void
e_address_popup_query (EAddressPopup *pop)
{
EBook *book;
g_return_if_fail (pop && E_IS_ADDRESS_POPUP (pop));
book = e_book_new ();
g_object_ref (pop);
if (!addressbook_load_default_book (book, start_query, pop)) {
g_object_unref (book);
start_query (NULL, E_BOOK_STATUS_OTHER_ERROR, pop);
}
}
/** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** ** **/
enum {
PROPERTY_NAME,
PROPERTY_EMAIL,
PROPERTY_TRANSITORY
};
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 void
get_prop (BonoboPropertyBag *bag, BonoboArg *arg, guint arg_id, CORBA_Environment *ev, gpointer user_data)
{
EAddressPopup *pop = E_ADDRESS_POPUP (user_data);
switch (arg_id) {
case PROPERTY_NAME:
BONOBO_ARG_SET_STRING (arg, pop->name);
break;
case PROPERTY_EMAIL:
BONOBO_ARG_SET_STRING (arg, pop->email);
break;
case PROPERTY_TRANSITORY:
BONOBO_ARG_SET_BOOLEAN (arg, pop->transitory);
break;
default:
g_assert_not_reached ();
}
}
static BonoboControl *
e_address_popup_factory_new_control (void)
{
BonoboControl *control;
BonoboPropertyBag *bag;
EAddressPopup *addy;
GtkWidget *w;
w = e_address_popup_new ();
addy = E_ADDRESS_POPUP (w);
control = bonobo_control_new (w);
gtk_widget_show (w);
bag = bonobo_property_bag_new (get_prop, set_prop, w);
bonobo_property_bag_add (bag, "name", PROPERTY_NAME,
BONOBO_ARG_STRING, NULL, NULL,
BONOBO_PROPERTY_WRITEABLE | BONOBO_PROPERTY_READABLE);
bonobo_property_bag_add (bag, "email", PROPERTY_EMAIL,
BONOBO_ARG_STRING, NULL, NULL,
BONOBO_PROPERTY_WRITEABLE | BONOBO_PROPERTY_READABLE);
bonobo_property_bag_add (bag, "transitory", PROPERTY_TRANSITORY,
BONOBO_ARG_BOOLEAN, NULL, NULL,
BONOBO_PROPERTY_READABLE);
bonobo_control_set_properties (control, bonobo_object_corba_objref (BONOBO_OBJECT (bag)), NULL);
bonobo_object_unref (BONOBO_OBJECT (bag));
addy->es = bonobo_event_source_new ();
bonobo_object_add_interface (BONOBO_OBJECT (control),
BONOBO_OBJECT (addy->es));
return control;
}
static BonoboObject *
e_address_popup_factory (BonoboGenericFactory *factory,
const char *component_id,
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.");
}