/* -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8 -*- */
/* e-select-names.c
* Copyright (C) 2000 Helix Code, Inc.
* Author: Chris Lahey <clahey@helixcode.com>
*
* This library 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 library; if not, write to the
* Free Software Foundation, Inc., 59 Temple Place - Suite 330,
* Boston, MA 02111-1307, USA.
*/
#include <config.h>
#include <gnome.h>
#include "e-select-names.h"
#include <gal/e-table/e-table-simple.h>
#include <addressbook/gui/widgets/e-addressbook-model.h>
#include <addressbook/gui/component/e-cardlist-model.h>
#include <addressbook/backend/ebook/e-book.h>
#include "e-select-names-table-model.h"
#include <shell/evolution-shell-client.h>
#include <addressbook/gui/component/addressbook-component.h>
static void e_select_names_init (ESelectNames *card);
static void e_select_names_class_init (ESelectNamesClass *klass);
static void e_select_names_set_arg (GtkObject *o, GtkArg *arg, guint arg_id);
static void e_select_names_get_arg (GtkObject *object, GtkArg *arg, guint arg_id);
static void e_select_names_destroy (GtkObject *object);
static GnomeDialogClass *parent_class = NULL;
#define PARENT_TYPE gnome_dialog_get_type()
/* The arguments we take */
enum {
ARG_0,
};
typedef struct {
char *title;
ETableModel *model;
ESelectNamesModel *source;
ESelectNames *names;
} ESelectNamesChild;
GtkType
e_select_names_get_type (void)
{
static GtkType type = 0;
if (!type) {
static const GtkTypeInfo info =
{
"ESelectNames",
sizeof (ESelectNames),
sizeof (ESelectNamesClass),
(GtkClassInitFunc) e_select_names_class_init,
(GtkObjectInitFunc) e_select_names_init,
/* reserved_1 */ NULL,
/* reserved_2 */ NULL,
(GtkClassInitFunc) NULL,
};
type = gtk_type_unique (PARENT_TYPE, &info);
}
return type;
}
static void
e_select_names_class_init (ESelectNamesClass *klass)
{
GtkObjectClass *object_class;
object_class = (GtkObjectClass*) klass;
parent_class = gtk_type_class (PARENT_TYPE);
object_class->set_arg = e_select_names_set_arg;
object_class->get_arg = e_select_names_get_arg;
object_class->destroy = e_select_names_destroy;
}
#define SPEC "<ETableSpecification no-headers=\"true\" cursor-mode=\"line\"> \
<ETableColumn model_col= \"35\" _title=\"Name\" expansion=\"1.0\" minimum_width=\"20\" resizable=\"true\" cell=\"string\" compare=\"string\"/> \
<ETableState> \
<column source=\"0\"/> \
<grouping> <leaf column=\"0\" ascending=\"true\"/> </grouping> \
</ETableState> \
</ETableSpecification>"
#define SPEC2 "<ETableSpecification no-headers=\"true\" cursor-mode=\"line\"> \
<ETableColumn model_col= \"0\" _title=\"Name\" expansion=\"1.0\" minimum_width=\"20\" resizable=\"true\" cell=\"string\" compare=\"string\"/> \
<ETableState> \
<column source=\"0\"/> \
<grouping> <leaf column=\"0\" ascending=\"true\"/> </grouping> \
</ETableState> \
</ETableSpecification>"
GtkWidget *e_addressbook_create_ebook_table(char *name, char *string1, char *string2, int num1, int num2);
static void
set_book(EBook *book, EBookStatus status, ETableModel *model)
{
gtk_object_set(GTK_OBJECT(model),
"book", book,
NULL);
gtk_object_unref(GTK_OBJECT(book));
}
static void
addressbook_model_set_uri(ETableModel *model, char *uri)
{
EBook *book;
book = e_book_new();
gtk_object_ref(GTK_OBJECT(model));
gtk_object_ref(GTK_OBJECT(book));
e_book_load_uri(book, uri, (EBookCallback) set_book, model);
}
GtkWidget *
e_addressbook_create_ebook_table(char *name, char *string1, char *string2, int num1, int num2)
{
ETableModel *model;
GtkWidget *table;
char *filename;
char *uri;
model = e_addressbook_model_new();
gtk_object_set(GTK_OBJECT(model),
"editable", FALSE,
"query", "(contains \"email\" \"\")",
NULL);
filename = gnome_util_prepend_user_home("evolution/local/Contacts/addressbook.db");
uri = g_strdup_printf("file://%s", filename);
addressbook_model_set_uri(model, uri);
g_free(uri);
g_free(filename);
table = e_table_scrolled_new (model, NULL, SPEC, NULL);
gtk_object_set_data(GTK_OBJECT(table), "model", model);
return table;
}
static void
set_current_selection(ETableScrolled *table, int row, ESelectNames *names)
{
names->currently_selected = row;
}
typedef struct {
char *description;
char *display_name;
char *physical_uri;
} ESelectNamesFolder;
static void
e_select_names_folder_free(ESelectNamesFolder *e_folder)
{
g_free(e_folder->description );
g_free(e_folder->display_name);
g_free(e_folder->physical_uri);
g_free(e_folder);
}
static void
e_select_names_option_activated(GtkWidget *widget, ESelectNames *e_select_names)
{
ESelectNamesFolder *e_folder = gtk_object_get_data (GTK_OBJECT (widget), "EsnChoiceFolder");
addressbook_model_set_uri(e_select_names->model, e_folder->physical_uri);
}
typedef struct {
ESelectNames *names;
GtkWidget *menu;
} NamesAndMenu;
static void
add_menu_item (gpointer key,
gpointer value,
gpointer user_data)
{
GtkWidget *menu;
GtkWidget *item;
ESelectNamesFolder *e_folder;
NamesAndMenu *nnm;
ESelectNames *e_select_names;
nnm = user_data;
e_folder = value;
menu = nnm->menu;
e_select_names = nnm->names;
item = gtk_menu_item_new_with_label (e_folder->display_name);
gtk_menu_append (GTK_MENU (menu), item);
gtk_object_set_data (GTK_OBJECT (item), "EsnChoiceFolder", e_folder);
gtk_signal_connect (GTK_OBJECT (item), "activate",
GTK_SIGNAL_FUNC (e_select_names_option_activated),
e_select_names);
}
static void
update_option_menu(ESelectNames *e_select_names)
{
GtkWidget *menu;
GtkWidget *option;
option = glade_xml_get_widget (e_select_names->gui,
"optionmenu-folder");
if (option) {
NamesAndMenu nnm;
menu = gtk_menu_new ();
nnm.names = e_select_names;
nnm.menu = menu;
g_hash_table_foreach (e_select_names->folders,
add_menu_item,
&nnm);
gtk_widget_show_all (menu);
gtk_option_menu_set_menu (GTK_OPTION_MENU (option),
menu);
gtk_option_menu_set_history (GTK_OPTION_MENU (option), 0);
gtk_widget_set_sensitive (option, TRUE);
}
}
static void
new_folder (EvolutionStorageListener *storage_listener,
const char *path,
const GNOME_Evolution_Folder *folder,
ESelectNames *e_select_names)
{
if (!strcmp(folder->type, "contacts")) {
ESelectNamesFolder *e_folder = g_new(ESelectNamesFolder, 1);
e_folder->description = g_strdup(folder->description );
e_folder->display_name = g_strdup(folder->display_name);
e_folder->physical_uri = g_strdup(folder->physical_uri);
g_hash_table_insert(e_select_names->folders,
g_strdup(path), e_folder);
update_option_menu(e_select_names);
}
}
static void
update_folder (EvolutionStorageListener *storage_listener,
const char *path,
const char *display_name,
ESelectNames *e_select_names)
{
ESelectNamesFolder *e_folder = g_hash_table_lookup(e_select_names->folders, path);
if (e_folder) {
g_free(e_folder->display_name);
e_folder->display_name = g_strdup(e_folder->display_name);
update_option_menu(e_select_names);
}
}
static void
removed_folder (EvolutionStorageListener *storage_listener,
const char *path,
ESelectNames *e_select_names)
{
ESelectNamesFolder *e_folder;
char *orig_path;
if (g_hash_table_lookup_extended(e_select_names->folders, path, (void **) &orig_path, (void **) &e_folder)) {
g_hash_table_remove(e_select_names->folders, path);
e_select_names_folder_free(e_folder);
g_free(orig_path);
update_option_menu(e_select_names);
}
}
static void
e_select_names_hookup_shell_listener (ESelectNames *e_select_names)
{
GNOME_Evolution_Storage storage;
GNOME_Evolution_StorageListener listener;
CORBA_Environment ev;
CORBA_exception_init(&ev);
storage = (GNOME_Evolution_Storage) (evolution_shell_client_get_local_storage(addressbook_component_get_shell_client()));
e_select_names->listener = evolution_storage_listener_new();
listener = evolution_storage_listener_corba_objref(e_select_names->listener);
gtk_signal_connect(GTK_OBJECT(e_select_names->listener), "new_folder",
GTK_SIGNAL_FUNC(new_folder), e_select_names);
gtk_signal_connect(GTK_OBJECT(e_select_names->listener), "update_folder",
GTK_SIGNAL_FUNC(update_folder), e_select_names);
gtk_signal_connect(GTK_OBJECT(e_select_names->listener), "removed_folder",
GTK_SIGNAL_FUNC(removed_folder), e_select_names);
GNOME_Evolution_Storage_addListener(storage, listener, &ev);
if (ev._major != CORBA_NO_EXCEPTION) {
g_warning ("e_select_names_init: Exception adding listener to "
"remote GNOME_Evolution_Storage interface.\n");
CORBA_exception_free (&ev);
return;
}
bonobo_object_release_unref(storage, &ev);
if (ev._major != CORBA_NO_EXCEPTION) {
g_warning ("e_select_names_init: Exception unref'ing "
"remote GNOME_Evolution_Storage interface.\n");
CORBA_exception_free (&ev);
return;
}
CORBA_exception_free(&ev);
}
static void
e_select_names_init (ESelectNames *e_select_names)
{
GladeXML *gui;
GtkWidget *widget;
gui = glade_xml_new (EVOLUTION_GLADEDIR "/select-names.glade", NULL);
e_select_names->gui = gui;
e_select_names->children = g_hash_table_new(g_str_hash, g_str_equal);
e_select_names->child_count = 0;
widget = glade_xml_get_widget(gui, "table-top");
if (!widget) {
return;
}
gtk_widget_ref(widget);
gtk_widget_unparent(widget);
gtk_box_pack_start(GTK_BOX(GNOME_DIALOG(e_select_names)->vbox), widget, TRUE, TRUE, 0);
gtk_widget_unref(widget);
gnome_dialog_append_buttons(GNOME_DIALOG(e_select_names),
GNOME_STOCK_BUTTON_OK,
GNOME_STOCK_BUTTON_CANCEL,
NULL);
gtk_window_set_policy(GTK_WINDOW(e_select_names), FALSE, TRUE, FALSE);
e_select_names->table = E_TABLE_SCROLLED(glade_xml_get_widget(gui, "table-source"));
e_select_names->model = gtk_object_get_data(GTK_OBJECT(e_select_names->table), "model");
e_select_names->currently_selected = -1;
e_select_names->folders = g_hash_table_new(g_str_hash, g_str_equal);
e_select_names_hookup_shell_listener (e_select_names);
gtk_signal_connect(GTK_OBJECT(e_table_scrolled_get_table(e_select_names->table)), "cursor_change",
GTK_SIGNAL_FUNC(set_current_selection), e_select_names);
}
static void e_select_names_child_free(char *key, ESelectNamesChild *child, ESelectNames *e_select_names)
{
g_free(child->title);
gtk_object_unref(GTK_OBJECT(child->model));
gtk_object_unref(GTK_OBJECT(child->source));
g_free(key);
}
static void
e_select_names_destroy (GtkObject *object) {
ESelectNames *e_select_names = E_SELECT_NAMES(object);
gtk_signal_disconnect_by_data(GTK_OBJECT(e_select_names->listener), e_select_names);
gtk_object_unref(GTK_OBJECT(e_select_names->listener));
gtk_object_unref(GTK_OBJECT(e_select_names->gui));
g_hash_table_foreach(e_select_names->children, (GHFunc) e_select_names_child_free, e_select_names);
g_hash_table_destroy(e_select_names->children);
}
GtkWidget*
e_select_names_new (void)
{
GtkWidget *widget = GTK_WIDGET (gtk_type_new (e_select_names_get_type ()));
return widget;
}
static void
e_select_names_set_arg (GtkObject *o, GtkArg *arg, guint arg_id)
{
ESelectNames *editor;
editor = E_SELECT_NAMES (o);
switch (arg_id){
default:
return;
}
}
static void
e_select_names_get_arg (GtkObject *object, GtkArg *arg, guint arg_id)
{
ESelectNames *e_select_names;
e_select_names = E_SELECT_NAMES (object);
switch (arg_id) {
default:
arg->type = GTK_TYPE_INVALID;
break;
}
}
static void
button_clicked(GtkWidget *button, ESelectNamesChild *child)
{
ESelectNames *names = child->names;
int row = names->currently_selected;
if (row != -1) {
ECard *card = e_addressbook_model_get_card(E_ADDRESSBOOK_MODEL(names->model), row);
ESelectNamesModelData new = {E_SELECT_NAMES_MODEL_DATA_TYPE_CARD,
card,
NULL};
char *name, *email;
ECardSimple *simple = e_card_simple_new(card);
EIterator *iterator;
name = e_card_simple_get(simple, E_CARD_SIMPLE_FIELD_FULL_NAME);
email = e_card_simple_get(simple, E_CARD_SIMPLE_FIELD_EMAIL);
if (name && *name && email && *email) {
new.string = g_strdup_printf("\"%s\" <%s>", name, email);
} else if (email && *email) {
new.string = g_strdup_printf("%s", email);
} else {
new.string = g_strdup("");
}
iterator = e_list_get_iterator(e_select_names_model_get_data(child->source));
e_iterator_last(iterator);
e_select_names_model_add_item(child->source, iterator, &new);
gtk_object_unref(GTK_OBJECT(simple));
gtk_object_unref(GTK_OBJECT(card));
g_free(email);
g_free(name);
g_free(new.string);
}
}
static void
remove_address(ETableScrolled *table, int row, int col, GdkEvent *event, ESelectNamesChild *child)
{
EIterator *iterator = e_list_get_iterator(e_select_names_model_get_data(child->source));
e_iterator_reset(iterator);
for (; row > 0; row--) {
e_iterator_next(iterator);
}
e_select_names_model_remove_item(child->source, iterator);
}
void
e_select_names_add_section(ESelectNames *e_select_names, char *name, char *id, ESelectNamesModel *source)
{
ESelectNamesChild *child;
GtkWidget *button;
GtkWidget *alignment;
GtkWidget *label, *icon;
GtkTable *table;
char *label_text;
ETableModel *model;
GtkWidget *etable;
if (g_hash_table_lookup(e_select_names->children, id)) {
return;
}
table = GTK_TABLE(glade_xml_get_widget (e_select_names->gui, "table-recipients"));
child = g_new(ESelectNamesChild, 1);
child->names = e_select_names;
child->title = g_strdup(_(name));
e_select_names->child_count++;
alignment = gtk_alignment_new(0, 0, 1, 0);
button = gtk_button_new ();
label_text = g_strconcat (child->title, " ->", NULL);
label = gtk_label_new (label_text);
g_free (label_text);
gtk_container_add (GTK_CONTAINER (button), label);
gtk_container_add(GTK_CONTAINER(alignment), button);
gtk_widget_show_all(alignment);
gtk_signal_connect(GTK_OBJECT(button), "clicked",
GTK_SIGNAL_FUNC(button_clicked), child);
gtk_table_attach(table, alignment,
0, 1,
e_select_names->child_count,
e_select_names->child_count + 1,
GTK_FILL, GTK_FILL,
0, 0);
model = e_select_names_table_model_new(source);
etable = e_table_scrolled_new (model, NULL, SPEC2, NULL);
gtk_signal_connect(GTK_OBJECT(e_table_scrolled_get_table(E_TABLE_SCROLLED(etable))), "double_click",
GTK_SIGNAL_FUNC(remove_address), child);
child->model = model;
child->source = source;
gtk_object_ref(GTK_OBJECT(child->model));
gtk_object_ref(GTK_OBJECT(child->source));
gtk_widget_show(etable);
gtk_table_attach(table, etable,
1, 2,
e_select_names->child_count,
e_select_names->child_count + 1,
GTK_FILL | GTK_EXPAND, GTK_FILL | GTK_EXPAND,
0, 0);
g_hash_table_insert(e_select_names->children, g_strdup(id), child);
}
static void *
card_copy(const void *value, void *closure)
{
gtk_object_ref(GTK_OBJECT(value));
return (void *)value;
}
static void
card_free(void *value, void *closure)
{
gtk_object_unref(GTK_OBJECT(value));
}
EList *
e_select_names_get_section(ESelectNames *e_select_names, char *id)
{
ESelectNamesChild *child;
int i;
int rows;
EList *list;
child = g_hash_table_lookup(e_select_names->children, id);
if (!child)
return NULL;
rows = e_table_model_row_count(child->model);
list = e_list_new(card_copy, card_free, NULL);
for (i = 0; i < rows; i++) {
ECard *card = e_cardlist_model_get(E_CARDLIST_MODEL(child->model), i);
e_list_append(list, card);
gtk_object_unref(GTK_OBJECT(card));
}
return list;
}
ESelectNamesModel *
e_select_names_get_source(ESelectNames *e_select_names,
char *id)
{
ESelectNamesChild *child = g_hash_table_lookup(e_select_names->children, id);
if (child) {
if (child->source)
gtk_object_ref(GTK_OBJECT(child->source));
return child->source;
} else
return NULL;
}