/*
 * E-shell.c: Shell object for Evolution
 *
 * Authors:
 *   Miguel de Icaza (miguel@helixcode.com)
 *
 * (C) 1999 Miguel de Icaza
 * (C) 2000 Helix Code, Inc.
 */
#include <config.h>
#include <gtk/gtkmain.h>
#include "Evolution.h"
#include "e-util/e-util.h"
#include "e-shell.h"

#define PARENT_TYPE (gnome_object_get_type ())

static GnomeObjectClass *e_shell_parent_class;
POA_GNOME_Evolution_Shell__vepv eshell_vepv;

GtkType e_shell_get_type (void);

void
e_shell_new_appointment (EShell *eshell)
{
	printf ("Unimplemented function invoked: %s\n", __FUNCTION__);
}

void
e_shell_new_meeting_request (EShell *eshell)
{
	printf ("Unimplemented function invoked: %s\n", __FUNCTION__);
}

void
e_shell_new_task (EShell *eshell)
{
	printf ("Unimplemented function invoked: %s\n", __FUNCTION__);
}

void
e_shell_new_task_request (EShell *eshell)
{
	printf ("Unimplemented function invoked: %s\n", __FUNCTION__);
}

void
e_shell_new_contact (EShell *eshell)
{
	printf ("Unimplemented function invoked: %s\n", __FUNCTION__);
}

void
e_shell_new_mail_message (EShell *eshell)
{
	printf ("Unimplemented function invoked: %s\n", __FUNCTION__);
}

void
e_shell_new_distribution_list (EShell *eshell)
{
	printf ("Unimplemented function invoked: %s\n", __FUNCTION__);
}

void
e_shell_new_journal_entry (EShell *eshell)
{
	printf ("Unimplemented function invoked: %s\n", __FUNCTION__);
}

void
e_shell_new_note (EShell *eshell)
{
	printf ("Unimplemented function invoked: %s\n", __FUNCTION__);
}

static void
EShell_cmd_new (PortableServer_Servant servant,
		const GNOME_Evolution_Shell_NewType type,
		CORBA_Environment *ev)
{
	EShell *eshell = E_SHELL (gnome_object_from_servant (servant));

	switch (type){
	case GNOME_Evolution_Shell_APPOINTMENT:
		e_shell_new_appointment (eshell);
		break;
		
	case GNOME_Evolution_Shell_MEETING_REQUEST:
		e_shell_new_meeting_request (eshell);
		break;

	case GNOME_Evolution_Shell_TASK:
		e_shell_new_task (eshell);
		break;

	case GNOME_Evolution_Shell_TASK_REQUEST:
		e_shell_new_task_request (eshell);
		break;

	case GNOME_Evolution_Shell_CONTACT:
		e_shell_new_contact (eshell);
		break;

	case GNOME_Evolution_Shell_MAIL_MESSAGE:
		e_shell_new_mail_message (eshell);
		break;

	case GNOME_Evolution_Shell_DISTRIBUTION_LIST:
		e_shell_new_distribution_list (eshell);
		break;

	case GNOME_Evolution_Shell_JOURNAL_ENTRY:
		e_shell_new_journal_entry (eshell);
		break;
		
	case GNOME_Evolution_Shell_NOTE:
		e_shell_new_note (eshell);
		break;
		
	default:
	}
}

static POA_GNOME_Evolution_Shell__epv *
e_shell_get_epv (void)
{
	POA_GNOME_Evolution_Shell__epv *epv;

	epv = g_new0 (POA_GNOME_Evolution_Shell__epv, 1);

	epv->new = EShell_cmd_new;

	return epv;
}

static void
init_e_shell_corba_class (void)
{
	eshell_vepv.GNOME_Unknown_epv = gnome_object_get_epv ();
	eshell_vepv.GNOME_Evolution_Shell_epv = e_shell_get_epv ();
}

static void
e_shell_destroy (GtkObject *object)
{
	GTK_OBJECT_CLASS (e_shell_parent_class)->destroy (object);
}

static void
e_shell_class_init (GtkObjectClass *object_class)
{
	e_shell_parent_class = gtk_type_class (PARENT_TYPE);
	init_e_shell_corba_class ();

	object_class->destroy = e_shell_destroy;
}

static void
e_shell_destroy_views (EShell *eshell)
{
	GSList *l;

	for (l = eshell->views; l; l = l->next){
		EShellView *view = l->data;

		gtk_object_destroy (GTK_OBJECT (view));
	}
}

void
e_shell_quit (EShell *eshell)
{
	g_return_if_fail (eshell != NULL);
	g_return_if_fail (E_IS_SHELL (eshell));

	e_shell_destroy_views (eshell);
	
	gtk_main_quit ();
}

static CORBA_Object
create_corba_eshell (GnomeObject *object)
{
	POA_GNOME_Evolution_Shell *servant;
	CORBA_Environment ev;

	servant = (POA_GNOME_Evolution_Shell *)g_new0 (GnomeObjectServant, 1);
	servant->vepv = &eshell_vepv;

	CORBA_exception_init (&ev);

	POA_GNOME_Evolution_Shell__init ((PortableServer_Servant) servant, &ev);
	if (ev._major != CORBA_NO_EXCEPTION){
		CORBA_exception_free (&ev);
		g_free (servant);
		return CORBA_OBJECT_NIL;
	}

	CORBA_exception_free (&ev);

	return gnome_object_activate_servant (object, servant);
}

static void
e_shell_init (GtkObject *object)
{
}

static void
e_shell_construct (EShell *eshell, GNOME_Evolution_Shell corba_eshell)
{
	gnome_object_construct (GNOME_OBJECT (eshell), corba_eshell);
}

EShell *
e_shell_new (void)
{
	GNOME_Evolution_Shell corba_eshell;
	EShell *eshell;

	eshell = gtk_type_new (e_shell_get_type ());

	corba_eshell = create_corba_eshell (GNOME_OBJECT (eshell));
	if (corba_eshell == CORBA_OBJECT_NIL){
		gtk_object_destroy (GTK_OBJECT (eshell));
		return NULL;
	}
	
	e_shell_construct (eshell, corba_eshell);
	return eshell;
}

void
e_shell_register_view (EShell *eshell, EShellView *eshell_view)
{
	g_return_if_fail (eshell != NULL);
	g_return_if_fail (E_IS_SHELL (eshell));
	g_return_if_fail (eshell_view != NULL);

	eshell->views = g_slist_prepend (eshell->views, eshell_view);
}

void
e_shell_unregister_view (EShell *eshell, EShellView *eshell_view)
{
	g_return_if_fail (eshell != NULL);
	g_return_if_fail (E_IS_SHELL (eshell));
	g_return_if_fail (eshell_view != NULL);

	eshell->views = g_slist_remove (eshell->views, eshell_view);
}

E_MAKE_TYPE (e_shell, "EShell", EShell, e_shell_class_init, e_shell_init, PARENT_TYPE);