diff options
Diffstat (limited to 'shell/e-corba-config-page.c')
| -rw-r--r-- | shell/e-corba-config-page.c | 231 |
1 files changed, 231 insertions, 0 deletions
diff --git a/shell/e-corba-config-page.c b/shell/e-corba-config-page.c new file mode 100644 index 0000000000..85ad38668c --- /dev/null +++ b/shell/e-corba-config-page.c @@ -0,0 +1,231 @@ +/* -*- Mode: C; indent-tabs-mode: t; c-basic-offset: 8; tab-width: 8 -*- */ +/* e-corba-config-page.c + * + * Copyright (C) 2002 Ximian, Inc. + * + * This program is free software; you can redistribute it and/or + * modify it under the terms of version 2 of the GNU General Public + * License as published by the Free Software Foundation. + * + * 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 <ettore@ximian.com> + */ + +#ifdef HAVE_CONFIG_H +#include <config.h> +#endif + +#include "e-corba-config-page.h" + +#include "Evolution.h" + +#include <gal/util/e-util.h> + +#include <bonobo/bonobo-widget.h> +#include <bonobo/bonobo-exception.h> +#include <bonobo/bonobo-listener.h> + + +#define PARENT_TYPE e_config_page_get_type () +static EConfigPageClass *parent_class = NULL; + +struct _ECorbaConfigPagePrivate { + GNOME_Evolution_ConfigControl config_control_interface; + + BonoboListener *listener; + Bonobo_EventSource_ListenerId listener_id; + + Bonobo_EventSource event_source; +}; + + +/* ::ConfigControl interface handling. */ + +static void +listener_event_callback (BonoboListener *listener, + char *event_name, + CORBA_any *any, + CORBA_Environment *ev, + void *data) +{ + ECorbaConfigPage *corba_config_page; + + corba_config_page = E_CORBA_CONFIG_PAGE (data); + + if (strcmp (event_name, "changed") == 0) + e_config_page_changed (E_CONFIG_PAGE (corba_config_page)); +} + +static void +setup_config_control_interface (ECorbaConfigPage *corba_config_page, + CORBA_Object corba_object) +{ + ECorbaConfigPagePrivate *priv; + GNOME_Evolution_ConfigControl config_control_interface; + Bonobo_EventSource event_source; + CORBA_Environment ev; + + priv = corba_config_page->priv; + + CORBA_exception_init (&ev); + + config_control_interface = Bonobo_Unknown_queryInterface (corba_object, "IDL:GNOME/Evolution/ConfigControl:1.0", &ev); + if (BONOBO_EX (&ev) || config_control_interface == CORBA_OBJECT_NIL) { + CORBA_exception_free (&ev); + return; + } + + event_source = GNOME_Evolution_ConfigControl__get_eventSource (config_control_interface, &ev); + if (!BONOBO_EX (&ev)) { + priv->listener = bonobo_listener_new (listener_event_callback, corba_config_page); + priv->listener_id = Bonobo_EventSource_addListener (event_source, + bonobo_object_corba_objref (BONOBO_OBJECT (priv->listener)), + &ev); + + if (! BONOBO_EX (&ev)) { + priv->config_control_interface = config_control_interface; + priv->event_source = event_source; + } else { + g_warning ("Cannot add listener for ConfigPage -- %s", BONOBO_EX_ID (&ev)); + + bonobo_object_unref (BONOBO_OBJECT (priv->listener)); + priv->listener = NULL; + } + } + + CORBA_exception_free (&ev); +} + + +/* GtkObject methods. */ + +static void +impl_destroy (GtkObject *object) +{ + ECorbaConfigPage *corba_config_page; + ECorbaConfigPagePrivate *priv; + + corba_config_page = E_CORBA_CONFIG_PAGE (object); + priv = corba_config_page->priv; + + if (priv != NULL) { + CORBA_Environment ev; + + CORBA_exception_init (&ev); + + if (priv->config_control_interface != CORBA_OBJECT_NIL) + bonobo_object_release_unref (priv->config_control_interface, &ev); + + if (priv->listener != NULL) { + Bonobo_EventSource_removeListener (priv->event_source, priv->listener_id, &ev); + bonobo_object_unref (BONOBO_OBJECT (priv->listener)); + + bonobo_object_release_unref (priv->event_source, &ev); + } + + CORBA_exception_free (&ev); + + g_free (priv); + corba_config_page->priv = NULL; + } + + (* GTK_OBJECT_CLASS (parent_class)->destroy) (object); +} + + +/* EConfigPage methods. */ + +static void +impl_apply (EConfigPage *config_page) +{ + ECorbaConfigPage *corba_config_page; + ECorbaConfigPagePrivate *priv; + CORBA_Environment ev; + + corba_config_page = E_CORBA_CONFIG_PAGE (config_page); + priv = corba_config_page->priv; + + CORBA_exception_init (&ev); + + GNOME_Evolution_ConfigControl_apply (priv->config_control_interface, &ev); + + if (BONOBO_EX (&ev)) + g_warning ("Cannot apply settings -- %s", BONOBO_EX_ID (&ev)); + + CORBA_exception_free (&ev); +} + + +/* GTK+ ctors. */ + +static void +class_init (ECorbaConfigPageClass *class) +{ + GtkObjectClass *object_class; + EConfigPageClass *config_page_class; + + object_class = GTK_OBJECT_CLASS (class); + object_class->destroy = impl_destroy; + + config_page_class = E_CONFIG_PAGE_CLASS (class); + config_page_class->apply = impl_apply; + + parent_class = gtk_type_class (PARENT_TYPE); +} + +static void +init (ECorbaConfigPage *corba_config_page) +{ + ECorbaConfigPagePrivate *priv; + + priv = g_new (ECorbaConfigPagePrivate, 1); + priv->config_control_interface = CORBA_OBJECT_NIL; + priv->listener = NULL; + priv->listener_id = (Bonobo_EventSource_ListenerId) 0; + priv->event_source = CORBA_OBJECT_NIL; + + corba_config_page->priv = priv; +} + + +void +e_corba_config_page_construct (ECorbaConfigPage *corba_config_page, + CORBA_Object corba_object) +{ + GtkWidget *control_widget; + + g_return_if_fail (E_IS_CORBA_CONFIG_PAGE (corba_config_page)); + g_return_if_fail (corba_object != CORBA_OBJECT_NIL); + + control_widget = bonobo_widget_new_control_from_objref (corba_object, CORBA_OBJECT_NIL); + gtk_widget_show (control_widget); + gtk_container_add (GTK_CONTAINER (corba_config_page), control_widget); + + setup_config_control_interface (corba_config_page, corba_object); +} + +GtkWidget * +e_corba_config_page_new_from_objref (CORBA_Object corba_object) +{ + ECorbaConfigPage *corba_config_page; + + g_return_val_if_fail (corba_object != CORBA_OBJECT_NIL, NULL); + g_return_val_if_fail (corba_object != CORBA_OBJECT_NIL, NULL); + + corba_config_page = gtk_type_new (e_corba_config_page_get_type ()); + e_corba_config_page_construct (corba_config_page, corba_object); + + return GTK_WIDGET (corba_config_page); +} + + +E_MAKE_TYPE (e_corba_config_page, "ECorbaConfigPgae", ECorbaConfigPage, class_init, init, PARENT_TYPE) |