path: root/shell/importer/evolution-importer-client.c

/* -*- Mode: C; indent-tabs-mode: t; c-basic-offset: 8; tab-width: 8 -*- */
/* evolution-importer-listener.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 "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;
}

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);
}

EvolutionImporterClient *
evolution_importer_client_new (const GNOME_Evolution_Importer 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;
}

/* API */
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);
}

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)