From f69d5ec14310f4903a8b88224f7c82cfa1de014a Mon Sep 17 00:00:00 2001 From: Iain Holmes Date: Wed, 22 Nov 2000 00:34:39 +0000 Subject: Big patch. Evolution-services rewrite, services updated for new system, Big patch. Evolution-services rewrite, services updated for new system, Fixes to Executive Summary and other things. See some changelogs svn path=/trunk/; revision=6644 --- .../executive-summary-component-factory-client.c | 181 +++++++++++++++++++++ 1 file changed, 181 insertions(+) create mode 100644 executive-summary/evolution-services/executive-summary-component-factory-client.c (limited to 'executive-summary/evolution-services/executive-summary-component-factory-client.c') diff --git a/executive-summary/evolution-services/executive-summary-component-factory-client.c b/executive-summary/evolution-services/executive-summary-component-factory-client.c new file mode 100644 index 0000000000..f798341c80 --- /dev/null +++ b/executive-summary/evolution-services/executive-summary-component-factory-client.c @@ -0,0 +1,181 @@ +/* -*- Mode: C; indent-tabs-mode: t; c-basic-offset: 8; tab-width: 8 -*- */ +/* executive-summary-component-factory-client.c + * + * Authors: Iain Holmes + * + * 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. + */ + +#ifdef HAVE_CONFIG_H +#include +#endif + +#include +#include +#include + +#include + +#include +#include "executive-summary-component-factory-client.h" +#include "executive-summary.h" + +#define PARENT_TYPE BONOBO_OBJECT_CLIENT_TYPE +static BonoboObjectClass *parent_class = NULL; + +struct _ExecutiveSummaryComponentFactoryClientPrivate { + int dummy; +}; + +static void +executive_summary_component_factory_client_destroy (GtkObject *object) +{ + ExecutiveSummaryComponentFactoryClient *client; + ExecutiveSummaryComponentFactoryClientPrivate *priv; + + client = EXECUTIVE_SUMMARY_COMPONENT_FACTORY_CLIENT (object); + priv = client->private; + + if (priv == NULL) + return; + + g_free (priv); + client->private = NULL; + + (* GTK_OBJECT_CLASS (parent_class)->destroy) (object); +} + +static void +executive_summary_component_factory_client_init (ExecutiveSummaryComponentFactoryClient *client) +{ + ExecutiveSummaryComponentFactoryClientPrivate *priv; + + priv = g_new0 (ExecutiveSummaryComponentFactoryClientPrivate, 1); + client->private = priv; +} + +static void +executive_summary_component_factory_client_class_init (ExecutiveSummaryComponentFactoryClientClass *klass) +{ + GtkObjectClass *object_class; + + object_class = GTK_OBJECT_CLASS (klass); + object_class->destroy = executive_summary_component_factory_client_destroy; + + parent_class = gtk_type_class (PARENT_TYPE); +} + +E_MAKE_TYPE (executive_summary_component_factory_client, + "ExecutiveSummaryComponentFactoryClient", + ExecutiveSummaryComponentFactoryClient, + executive_summary_component_factory_client_class_init, + executive_summary_component_factory_client_init, PARENT_TYPE) + + +/*** Public API ***/ +/** + * executive_summary_component_factory_client_construct: + * @client: The ExecutiveSummaryComponentFactoryClient to construct. + * @corba_object: The CORBA_Object to construct it from. + * + * Constructs a client from the given CORBA_Object. + */ +void +executive_summary_component_factory_client_construct (ExecutiveSummaryComponentFactoryClient *client, + CORBA_Object corba_object) +{ + g_return_if_fail (client != NULL); + g_return_if_fail (IS_EXECUTIVE_SUMMARY_COMPONENT_FACTORY_CLIENT (client)); + g_return_if_fail (corba_object != CORBA_OBJECT_NIL); + + bonobo_object_client_construct (BONOBO_OBJECT_CLIENT (client), corba_object); +} + +/** + * executive_summary_component_factory_client_new: + * @id: The OAFIID of the component to activate. + * + * Activates the component specified by @id, and creates a server side client + * for that object. + * + * Returns: A pointer to an ExecutiveSummaryComponentFactoryClient object. + */ +ExecutiveSummaryComponentFactoryClient * +executive_summary_component_factory_client_new (const char *id) +{ + ExecutiveSummaryComponentFactoryClient *client; + CORBA_Environment ev; + CORBA_Object corba_object; + + g_return_val_if_fail (id != NULL, NULL); + + CORBA_exception_init (&ev); + + corba_object = 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\n", id); + return NULL; + } + + CORBA_exception_free (&ev); + + if (corba_object == CORBA_OBJECT_NIL) { + g_warning ("Could not activate %s\n", id); + return NULL; + } + + client = gtk_type_new (executive_summary_component_factory_client_get_type ()); + executive_summary_component_factory_client_construct (client, + corba_object); + + return client; +} + +/** + * executive_summary_component_factory_client_create_view: + * @client: The client on which to create the view. + * + * Creates a new view of a remote component. + * + * Returns: A GNOME_Evolution_Summary_Component. + */ +GNOME_Evolution_Summary_Component +executive_summary_component_factory_client_create_view (ExecutiveSummaryComponentFactoryClient *client) +{ + GNOME_Evolution_Summary_ComponentFactory factory; + GNOME_Evolution_Summary_Component component; + CORBA_Environment ev; + + g_return_val_if_fail (client != NULL, CORBA_OBJECT_NIL); + g_return_val_if_fail (IS_EXECUTIVE_SUMMARY_COMPONENT_FACTORY_CLIENT (client), + CORBA_OBJECT_NIL); + + CORBA_exception_init (&ev); + factory = bonobo_object_corba_objref (BONOBO_OBJECT (client)); + + component = GNOME_Evolution_Summary_ComponentFactory_createView (factory, &ev); + if (ev._major != CORBA_NO_EXCEPTION) { + g_warning ("Error creating view: %s", CORBA_exception_id (&ev)); + CORBA_exception_free (&ev); + return CORBA_OBJECT_NIL; + } + + CORBA_exception_free (&ev); + return component; +} -- cgit v1.2.3