/* -*- Mode: C; indent-tabs-mode: t; c-basic-offset: 8; tab-width: 8 -*- */ /* e-select-names-bonobo.c * * Copyright (C) 2000 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 */ #ifdef HAVE_CONFIG_H #include #endif #include "e-select-names-bonobo.h" #include "e-simple-card-bonobo.h" #include #include #include #include #include #include "Evolution-Addressbook-SelectNames.h" #include "e-select-names-manager.h" #include "e-select-names-model.h" #include "e-select-names-text-model.h" #include "e-select-names-completion.h" #define PARENT_TYPE BONOBO_TYPE_OBJECT static BonoboObjectClass *parent_class = NULL; struct _ESelectNamesBonoboPrivate { ESelectNamesManager *manager; BonoboEventSource *event_source; }; enum _EntryPropertyID { ENTRY_PROPERTY_ID_TEXT, ENTRY_PROPERTY_ID_ADDRESSES, ENTRY_PROPERTY_ID_DESTINATIONS, ENTRY_PROPERTY_ID_SIMPLE_CARD_LIST, ENTRY_PROPERTY_ID_ALLOW_CONTACT_LISTS, ENTRY_PROPERTY_ID_ENTRY_CHANGED }; typedef enum _EntryPropertyID EntryPropertyID; /* PropertyBag implementation for the entry widgets. */ static void entry_get_property_fn (BonoboPropertyBag *bag, BonoboArg *arg, unsigned int arg_id, CORBA_Environment *ev, void *user_data) { GtkWidget *w; w = GTK_WIDGET (user_data); switch (arg_id) { case ENTRY_PROPERTY_ID_TEXT: { ETextModel *text_model; text_model = E_TEXT_MODEL (g_object_get_data (G_OBJECT (w), "select_names_text_model")); g_assert (text_model != NULL); BONOBO_ARG_SET_STRING (arg, e_text_model_get_text (text_model)); break; } case ENTRY_PROPERTY_ID_ADDRESSES: { ESelectNamesModel *model; char *text; model = E_SELECT_NAMES_MODEL (g_object_get_data (G_OBJECT (w), "select_names_model")); g_assert (model != NULL); text = e_select_names_model_get_address_text (model, ", "); BONOBO_ARG_SET_STRING (arg, text); g_free (text); } break; case ENTRY_PROPERTY_ID_DESTINATIONS: { ESelectNamesModel *model; char *text; model = E_SELECT_NAMES_MODEL (g_object_get_data (G_OBJECT (w), "select_names_model")); g_assert (model != NULL); text = e_select_names_model_export_destinationv (model); BONOBO_ARG_SET_STRING (arg, text); g_free (text); } break; case ENTRY_PROPERTY_ID_SIMPLE_CARD_LIST: { ESelectNamesModel *model; int count; int i; GNOME_Evolution_Addressbook_SimpleCardList *card_list; model = E_SELECT_NAMES_MODEL (g_object_get_data (G_OBJECT (w), "select_names_model")); g_assert (model != NULL); count = e_select_names_model_count (model); card_list = GNOME_Evolution_Addressbook_SimpleCardList__alloc (); card_list->_buffer = CORBA_sequence_GNOME_Evolution_Addressbook_SimpleCard_allocbuf (count); card_list->_maximum = count; card_list->_length = count; for (i = 0; i < count; i++) { const EDestination *destination = e_select_names_model_get_destination (model, i); const ECard *card = e_destination_get_card (destination); ECardSimple *simple = e_card_simple_new ((ECard *) card); ESimpleCardBonobo *simple_card = e_simple_card_bonobo_new (simple); g_object_unref (simple); card_list->_buffer[i] = bonobo_object_corba_objref (BONOBO_OBJECT (simple_card)); } CORBA_free (*(GNOME_Evolution_Addressbook_SimpleCardList **)arg->_value); BONOBO_ARG_SET_GENERAL (arg, card_list, TC_GNOME_Evolution_Addressbook_SimpleCardList, GNOME_Evolution_Addressbook_SimpleCardList *, NULL); } break; case ENTRY_PROPERTY_ID_ALLOW_CONTACT_LISTS: { ESelectNamesCompletion *comp; comp = E_SELECT_NAMES_COMPLETION (g_object_get_data (G_OBJECT (w), "completion_handler")); g_assert (comp != NULL); BONOBO_ARG_SET_BOOLEAN (arg, e_select_names_completion_get_match_contact_lists (comp)); break; } case ENTRY_PROPERTY_ID_ENTRY_CHANGED: /* This is a read-only property. */ g_assert_not_reached (); break; default: break; } } static void entry_set_property_fn (BonoboPropertyBag *bag, const BonoboArg *arg, guint arg_id, CORBA_Environment *ev, gpointer user_data) { GtkWidget *w; w = GTK_WIDGET (user_data); switch (arg_id) { case ENTRY_PROPERTY_ID_TEXT: case ENTRY_PROPERTY_ID_ADDRESSES: { ESelectNamesModel *model; model = E_SELECT_NAMES_MODEL (g_object_get_data (G_OBJECT (w), "select_names_model")); g_assert (model != NULL); e_entry_set_text (E_ENTRY (w), BONOBO_ARG_GET_STRING (arg)); e_select_names_model_cardify_all (model, NULL, 0); break; } case ENTRY_PROPERTY_ID_DESTINATIONS: { ESelectNamesModel *model; model = E_SELECT_NAMES_MODEL (g_object_get_data (G_OBJECT (w), "select_names_model")); g_assert (model != NULL); e_select_names_model_import_destinationv (model, BONOBO_ARG_GET_STRING (arg)); e_select_names_model_cardify_all (model, NULL, 0); break; } case ENTRY_PROPERTY_ID_ALLOW_CONTACT_LISTS: { ESelectNamesCompletion *comp; comp = E_SELECT_NAMES_COMPLETION (g_object_get_data (G_OBJECT (w), "completion_handler")); g_assert (comp != NULL); e_select_names_completion_set_match_contact_lists (comp, BONOBO_ARG_GET_BOOLEAN (arg)); break; } case ENTRY_PROPERTY_ID_ENTRY_CHANGED: g_object_set_data (G_OBJECT (w), "entry_property_id_changed", GUINT_TO_POINTER (1)); break; default: break; } } static void impl_SelectNames_add_section (PortableServer_Servant servant, const CORBA_char *id, const CORBA_char *title, CORBA_Environment *ev) { ESelectNamesBonobo *select_names; ESelectNamesBonoboPrivate *priv; select_names = E_SELECT_NAMES_BONOBO (bonobo_object (servant)); priv = select_names->priv; e_select_names_manager_add_section (priv->manager, id, title); } static void impl_SelectNames_add_section_with_limit (PortableServer_Servant servant, const CORBA_char *id, const CORBA_char *title, CORBA_short limit, CORBA_Environment *ev) { ESelectNamesBonobo *select_names; ESelectNamesBonoboPrivate *priv; select_names = E_SELECT_NAMES_BONOBO (bonobo_object (servant)); priv = select_names->priv; e_select_names_manager_add_section_with_limit (priv->manager, id, title, limit); } static void entry_changed (GtkWidget *widget, BonoboControl *control) { gboolean changed = GPOINTER_TO_UINT (g_object_get_data (G_OBJECT (widget), "entry_property_id_changed")); if (!changed) bonobo_control_set_property (control, NULL, "entry_changed", TC_CORBA_boolean, TRUE, NULL); } static void manager_changed_cb (ESelectNamesManager *manager, const gchar *section_id, gint changed_working_copy, gpointer closure) { ESelectNamesBonobo *select_names = E_SELECT_NAMES_BONOBO (closure); BonoboArg *arg; arg = bonobo_arg_new (BONOBO_ARG_STRING); BONOBO_ARG_SET_STRING (arg, section_id); bonobo_event_source_notify_listeners_full (select_names->priv->event_source, "GNOME/Evolution", "changed", changed_working_copy ? "working_copy" : "model", arg, NULL); bonobo_arg_release (arg); } static void manager_ok_cb (ESelectNamesManager *manager, gpointer closure) { ESelectNamesBonobo *select_names = E_SELECT_NAMES_BONOBO (closure); BonoboArg *arg; arg = bonobo_arg_new (BONOBO_ARG_NULL); bonobo_event_source_notify_listeners_full (select_names->priv->event_source, "GNOME/Evolution", "ok", "dialog", arg, NULL); bonobo_arg_release (arg); } static Bonobo_Control impl_SelectNames_get_entry_for_section (PortableServer_Servant servant, const CORBA_char *section_id, CORBA_Environment *ev) { ESelectNamesBonobo *select_names; ESelectNamesBonoboPrivate *priv; GtkWidget *entry_widget; BonoboControl *control; BonoboPropertyBag *property_bag; select_names = E_SELECT_NAMES_BONOBO (bonobo_object (servant)); priv = select_names->priv; entry_widget = e_select_names_manager_create_entry (priv->manager, section_id); gtk_widget_show (entry_widget); if (entry_widget == NULL) { CORBA_exception_set (ev, CORBA_USER_EXCEPTION, ex_GNOME_Evolution_Addressbook_SelectNames_SectionNotFound, NULL); return CORBA_OBJECT_NIL; } control = bonobo_control_new (entry_widget); property_bag = bonobo_property_bag_new (entry_get_property_fn, entry_set_property_fn, entry_widget); bonobo_property_bag_add (property_bag, "text", ENTRY_PROPERTY_ID_TEXT, BONOBO_ARG_STRING, NULL, NULL, BONOBO_PROPERTY_READABLE | BONOBO_PROPERTY_WRITEABLE); bonobo_property_bag_add (property_bag, "addresses", ENTRY_PROPERTY_ID_ADDRESSES, BONOBO_ARG_STRING, NULL, NULL, BONOBO_PROPERTY_READABLE | BONOBO_PROPERTY_WRITEABLE); bonobo_property_bag_add (property_bag, "destinations", ENTRY_PROPERTY_ID_DESTINATIONS, BONOBO_ARG_STRING, NULL, NULL, BONOBO_PROPERTY_READABLE | BONOBO_PROPERTY_WRITEABLE); bonobo_property_bag_add (property_bag, "simple_card_list", ENTRY_PROPERTY_ID_SIMPLE_CARD_LIST, TC_GNOME_Evolution_Addressbook_SimpleCardList, NULL, NULL, BONOBO_PROPERTY_READABLE); bonobo_property_bag_add (property_bag, "allow_contact_lists", ENTRY_PROPERTY_ID_ALLOW_CONTACT_LISTS, BONOBO_ARG_BOOLEAN, NULL, NULL, BONOBO_PROPERTY_READABLE | BONOBO_PROPERTY_WRITEABLE); bonobo_property_bag_add (property_bag, "entry_changed", ENTRY_PROPERTY_ID_ENTRY_CHANGED, BONOBO_ARG_BOOLEAN, NULL, NULL, BONOBO_PROPERTY_WRITEABLE); bonobo_control_set_properties (control, bonobo_object_corba_objref (BONOBO_OBJECT (property_bag)), NULL); bonobo_object_unref (BONOBO_OBJECT (property_bag)); g_signal_connect (entry_widget, "changed", G_CALLBACK (entry_changed), control); return CORBA_Object_duplicate (bonobo_object_corba_objref (BONOBO_OBJECT (control)), ev); } static void impl_SelectNames_activate_dialog (PortableServer_Servant servant, const CORBA_char *section_id, CORBA_Environment *ev) { ESelectNamesBonobo *select_names; ESelectNamesBonoboPrivate *priv; select_names = E_SELECT_NAMES_BONOBO (bonobo_object (servant)); priv = select_names->priv; e_select_names_manager_activate_dialog (priv->manager, section_id); } /* GtkObject methods. */ static void impl_dispose (GObject *object) { ESelectNamesBonobo *select_names; ESelectNamesBonoboPrivate *priv; select_names = E_SELECT_NAMES_BONOBO (object); priv = select_names->priv; if (priv) { if (priv->manager->names) { gtk_widget_destroy (GTK_WIDGET (priv->manager->names)); priv->manager->names = NULL; } g_object_unref (priv->manager); g_free (priv); select_names->priv = NULL; } if (G_OBJECT_CLASS (parent_class)->dispose) G_OBJECT_CLASS (parent_class)->dispose (object); } static void e_select_names_bonobo_class_init (ESelectNamesBonoboClass *klass) { GObjectClass *object_class; POA_GNOME_Evolution_Addressbook_SelectNames__epv *epv; object_class = G_OBJECT_CLASS (klass); parent_class = g_type_class_peek_parent (klass); object_class->dispose = impl_dispose; epv = &klass->epv; epv->addSection = impl_SelectNames_add_section; epv->addSectionWithLimit = impl_SelectNames_add_section_with_limit; epv->getEntryBySection = impl_SelectNames_get_entry_for_section; epv->activateDialog = impl_SelectNames_activate_dialog; } static void e_select_names_bonobo_init (ESelectNamesBonobo *select_names) { ESelectNamesBonoboPrivate *priv; priv = g_new (ESelectNamesBonoboPrivate, 1); priv->manager = e_select_names_manager_new (); priv->event_source = NULL; g_signal_connect (priv->manager, "changed", G_CALLBACK (manager_changed_cb), select_names); g_signal_connect (priv->manager, "ok", G_CALLBACK (manager_ok_cb), select_names); select_names->priv = priv; } static void e_select_names_bonobo_construct (ESelectNamesBonobo *select_names) { g_return_if_fail (select_names != NULL); g_return_if_fail (E_IS_SELECT_NAMES_BONOBO (select_names)); g_assert (select_names->priv->event_source == NULL); select_names->priv->event_source = bonobo_event_source_new (); bonobo_object_add_interface (BONOBO_OBJECT (select_names), BONOBO_OBJECT (select_names->priv->event_source)); } ESelectNamesBonobo * e_select_names_bonobo_new (void) { ESelectNamesBonobo *select_names; select_names = g_object_new (E_TYPE_SELECT_NAMES_BONOBO, NULL); e_select_names_bonobo_construct (select_names); return select_names; } BONOBO_TYPE_FUNC_FULL ( ESelectNamesBonobo, GNOME_Evolution_Addressbook_SelectNames, PARENT_TYPE, e_select_names_bonobo);