/* -*- Mode: C; indent-tabs-mode: t; c-basic-offset: 8; tab-width: 8 -*- */
/* evolution-importer-client.c
*
* Copyright (C) 2000 Helix Code, 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: Iain Holmes <iain@helixcode.com>
* Based on evolution-shell-component-client.c by Ettore Perazzoli
*/
#ifdef HAVE_CONFIG_H
#include <config.h>
#endif
#include <bonobo/bonobo-object.h>
#include <bonobo/bonobo-main.h>
#include <gal/util/e-util.h>
#include <liboaf/liboaf.h>
#include "GNOME_Evolution_Importer.h"
#include "evolution-importer-client.h"
#define PARENT_TYPE BONOBO_OBJECT_CLIENT_TYPE
static BonoboObjectClass *parent_class = NULL;
struct _EvolutionImporterClientPrivate {
EvolutionImporterClientCallback callback;
void *closure;
GNOME_Evolution_ImporterListener listener_interface;
PortableServer_Servant listener_servant;
};
static PortableServer_ServantBase__epv Listener_base_epv;
static POA_GNOME_Evolution_ImporterListener__epv Listener_epv;
static POA_GNOME_Evolution_ImporterListener__vepv Listener_vepv;
static gboolean Listener_vepv_initialized = FALSE;
struct _ImporterListenerServant {
POA_GNOME_Evolution_ImporterListener servant;
EvolutionImporterClient *component_client;
};
typedef struct _ImporterListenerServant ImporterListenerServant;
static void
dispatch_callback (EvolutionImporterClient *client,
EvolutionImporterResult result,
gboolean more_items)
{
EvolutionImporterClientPrivate *priv;
EvolutionImporterClientCallback callback;
PortableServer_ObjectId *oid;
void *closure;
CORBA_Environment ev;
priv = client->private;
g_return_if_fail (priv->callback != NULL);
g_return_if_fail (priv->listener_servant != NULL);
CORBA_exception_init (&ev);
oid = PortableServer_POA_servant_to_id (bonobo_poa (), priv->listener_servant, &ev);
PortableServer_POA_deactivate_object (bonobo_poa (), oid, &ev);
POA_GNOME_Evolution_ImporterListener__fini (priv->listener_servant, &ev);
CORBA_free (oid);
CORBA_Object_release (priv->listener_interface, &ev);
CORBA_exception_free (&ev);
priv->listener_servant = NULL;
priv->listener_interface = CORBA_OBJECT_NIL;
callback = priv->callback;
closure = priv->closure;
priv->callback = NULL;
priv->closure = NULL;
(* callback) (client, result, more_items, closure);
}
static EvolutionImporterClient *
component_client_from_ImporterListener_servant (PortableServer_Servant servant)
{
ImporterListenerServant *listener_servant;
listener_servant = (ImporterListenerServant *) servant;
return listener_servant->component_client;
}
static EvolutionImporterResult
result_from_async_corba_result (GNOME_Evolution_ImporterListener_ImporterResult corba_result)
{
switch (corba_result) {
case GNOME_Evolution_ImporterListener_OK:
return EVOLUTION_IMPORTER_OK;
case GNOME_Evolution_ImporterListener_UNSUPPORTED_OPERATION:
return EVOLUTION_IMPORTER_UNSUPPORTED_OPERATION;
case GNOME_Evolution_ImporterListener_UNKNOWN_DATA:
return EVOLUTION_IMPORTER_UNKNOWN_DATA;
case GNOME_Evolution_ImporterListener_BAD_DATA:
return EVOLUTION_IMPORTER_BAD_DATA;
case GNOME_Evolution_ImporterListener_BAD_FILE:
return EVOLUTION_IMPORTER_BAD_FILE;
case GNOME_Evolution_ImporterListener_NOT_READY:
return EVOLUTION_IMPORTER_NOT_READY;
default:
return EVOLUTION_IMPORTER_UNKNOWN_ERROR;
}
}
static void
impl_ImporterListener_notifyResult (PortableServer_Servant servant,
const GNOME_Evolution_ImporterListener_ImporterResult result,
const CORBA_boolean more_items,
CORBA_Environment *ev)
{
EvolutionImporterClient *client;
client = component_client_from_ImporterListener_servant (servant);
dispatch_callback (client, result_from_async_corba_result (result), more_items);
}
static void
ImporterListener_vepv_initialize (void)
{
Listener_base_epv._private = NULL;
Listener_base_epv.finalize = NULL;
Listener_base_epv.default_POA = NULL;
Listener_epv.notifyResult = impl_ImporterListener_notifyResult;
Listener_vepv._base_epv = &Listener_base_epv;
Listener_vepv.GNOME_Evolution_ImporterListener_epv = &Listener_epv;
Listener_vepv_initialized = TRUE;
}
static PortableServer_Servant *
create_listener_servant (EvolutionImporterClient *client)
{
ImporterListenerServant *servant;
if (!Listener_vepv_initialized)
ImporterListener_vepv_initialize ();
servant = g_new0 (ImporterListenerServant, 1);
servant->servant.vepv = &Listener_vepv;
servant->component_client = client;
return (PortableServer_Servant) servant;
}
static void
free_listener_servant (PortableServer_Servant servant)
{
g_free (servant);
}
static void
create_listener_interface (EvolutionImporterClient *client)
{
EvolutionImporterClientPrivate *priv;
PortableServer_Servant listener_servant;
GNOME_Evolution_ImporterListener corba_interface;
CORBA_Environment ev;
priv = client->private;
listener_servant = create_listener_servant (client);
CORBA_exception_init (&ev);
POA_GNOME_Evolution_ImporterListener__init (listener_servant, &ev);
if (ev._major != CORBA_NO_EXCEPTION) {
free_listener_servant (listener_servant);
return;
}
CORBA_free (PortableServer_POA_activate_object (bonobo_poa (),
listener_servant, &ev));
corba_interface = PortableServer_POA_servant_to_reference (bonobo_poa (),
listener_servant, &ev);
if (ev._major != CORBA_NO_EXCEPTION) {
corba_interface = CORBA_OBJECT_NIL;
free_listener_servant (listener_servant);
}
CORBA_exception_free (&ev);
priv->listener_servant = listener_servant;
priv->listener_interface = corba_interface;
}
static void
destroy (GtkObject *object)
{
EvolutionImporterClient *client;
EvolutionImporterClientPrivate *priv;
client = EVOLUTION_IMPORTER_CLIENT (object);
priv = client->private;
if (priv->callback != NULL)
dispatch_callback (client, EVOLUTION_IMPORTER_INTERRUPTED, FALSE);
g_free (priv);
(* GTK_OBJECT_CLASS (parent_class)->destroy) (object);
}
static void
class_init (EvolutionImporterClientClass *klass)
{
GtkObjectClass *object_class;
object_class = GTK_OBJECT_CLASS (klass);
parent_class = gtk_type_class (PARENT_TYPE);
object_class->destroy = destroy;
}
static void
init (EvolutionImporterClient *client)
{
EvolutionImporterClientPrivate *priv;
priv = g_new (EvolutionImporterClientPrivate, 1);
priv->listener_interface = CORBA_OBJECT_NIL;
priv->listener_servant = NULL;
priv->callback = NULL;
priv->closure = NULL;
client->private = priv;
}
static void
evolution_importer_client_construct (EvolutionImporterClient *client,
CORBA_Object corba_object)
{
g_return_if_fail (client != NULL);
g_return_if_fail (EVOLUTION_IS_IMPORTER_CLIENT (client));
g_return_if_fail (corba_object != CORBA_OBJECT_NIL);
bonobo_object_client_construct (BONOBO_OBJECT_CLIENT (client), corba_object);
}
/**
* evolution_importer_client_new:
* @objref: The CORBA_Object to make a client for.
*
* Makes a client for @objref. @objref should be an Evolution_Importer.
*
* Returns: A newly created EvolutionImporterClient.
*/
EvolutionImporterClient *
evolution_importer_client_new (const CORBA_Object objref)
{
EvolutionImporterClient *client;
g_return_val_if_fail (objref != CORBA_OBJECT_NIL, NULL);
client = gtk_type_new (evolution_importer_client_get_type ());
evolution_importer_client_construct (client, objref);
return client;
}
/**
* evolution_importer_client_new_from_id:
* @id: The oafiid of the component to make a client for.
*
* Makes a client for the object returned by activating @id.
*
* Returns: A newly created EvolutionImporterClient.
*/
EvolutionImporterClient *
evolution_importer_client_new_from_id (const char *id)
{
CORBA_Environment ev;
CORBA_Object objref;
g_return_val_if_fail (id != NULL, NULL);
CORBA_exception_init (&ev);
objref = oaf_activate_from_id ((char *) id, 0, NULL, &ev);
if (ev._major != CORBA_NO_EXCEPTION) {
CORBA_exception_free (&ev);
g_warning ("Could not start %s.", id);
return NULL;
}
if (objref == CORBA_OBJECT_NIL) {
g_warning ("Could not activate component %s", id);
return NULL;
}
return evolution_importer_client_new (objref);
}
/* API */
/**
* evolution_importer_client_support_format:
* @client: The EvolutionImporterClient.
* @filename: Name of the file to check.
*
* Checks whether @client is able to import @filename.
*
* Returns: TRUE if @client can import @filename, FALSE otherwise.
*/
gboolean
evolution_importer_client_support_format (EvolutionImporterClient *client,
const char *filename)
{
GNOME_Evolution_Importer corba_importer;
gboolean result;
CORBA_Environment ev;
g_return_val_if_fail (client != NULL, FALSE);
g_return_val_if_fail (EVOLUTION_IS_IMPORTER_CLIENT (client), FALSE);
g_return_val_if_fail (filename != NULL, FALSE);
CORBA_exception_init (&ev);
corba_importer = bonobo_object_corba_objref (BONOBO_OBJECT (client));
result = GNOME_Evolution_Importer_supportFormat (corba_importer,
filename, &ev);
CORBA_exception_free (&ev);
return result;
}
/**
* evolution_importer_client_load_file:
* @client: The EvolutionImporterClient.
* @filename: The file to load.
*
* Loads and initialises the importer.
*
* Returns: TRUE on sucess, FALSE on failure.
*/
gboolean
evolution_importer_client_load_file (EvolutionImporterClient *client,
const char *filename)
{
GNOME_Evolution_Importer corba_importer;
gboolean result;
CORBA_Environment ev;
g_return_val_if_fail (client != NULL, FALSE);
g_return_val_if_fail (EVOLUTION_IS_IMPORTER_CLIENT (client), FALSE);
g_return_val_if_fail (filename != NULL, FALSE);
CORBA_exception_init (&ev);
corba_importer = bonobo_object_corba_objref (BONOBO_OBJECT (client));
result = GNOME_Evolution_Importer_loadFile (corba_importer,
filename, &ev);
CORBA_exception_free (&ev);
return result;
}
/**
* evolution_importer_client_process_item:
* @client: The EvolutionImporterClient.
* @callback: The function to be called once the item has been processed.
* @closure: The data to be passed to this function.
*
* Starts importing the next item in the file and calls @callback when the
* item has finished importing.
*/
void
evolution_importer_client_process_item (EvolutionImporterClient *client,
EvolutionImporterClientCallback callback,
void *closure)
{
EvolutionImporterClientPrivate *priv;
GNOME_Evolution_Importer corba_importer;
CORBA_Environment ev;
g_return_if_fail (client != NULL);
g_return_if_fail (EVOLUTION_IS_IMPORTER_CLIENT (client));
g_return_if_fail (callback != NULL);
priv = client->private;
if (priv->callback != NULL) {
(* callback) (client, EVOLUTION_IMPORTER_BUSY, FALSE, closure);
return;
}
create_listener_interface (client);
CORBA_exception_init (&ev);
corba_importer = bonobo_object_corba_objref (BONOBO_OBJECT (client));
priv->callback = callback;
priv->closure = closure;
GNOME_Evolution_Importer_processItem (corba_importer,
priv->listener_interface, &ev);
CORBA_exception_free (&ev);
}
/**
* evolution_importer_client_get_error:
* @client: The EvolutionImporterClient.
*
* Gets the error as a string.
*
* Returns: The error as a string. If there is no error NULL is returned.
* Importers need not support this method and if so, NULL is also returned.
*/
const char *
evolution_importer_client_get_error (EvolutionImporterClient *client)
{
EvolutionImporterClientPrivate *priv;
GNOME_Evolution_Importer corba_importer;
CORBA_char *str;
CORBA_Environment ev;
g_return_val_if_fail (client != NULL, NULL);
g_return_val_if_fail (EVOLUTION_IS_IMPORTER_CLIENT (client), NULL);
priv = client->private;
corba_importer = bonobo_object_corba_objref (BONOBO_OBJECT (client));
CORBA_exception_init (&ev);
str = GNOME_Evolution_Importer_getError (corba_importer, &ev);
return str;
}
E_MAKE_TYPE (evolution_importer_client, "EvolutionImporterClient",
EvolutionImporterClient, class_init, init, PARENT_TYPE)
