/* -*- Mode: C; indent-tabs-mode: t; c-basic-offset: 8; tab-width: 8 -*- */
/* addressbook-component.c
*
* Copyright (C) 2000 Ximian, Inc.
*
* 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.
*
* Author: Ettore Perazzoli
*/
#ifdef HAVE_CONFIG_H
#include <config.h>
#endif
#include <sys/types.h>
#include <sys/stat.h>
#include <errno.h>
#include <bonobo/bonobo-generic-factory.h>
#include "evolution-shell-component.h"
#include "evolution-shell-component-dnd.h"
#include "evolution-storage.h"
#include "ebook/e-book.h"
#include "ebook/e-card.h"
#include "ebook/e-book-util.h"
#include "addressbook-storage.h"
#include "addressbook-component.h"
#include "addressbook.h"
#include "addressbook/gui/merging/e-card-merging.h"
#include "addressbook/gui/widgets/e-addressbook-util.h"
#define GNOME_EVOLUTION_ADDRESSBOOK_COMPONENT_ID "OAFIID:GNOME_Evolution_Addressbook_ShellComponent"
EvolutionShellClient *global_shell_client;
EvolutionShellClient *
addressbook_component_get_shell_client (void)
{
return global_shell_client;
}
static char *accepted_dnd_types[] = {
"text/x-vcard",
NULL
};
static const EvolutionShellComponentFolderType folder_types[] = {
{ "contacts", "evolution-contacts.png", N_("Contacts"), N_("Folder containing contact information"),
TRUE, accepted_dnd_types, NULL },
{ "ldap-contacts", "ldap-16.png", N_("LDAP Server"), N_("LDAP server containing contact information"),
TRUE, accepted_dnd_types, NULL },
{ NULL }
};
#define IS_CONTACT_TYPE(x) (g_strcasecmp((x), "contacts") == 0 || g_strcasecmp ((x), "ldap-contacts") == 0)
/* EvolutionShellComponent methods and signals. */
static EvolutionShellComponentResult
create_view (EvolutionShellComponent *shell_component,
const char *physical_uri,
const char *type,
BonoboControl **control_return,
void *closure)
{
BonoboControl *control;
if (!IS_CONTACT_TYPE (type))
return EVOLUTION_SHELL_COMPONENT_UNSUPPORTEDTYPE;
control = addressbook_factory_new_control ();
bonobo_control_set_property (control, "folder_uri", physical_uri, NULL);
*control_return = control;
return EVOLUTION_SHELL_COMPONENT_OK;
}
static void
create_folder (EvolutionShellComponent *shell_component,
const char *physical_uri,
const char *type,
const GNOME_Evolution_ShellComponentListener listener,
void *closure)
{
CORBA_Environment ev;
GNOME_Evolution_ShellComponentListener_Result result;
if (!IS_CONTACT_TYPE (type))
result = GNOME_Evolution_ShellComponentListener_UNSUPPORTED_TYPE;
else
result = GNOME_Evolution_ShellComponentListener_OK;
CORBA_exception_init(&ev);
GNOME_Evolution_ShellComponentListener_notifyResult(listener, result, &ev);
CORBA_exception_free(&ev);
}
static void
remove_folder (EvolutionShellComponent *shell_component,
const char *physical_uri,
const char *type,
const GNOME_Evolution_ShellComponentListener listener,
void *closure)
{
CORBA_Environment ev;
char *addressbook_db_path, *subdir_path;
struct stat sb;
int rv;
CORBA_exception_init(&ev);
if (!IS_CONTACT_TYPE (type)) {
GNOME_Evolution_ShellComponentListener_notifyResult (listener,
GNOME_Evolution_ShellComponentListener_UNSUPPORTED_TYPE,
&ev);
CORBA_exception_free(&ev);
return;
}
if (!strncmp (physical_uri, "ldap://", 7)) {
GNOME_Evolution_ShellComponentListener_notifyResult (listener,
GNOME_Evolution_ShellComponentListener_UNSUPPORTED_OPERATION,
&ev);
CORBA_exception_free(&ev);
return;
}
if (strncmp (physical_uri, "file://", 7)) {
GNOME_Evolution_ShellComponentListener_notifyResult (listener,
GNOME_Evolution_ShellComponentListener_INVALID_URI,
&ev);
CORBA_exception_free(&ev);
return;
}
subdir_path = g_concat_dir_and_file (physical_uri + 7, "subfolders");
rv = stat (subdir_path, &sb);
g_free (subdir_path);
if (rv != -1) {
GNOME_Evolution_ShellComponentListener_notifyResult (listener,
GNOME_Evolution_ShellComponentListener_HAS_SUBFOLDERS,
&ev);
CORBA_exception_free(&ev);
return;
}
addressbook_db_path = g_concat_dir_and_file (physical_uri + 7, "addressbook.db");
rv = unlink (addressbook_db_path);
g_free (addressbook_db_path);
if (rv == 0) {
GNOME_Evolution_ShellComponentListener_notifyResult (listener,
GNOME_Evolution_ShellComponentListener_OK,
&ev);
}
else {
if (errno == EACCES || errno == EPERM)
GNOME_Evolution_ShellComponentListener_notifyResult (listener,
GNOME_Evolution_ShellComponentListener_PERMISSION_DENIED,
&ev);
else
GNOME_Evolution_ShellComponentListener_notifyResult (listener,
GNOME_Evolution_ShellComponentListener_INVALID_URI, /*XXX*/
&ev);
}
CORBA_exception_free(&ev);
}
static void
xfer_folder (EvolutionShellComponent *shell_component,
const char *source_physical_uri,
const char *destination_physical_uri,
const char *type,
gboolean remove_source,
const GNOME_Evolution_ShellComponentListener listener,
void *closure)
{
CORBA_Environment ev;
char *source_path;
char *destination_path;
if (!IS_CONTACT_TYPE (type)) {
GNOME_Evolution_ShellComponentListener_notifyResult (listener,
GNOME_Evolution_ShellComponentListener_UNSUPPORTED_TYPE,
&ev);
CORBA_exception_free(&ev);
return;
}
if (!strncmp (source_physical_uri, "ldap://", 7)
|| !strncmp (destination_physical_uri, "ldap://", 7)) {
GNOME_Evolution_ShellComponentListener_notifyResult (listener,
GNOME_Evolution_ShellComponentListener_UNSUPPORTED_OPERATION,
&ev);
CORBA_exception_free(&ev);
return;
}
if (strncmp (source_physical_uri, "file://", 7)
|| strncmp (destination_physical_uri, "file://", 7)) {
GNOME_Evolution_ShellComponentListener_notifyResult (listener,
GNOME_Evolution_ShellComponentListener_INVALID_URI,
&ev);
CORBA_exception_free(&ev);
return;
}
/* strip the 'file://' from the beginning of each uri and add addressbook.db */
source_path = g_concat_dir_and_file (source_physical_uri + 7, "addressbook.db");
destination_path = g_concat_dir_and_file (destination_physical_uri + 7, "addressbook.db");
CORBA_exception_init (&ev);
/* XXX always fail for now, until the above stuff is written */
GNOME_Evolution_ShellComponentListener_notifyResult (listener, GNOME_Evolution_ShellComponentListener_PERMISSION_DENIED, &ev);
g_free (source_path);
g_free (destination_path);
CORBA_exception_free (&ev);
}
static char*
get_dnd_selection (EvolutionShellComponent *shell_component,
const char *physical_uri,
int type,
int *format_return,
const char **selection_return,
int *selection_length_return,
void *closure)
{
g_print ("should get dnd selection for %s\n", physical_uri);
return NULL;
}
static int owner_count = 0;
static void
owner_set_cb (EvolutionShellComponent *shell_component,
EvolutionShellClient *shell_client,
const char *evolution_homedir,
gpointer user_data)
{
owner_count ++;
if (global_shell_client == NULL)
global_shell_client = shell_client;
addressbook_storage_setup (shell_component, evolution_homedir);
}
static void
owner_unset_cb (EvolutionShellComponent *shell_component,
GNOME_Evolution_Shell shell_interface,
gpointer user_data)
{
owner_count --;
if (owner_count == 0)
gtk_main_quit();
}
/* FIXME We should perhaps take the time to figure out if the book is editable. */
static void
local_addressbook_cb (EBook *book, gpointer closure)
{
gboolean is_list = GPOINTER_TO_INT (closure);
if (book == NULL)
return;
if (is_list)
e_addressbook_show_contact_list_editor (book, e_card_new(""), TRUE, TRUE);
else
e_addressbook_show_contact_editor (book, e_card_new(""), TRUE, TRUE);
}
static void
nonlocal_addressbook_cb (EBook *book, EBookStatus status, gpointer closure)
{
if (status == E_BOOK_STATUS_SUCCESS)
local_addressbook_cb (book, closure);
else
local_addressbook_cb (NULL, closure);
}
static void
user_create_new_item_cb (EvolutionShellComponent *shell_component,
const char *id,
const char *parent_folder_physical_uri,
const char *parent_folder_type,
gpointer data)
{
gboolean is_contact_list;
if (!strcmp (id, "contact")) {
is_contact_list = FALSE;
} else if (!strcmp (id, "contact_list")) {
is_contact_list = TRUE;
} else {
g_warning ("Don't know how to create item of type \"%s\"", id);
return;
}
if (IS_CONTACT_TYPE (parent_folder_type)) {
EBook *book;
gchar *uri;
book = e_book_new ();
uri = g_strdup_printf ("%s/addressbook.db", parent_folder_physical_uri);
if (e_book_load_uri (book, uri, nonlocal_addressbook_cb, GINT_TO_POINTER (is_contact_list)) == 0)
g_warning ("Couldn't load addressbook %s", uri);
g_free (uri);
} else {
e_book_use_local_address_book (local_addressbook_cb, GINT_TO_POINTER (is_contact_list));
}
}
/* Destination side DnD */
static CORBA_boolean
destination_folder_handle_motion (EvolutionShellComponentDndDestinationFolder *folder,
const char *physical_uri,
const GNOME_Evolution_ShellComponentDnd_DestinationFolder_Context * destination_context,
GNOME_Evolution_ShellComponentDnd_Action * suggested_action_return,
gpointer user_data)
{
g_print ("in destination_folder_handle_motion (%s)\n", physical_uri);
*suggested_action_return = GNOME_Evolution_ShellComponentDnd_ACTION_MOVE;
return TRUE;
}
static void
dnd_drop_book_open_cb (EBook *book, EBookStatus status, GList *card_list)
{
GList *l;
for (l = card_list; l; l = l->next) {
ECard *card = l->data;
e_card_merging_book_add_card (book, card, NULL /* XXX */, NULL);
}
}
static CORBA_boolean
destination_folder_handle_drop (EvolutionShellComponentDndDestinationFolder *folder,
const char *physical_uri,
const GNOME_Evolution_ShellComponentDnd_DestinationFolder_Context * destination_context,
const GNOME_Evolution_ShellComponentDnd_Action action,
const GNOME_Evolution_ShellComponentDnd_Data * data,
gpointer user_data)
{
EBook *book;
GList *card_list;
char *expanded_uri;
if (action == GNOME_Evolution_ShellComponentDnd_ACTION_LINK)
return FALSE; /* we can't create links in our addressbook format */
g_print ("in destination_folder_handle_drop (%s)\n", physical_uri);
card_list = e_card_load_cards_from_string_with_default_charset (data->bytes._buffer, "ISO-8859-1");
expanded_uri = addressbook_expand_uri (physical_uri);
book = e_book_new ();
e_book_load_uri (book, expanded_uri,
(EBookCallback)dnd_drop_book_open_cb, card_list);
g_free (expanded_uri);
return TRUE;
}
/* The factory function. */
static BonoboObject *
create_component (void)
{
EvolutionShellComponent *shell_component;
EvolutionShellComponentDndDestinationFolder *destination_interface;
shell_component = evolution_shell_component_new (folder_types, NULL,
create_view, create_folder,
remove_folder, xfer_folder,
NULL,
get_dnd_selection,
NULL);
destination_interface = evolution_shell_component_dnd_destination_folder_new (destination_folder_handle_motion,
destination_folder_handle_drop,
shell_component);
bonobo_object_add_interface (BONOBO_OBJECT (shell_component),
BONOBO_OBJECT (destination_interface));
evolution_shell_component_add_user_creatable_item (shell_component, "contact", _("New Contact"), _("New _Contact"), 'c');
evolution_shell_component_add_user_creatable_item (shell_component, "contact_list", _("New Contact List"), _("New Contact _List"), 'l');
gtk_signal_connect (GTK_OBJECT (shell_component), "owner_set",
GTK_SIGNAL_FUNC (owner_set_cb), NULL);
gtk_signal_connect (GTK_OBJECT (shell_component), "owner_unset",
GTK_SIGNAL_FUNC (owner_unset_cb), NULL);
gtk_signal_connect (GTK_OBJECT (shell_component), "user_create_new_item",
GTK_SIGNAL_FUNC (user_create_new_item_cb), NULL);
return BONOBO_OBJECT (shell_component);
}
/* FIXME this should probably be renamed as we don't use factories anymore. */
void
addressbook_component_factory_init (void)
{
BonoboObject *object;
int result;
object = create_component ();
/* FIXME: Handle errors better? */
result = oaf_active_server_register (GNOME_EVOLUTION_ADDRESSBOOK_COMPONENT_ID,
bonobo_object_corba_objref (object));
if (result == OAF_REG_ERROR)
g_error ("Cannot register -- %s", GNOME_EVOLUTION_ADDRESSBOOK_COMPONENT_ID);
}
