aboutsummaryrefslogtreecommitdiffstats
path: root/shell/evolution-test-component.c
diff options
context:
space:
mode:
Diffstat (limited to 'shell/evolution-test-component.c')
-rw-r--r--shell/evolution-test-component.c715
1 files changed, 0 insertions, 715 deletions
diff --git a/shell/evolution-test-component.c b/shell/evolution-test-component.c
deleted file mode 100644
index faeae39991..0000000000
--- a/shell/evolution-test-component.c
+++ /dev/null
@@ -1,715 +0,0 @@
-/* -*- Mode: C; indent-tabs-mode: t; c-basic-offset: 8; tab-width: 8 -*- */
-/* evolution-test-component.c
- *
- * Copyright (C) 2001, 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
- */
-
-/* Simple test component for the Evolution shell. */
-
-#ifdef HAVE_CONFIG_H
-#include <config.h>
-#endif
-
-#include "evolution-shell-component.h"
-
-#include "evolution-activity-client.h"
-#include "evolution-config-control.h"
-#include "evolution-storage.h"
-
-#include <bonobo-activation/bonobo-activation.h>
-
-#include <bonobo/bonobo-exception.h>
-#include <bonobo/bonobo-generic-factory.h>
-#include <bonobo/bonobo-main.h>
-#include <bonobo/bonobo-widget.h>
-
-#include <libgnomeui/gnome-ui-init.h>
-
-#include <gtk/gtkdialog.h>
-#include <gtk/gtkeventbox.h>
-#include <gtk/gtklabel.h>
-#include <gtk/gtkmain.h>
-#include <gtk/gtkstock.h>
-#include <gtk/gtkvbox.h>
-
-#include <gdk-pixbuf/gdk-pixbuf.h>
-
-#include <stdlib.h>
-#include <string.h>
-
-
-#define COMPONENT_ID "OAFIID:GNOME_Evolution_TestComponent_ShellComponent"
-
-#define CONFIGURATION_CONTROL_FACTORY_ID "OAFIID:GNOME_Evolution_TestComponent_ConfigurationControlFactory"
-#define CONFIGURATION_CONTROL_ID "OAFIID:GNOME_Evolution_TestComponent_ConfigurationControl"
-
-static const EvolutionShellComponentFolderType folder_types[] = {
- { "test", "/usr/share/pixmaps/gnome-money.png", N_("Test"), N_("Test type"), FALSE, NULL, NULL },
- { NULL }
-};
-
-
-static BonoboGenericFactory *configuration_control_factory = NULL;
-
-static EvolutionShellClient *parent_shell = NULL;
-
-static int timeout_id = 0;
-
-
-/* TEST #1: Configuration Control. */
-
-static BonoboObject *
-create_configuration_page (void)
-{
- GtkWidget *label;
-
- label = gtk_label_new ("This is the configuration page for the test component.");
- gtk_widget_show (label);
-
- return BONOBO_OBJECT (evolution_config_control_new (label));
-}
-
-static BonoboObject *
-configuration_control_factory_fn (BonoboGenericFactory *factory,
- const char *id,
- void *closure)
-{
- if (strcmp (id, CONFIGURATION_CONTROL_ID) == 0) {
- return create_configuration_page ();
- } else {
- g_warning ("Unknown ID in configuration control factory -- %s", id);
- return NULL;
- }
-}
-
-static void
-register_configuration_control_factory (void)
-{
- configuration_control_factory = bonobo_generic_factory_new (CONFIGURATION_CONTROL_FACTORY_ID,
- configuration_control_factory_fn,
- NULL);
-
- if (configuration_control_factory == NULL)
- g_warning ("Cannot register configuration control factory!");
-}
-
-
-/* TEST #2: The ::Shortcut interface. */
-
-static void
-spit_out_shortcuts (EvolutionShellClient *shell_client)
-{
- GNOME_Evolution_Shortcuts shortcuts_interface;
- GNOME_Evolution_Shortcuts_GroupList *groups;
- CORBA_Environment ev;
- int i, j;
-
- CORBA_exception_init (&ev);
-
- shortcuts_interface = evolution_shell_client_get_shortcuts_interface (shell_client);
- if (CORBA_Object_is_nil (shortcuts_interface, &ev)) {
- g_warning ("No ::Shortcut interface on the shell");
- CORBA_exception_free (&ev);
- return;
- }
-
- groups = GNOME_Evolution_Shortcuts__get_groups (shortcuts_interface, &ev);
- if (ev._major != CORBA_NO_EXCEPTION) {
- g_warning ("Exception getting the groups: %s", BONOBO_EX_REPOID (&ev));
- CORBA_exception_free (&ev);
- return;
- }
-
- for (i = 0; i < groups->_length; i ++) {
- GNOME_Evolution_Shortcuts_Group *group;
- GNOME_Evolution_Shortcuts_ShortcutList *shortcuts;
-
- group = groups->_buffer + i;
- shortcuts = &group->shortcuts;
-
- g_print ("\tGROUP: %s\n", group->name);
-
- for (j = 0; j < shortcuts->_length; j ++) {
- GNOME_Evolution_Shortcuts_Shortcut *shortcut;
-
- shortcut = shortcuts->_buffer + j;
-
- g_print ("\t\tName: %s\n", shortcut->name);
- g_print ("\t\t\tType: %s\n", shortcut->type);
- g_print ("\t\t\tURI: %s\n", shortcut->uri);
- }
- }
-
- g_print ("** Done\n\n");
-
- CORBA_exception_free (&ev);
-}
-
-
-/* TEST #4: The multiple folder selector. */
-
-static void
-dialog_clicked_callback (GtkDialog *dialog,
- int button_num,
- void *data)
-{
- GNOME_Evolution_StorageSetView storage_set_view_iface;
- CORBA_Environment ev;
- GNOME_Evolution_FolderList *folder_list;
-
- if (button_num == 1) {
- /* Close. */
- gtk_widget_destroy (GTK_WIDGET (dialog));
- return;
- }
-
- CORBA_exception_init (&ev);
-
- storage_set_view_iface = (GNOME_Evolution_StorageSetView) data;
-
- folder_list = GNOME_Evolution_StorageSetView__get_checkedFolders (storage_set_view_iface, &ev);
- if (BONOBO_EX (&ev)) {
- g_warning ("Cannot get checkedFolders -- %s", BONOBO_EX_REPOID (&ev));
- } else {
- int i;
-
- for (i = 0; i < folder_list->_length; i ++) {
-#define PRINT(s) g_print ("\t" #s ": %s\n", folder_list->_buffer[i].s);
- g_print ("Folder #%d:\n", i + 1);
- PRINT (type);
- PRINT (description);
- PRINT (displayName);
- PRINT (physicalUri);
- PRINT (evolutionUri);
-#undef PRINT
-
- g_print ("\tunreadCount: %d\n", folder_list->_buffer[i].unreadCount);
- }
- }
-
- CORBA_exception_free (&ev);
-}
-
-static void
-dialog_weak_notify (void *data,
- GObject *where_the_object_was)
-{
- GNOME_Evolution_StorageSetView storage_set_view_iface;
- CORBA_Environment ev;
-
- CORBA_exception_init (&ev);
-
- storage_set_view_iface = (GNOME_Evolution_StorageSetView) data;
- Bonobo_Unknown_unref (storage_set_view_iface, &ev);
-
- CORBA_exception_free (&ev);
-}
-
-static void
-create_new_folder_selector (EvolutionShellComponent *shell_component)
-{
- EvolutionShellClient *shell_client;
- GNOME_Evolution_Shell corba_shell;
- GNOME_Evolution_StorageSetView storage_set_view_iface;
- GtkWidget *dialog;
- GtkWidget *control_widget;
- CORBA_Environment ev;
-
- CORBA_exception_init (&ev);
-
- shell_client = evolution_shell_component_get_owner (shell_component);
- g_assert (shell_client != NULL);
- corba_shell = evolution_shell_client_corba_objref (shell_client);
-
- control_widget = evolution_shell_client_create_storage_set_view (shell_client,
- CORBA_OBJECT_NIL,
- NULL,
- &storage_set_view_iface,
- &ev);
- if (control_widget == NULL) {
- g_warning ("Can't create the StorageSetView control -- %s", BONOBO_EX_REPOID (&ev));
- CORBA_exception_free (&ev);
- return;
- }
-
- dialog = gtk_dialog_new_with_buttons ("Test the Selector here.", NULL,
- GTK_DIALOG_MODAL,
- GTK_STOCK_APPLY, GTK_RESPONSE_ACCEPT,
- GTK_STOCK_CLOSE, GTK_RESPONSE_CLOSE,
- NULL);
- gtk_window_set_default_size (GTK_WINDOW (dialog), 200, 400);
-
- gtk_container_add (GTK_CONTAINER (GTK_DIALOG (dialog)->vbox), control_widget);
-
- GNOME_Evolution_StorageSetView__set_showCheckboxes (storage_set_view_iface, TRUE, &ev);
- if (BONOBO_EX (&ev))
- g_warning ("Cannot show checkboxes -- %s", BONOBO_EX_REPOID (&ev));
-
- g_signal_connect (dialog, "clicked",
- G_CALLBACK (dialog_clicked_callback), storage_set_view_iface);
-
- /* This is necessary to unref the StorageSetView iface once we are done
- with it. */
- g_object_weak_ref (G_OBJECT (dialog), dialog_weak_notify, storage_set_view_iface);
-
- gtk_widget_show (control_widget);
- gtk_widget_show (dialog);
-
- CORBA_exception_free (&ev);
-}
-
-
-/* TEST #5: Test custom storage. */
-
-static int
-shared_folder_discovery_timeout_callback (void *data)
-{
- GNOME_Evolution_Storage_FolderResult result;
- CORBA_Environment ev;
- Bonobo_Listener listener;
- CORBA_any any;
- EvolutionStorage *storage;
-
- storage = EVOLUTION_STORAGE (data);
-
- listener = (Bonobo_Listener) g_object_get_data (G_OBJECT (storage), "listener");
-
- result.result = GNOME_Evolution_Storage_OK;
- result.path = "/Shared Folders/The Public Folder";
-
- any._type = TC_GNOME_Evolution_Storage_FolderResult;
- any._value = &result;
-
- CORBA_exception_init (&ev);
-
- Bonobo_Listener_event (listener, "result", &any, &ev);
- if (BONOBO_EX (&ev))
- g_warning ("Cannot report result for shared folder discovery -- %s",
- BONOBO_EX_REPOID (&ev));
-
- Bonobo_Unknown_unref (listener, &ev);
- CORBA_Object_release (listener, &ev);
-
- CORBA_exception_free (&ev);
-
- g_object_set_data (G_OBJECT (storage), "listener", NULL);
- g_object_set_data (G_OBJECT (storage), "timeout_id", NULL);
-
- return FALSE;
-}
-
-static void
-storage_discover_shared_folder_callback (EvolutionStorage *storage,
- Bonobo_Listener listener,
- const char *user,
- const char *folder_name,
- void *data)
-{
- CORBA_Environment ev;
- Bonobo_Listener listener_copy;
-
- CORBA_exception_init (&ev);
- listener_copy = CORBA_Object_duplicate (listener, &ev);
- Bonobo_Unknown_ref (listener, &ev);
- CORBA_exception_free (&ev);
-
- g_print ("Listener copy %p\n", listener_copy);
-
- timeout_id = g_timeout_add (1000, shared_folder_discovery_timeout_callback, storage);
-
- g_object_set_data (G_OBJECT (storage), "listener", listener_copy);
- g_object_set_data (G_OBJECT (storage), "timeout_id", GINT_TO_POINTER (timeout_id));
-}
-
-static void
-storage_cancel_discover_shared_folder_callback (EvolutionStorage *storage,
- const char *user,
- const char *folder_name,
- void *data)
-{
- Bonobo_Listener listener;
- CORBA_Environment ev;
- int timeout_id;
-
- timeout_id = GPOINTER_TO_INT (g_object_get_data (G_OBJECT (storage), "timeout_id"));
- if (timeout_id == 0)
- return;
-
- g_source_remove (timeout_id);
- g_object_set_data (G_OBJECT (storage), "timeout_id", NULL);
-
- listener = (Bonobo_Listener) g_object_get_data (G_OBJECT (storage), "listener");
-
- CORBA_exception_init (&ev);
- Bonobo_Unknown_unref (listener, &ev);
- CORBA_Object_release (listener, &ev);
- CORBA_exception_free (&ev);
-
- g_object_set_data (G_OBJECT (storage), "listener", NULL);
-}
-
-static void
-storage_show_folder_properties_callback (EvolutionStorage *storage,
- const char *path,
- unsigned int itemNumber,
- unsigned long parentWindowId,
- void *data)
-{
- g_print ("Show properties #%d -- %s\n", itemNumber, path);
-}
-
-static void
-setup_custom_storage (EvolutionShellClient *shell_client)
-{
- EvolutionStorage *the_storage;
- EvolutionStorageResult result;
-
- the_storage = evolution_storage_new ("TestStorage", TRUE);
-
- g_signal_connect (the_storage, "discover_shared_folder",
- G_CALLBACK (storage_discover_shared_folder_callback), shell_client);
- g_signal_connect (the_storage, "cancel_discover_shared_folder",
- G_CALLBACK (storage_cancel_discover_shared_folder_callback), shell_client);
-
- /* Add some custom "Properties" items. */
- evolution_storage_add_property_item (the_storage, "Sharing...",
- "Change sharing properties for this folder", NULL);
- evolution_storage_add_property_item (the_storage, "Permissions...",
- "Change permissions for this folder", NULL);
-
- g_signal_connect (the_storage, "show_folder_properties",
- G_CALLBACK (storage_show_folder_properties_callback), NULL);
-
- result = evolution_storage_register_on_shell (the_storage, evolution_shell_client_corba_objref (shell_client));
- if (result != EVOLUTION_STORAGE_OK) {
- g_warning ("Cannot register storage on the shell.");
- bonobo_object_unref (BONOBO_OBJECT (the_storage));
- return;
- }
-
- /* Test the sorting_priority arg here: if it was just sorting in
- alphabetical order, FirstFolder would come before SecondFolder, but
- we are specifying -1 sorting priority for SecondFolder and zero for
- FirstFolder so the order is reversed. */
-
- evolution_storage_new_folder (the_storage, "/FirstFolder", "FirstFolder",
- "test", "file:///tmp/blah", "", "inbox", 0, TRUE, 0);
- evolution_storage_new_folder (the_storage, "/SecondFolder", "SecondFolder",
- "calendar", "file:///tmp/bleh", "", NULL, 0, FALSE, -1);
-}
-
-
-/* Callbacks. */
-
-static void
-activity_client_cancel_callback (EvolutionActivityClient *client,
- void *data)
-{
- g_print ("User requested that the operation be cancelled.\n");
-}
-
-static void
-activity_client_show_details_callback (EvolutionActivityClient *client,
- void *data)
-{
- g_print ("User wants to see details.\n");
-}
-
-
-/* Timeout #3: We are done. */
-static int
-timeout_callback_3 (void *data)
-{
- EvolutionActivityClient *activity_client;
-
- activity_client = EVOLUTION_ACTIVITY_CLIENT (data);
-
- g_object_unref (activity_client);
-
- g_print ("--> Done.\n");
-
- return FALSE;
-}
-
-/* Timeout #2: Update the progress until it reaches 100%. */
-static int
-timeout_callback_2 (void *data)
-{
- EvolutionActivityClient *activity_client;
- int progress;
-
- activity_client = EVOLUTION_ACTIVITY_CLIENT (data);
- progress = GPOINTER_TO_INT (g_object_get_data (G_OBJECT (activity_client), "my_progress"));
-
- if (progress < 0)
- progress = 0;
-
- g_print ("--> Updating %d\n", progress);
-
- if (! evolution_activity_client_update (activity_client, "Operation Foo in progress",
- (float) progress / 100.0)) {
- g_warning ("Error when updating operation");
- return FALSE;
- }
-
- progress ++;
- g_object_set_data (G_OBJECT (activity_client), "my_progress", GINT_TO_POINTER (progress));
-
- if (progress > 100) {
- g_timeout_add (200, timeout_callback_3, activity_client);
- return FALSE;
- }
-
- return TRUE;
-}
-
-/* Timeout #1: Set busy. */
-static int
-timeout_callback_1 (void *data)
-{
- EvolutionActivityClient *activity_client;
- gboolean suggest_display;
- GdkPixbuf *animated_icon[2];
- static int count = 0;
-
-#define NUM_ACTIVITIES 10
-
- animated_icon[0] = gdk_pixbuf_new_from_file (EVOLUTION_IMAGES "outbox-mini.png", NULL);
- animated_icon[1] = NULL;
-
- g_assert (animated_icon[0] != NULL);
-
- activity_client = evolution_activity_client_new (parent_shell, COMPONENT_ID,
- animated_icon,
- "Operation Foo started!",
- TRUE,
- &suggest_display);
- if (activity_client == CORBA_OBJECT_NIL) {
- g_warning ("Cannot create EvolutionActivityClient object");
- return FALSE;
- }
-
- g_object_set_data (G_OBJECT (activity_client), "my_progress", GINT_TO_POINTER (-1));
-
- g_signal_connect (activity_client, "cancel",
- G_CALLBACK (activity_client_cancel_callback), NULL);
- g_signal_connect (activity_client, "show_details",
- G_CALLBACK (activity_client_show_details_callback), NULL);
-
- g_print ("Component becoming busy -- %s\n", COMPONENT_ID);
- if (suggest_display)
- g_print (" --> Could display dialog box.\n");
-
- g_timeout_add (100, timeout_callback_2, activity_client);
-
- if (count < NUM_ACTIVITIES) {
- count ++;
- g_timeout_add ((rand () % 5 + 1) * 500, timeout_callback_1, NULL);
- }
-
- return FALSE;
-}
-
-
-static EvolutionShellComponentResult
-create_view_fn (EvolutionShellComponent *shell_component,
- const char *physical_uri,
- const char *folder_type,
- const char *view_data,
- BonoboControl **control_return,
- void *closure)
-{
- GtkWidget *vbox;
- GtkWidget *label_1, *label_2, *label_3, *label_4;
- GtkWidget *event_box_1, *event_box_2;
-
- label_1 = gtk_label_new ("This is just a test component, displaying the following URI:");
- label_2 = gtk_label_new (physical_uri);
-
- if (*view_data) {
- label_3 = gtk_label_new ("And the following view_data:");
- label_4 = gtk_label_new (view_data);
- } else
- label_3 = label_4 = NULL;
-
- event_box_1 = gtk_event_box_new ();
- event_box_2 = gtk_event_box_new ();
-
- vbox = gtk_vbox_new (FALSE, 5);
-
- gtk_box_pack_start (GTK_BOX (vbox), event_box_1, TRUE, TRUE, 0);
- gtk_box_pack_start (GTK_BOX (vbox), label_1, FALSE, TRUE, 0);
- gtk_box_pack_start (GTK_BOX (vbox), label_2, FALSE, TRUE, 0);
- if (label_3) {
- gtk_box_pack_start (GTK_BOX (vbox), label_3, FALSE, TRUE, 0);
- gtk_box_pack_start (GTK_BOX (vbox), label_4, FALSE, TRUE, 0);
- }
- gtk_box_pack_start (GTK_BOX (vbox), event_box_2, TRUE, TRUE, 0);
-
- gtk_widget_show_all (vbox);
-
- *control_return = bonobo_control_new (vbox);
-
- g_assert (timeout_id == 0);
- timeout_id = g_timeout_add (2000, timeout_callback_1, NULL);
-
- return EVOLUTION_SHELL_COMPONENT_OK;
-}
-
-static gboolean
-request_quit_fn (EvolutionShellComponent *shell_component,
- void *closure)
-{
- GtkWidget *confirm_dialog;
- GtkWidget *label;
- int response;
-
- confirm_dialog = gtk_dialog_new_with_buttons ("Quit?", NULL, GTK_DIALOG_MODAL,
- GTK_STOCK_OK, GTK_RESPONSE_ACCEPT,
- GTK_STOCK_CANCEL, GTK_RESPONSE_REJECT,
- NULL);
- label = gtk_label_new ("Please confirm that you want to quit now.");
- gtk_container_add (GTK_CONTAINER (GTK_DIALOG (confirm_dialog)->vbox), label);
- gtk_widget_show_all (confirm_dialog);
-
- response = gtk_dialog_run (GTK_DIALOG (confirm_dialog));
- gtk_widget_destroy (confirm_dialog);
-
- if (response == GTK_RESPONSE_ACCEPT)
- return TRUE; /* OK */
- else
- return FALSE; /* Cancel */
-}
-
-
-/* Callbacks. */
-
-static void
-owner_set_callback (EvolutionShellComponent *shell_component,
- EvolutionShellClient *shell_client,
- const char *evolution_homedir)
-{
- g_assert (parent_shell == NULL);
-
- g_print ("We have an owner -- home directory is `%s'\n", evolution_homedir);
-
- parent_shell = shell_client;
-
- if (evolution_shell_client_get_activity_interface (parent_shell) == CORBA_OBJECT_NIL)
- g_warning ("Shell doesn't have a ::Activity interface -- weird!");
-
- spit_out_shortcuts (shell_client);
-
- setup_custom_storage (shell_client);
-}
-
-static int
-owner_unset_idle_callback (void *data)
-{
- gtk_main_quit ();
- return FALSE;
-}
-
-static void
-owner_unset_callback (EvolutionShellComponent *shell_component,
- void *data)
-{
- g_idle_add_full (G_PRIORITY_LOW, owner_unset_idle_callback, NULL, NULL);
-}
-
-static void
-user_create_new_item_callback (EvolutionShellComponent *shell_component,
- const char *id,
- const char *parent_folder_physical_uri,
- const char *parent_folder_type)
-{
- g_print ("\n*** Should create -- %s\n", id);
- g_print ("\n\tType %s, URI %s\n", parent_folder_type, parent_folder_physical_uri);
-
- if (strcmp (id, "FolderSelector") == 0)
- create_new_folder_selector (shell_component);
-}
-
-
-static void
-register_component (void)
-{
- EvolutionShellComponent *shell_component;
- int result;
-
- shell_component = evolution_shell_component_new (folder_types,
- NULL,
- create_view_fn,
- NULL, NULL, NULL, NULL, NULL, NULL,
- request_quit_fn,
- NULL);
-
- g_signal_connect (shell_component, "owner_set",
- G_CALLBACK (owner_set_callback), NULL);
- g_signal_connect (shell_component, "owner_unset",
- G_CALLBACK (owner_unset_callback), NULL);
-
- evolution_shell_component_add_user_creatable_item (shell_component, "Stuff",
- "New Stuff", "New _Stuff",
- "Create some new stuff",
- NULL,
- '\0', NULL);
- evolution_shell_component_add_user_creatable_item (shell_component, "MoreStuff",
- "New More Stuff", "New _More Stuff",
- "Create more stuff",
- NULL,
- 'n', NULL);
- evolution_shell_component_add_user_creatable_item (shell_component, "FolderSelector",
- "Folder Selector", "New Folder _Selector",
- "Show a folder selector",
- NULL,
- 's', NULL);
-
- g_signal_connect (shell_component, "user_create_new_item",
- G_CALLBACK (user_create_new_item_callback), NULL);
-
- result = bonobo_activation_active_server_register (COMPONENT_ID,
- bonobo_object_corba_objref (BONOBO_OBJECT (shell_component)));
-
- if (result != Bonobo_ACTIVATION_REG_SUCCESS)
- g_error ("Cannot register active server into OAF");
-}
-
-
-int
-main (int argc, char **argv)
-{
- bindtextdomain (GETTEXT_PACKAGE, EVOLUTION_LOCALEDIR);
- textdomain (GETTEXT_PACKAGE);
-
- gnome_program_init (PACKAGE, VERSION, LIBGNOMEUI_MODULE, argc, argv,
- GNOME_PROGRAM_STANDARD_PROPERTIES,
- GNOME_PARAM_HUMAN_READABLE_NAME, _("Evolution Test Component"),
- NULL);
-
- register_configuration_control_factory ();
-
- register_component ();
-
- g_print ("Test Component up and running.\n");
-
- bonobo_main ();
-
- return 0;
-}