From c9a857200fb492f78f416f3afaf99e48a2960144 Mon Sep 17 00:00:00 2001
From: Ettore Perazzoli <ettore@src.gnome.org>
Date: Sat, 14 Oct 2000 16:18:52 +0000
Subject: 31337 splash screen for the shell's startup sequence.

svn path=/trunk/; revision=5912
---
 shell/e-shell.c | 64 +++++++++++++++++++++++++++++++++++++++++++++++++++++++--
 1 file changed, 62 insertions(+), 2 deletions(-)

(limited to 'shell/e-shell.c')

diff --git a/shell/e-shell.c b/shell/e-shell.c
index a7c1a2d2c0..08581c9ea4 100644
--- a/shell/e-shell.c
+++ b/shell/e-shell.c
@@ -42,6 +42,9 @@
 #include "e-shell-view.h"
 #include "e-shortcuts.h"
 #include "e-storage-set.h"
+#include "e-splash.h"
+
+#include "evolution-storage-set-view-factory.h"
 
 #include "e-shell.h"
 
@@ -343,8 +346,31 @@ setup_local_storage (EShell *shell)
 
 /* Initialization of the components.  */
 
+static char *
+get_icon_path_for_component_info (const OAF_ServerInfo *info)
+{
+	OAF_Property *property;
+	const char *shell_component_icon_value;
+
+	/* FIXME: liboaf is not const-safe.  */
+	property = oaf_server_info_prop_find ((OAF_ServerInfo *) info,
+					      "evolution:shell-component-icon");
+
+	if (property == NULL || property->v._d != OAF_P_STRING)
+		return gnome_pixmap_file ("gnome-question.png");
+
+	shell_component_icon_value = property->v._u.value_string;
+
+	if (g_path_is_absolute (shell_component_icon_value))
+		return g_strdup (shell_component_icon_value);
+
+	else
+		return g_concat_dir_and_file (EVOLUTION_IMAGES, shell_component_icon_value);
+}
+
 static void
-setup_components (EShell *shell)
+setup_components (EShell *shell,
+		  ESplash *splash)
 {
 	EShellPrivate *priv;
 	OAF_ServerInfoList *info_list;
@@ -361,6 +387,25 @@ setup_components (EShell *shell)
 	if (ev._major != CORBA_NO_EXCEPTION)
 		g_error ("Eeek!  Cannot perform OAF query for Evolution components.");
 
+	for (i = 0; i < info_list->_length; i++) {
+		const OAF_ServerInfo *info;
+		GdkPixbuf *icon_pixbuf;
+		char *icon_path;
+
+		info = info_list->_buffer + i;
+
+		icon_path = get_icon_path_for_component_info (info);
+
+		icon_pixbuf = gdk_pixbuf_new_from_file (icon_path);
+		e_splash_add_icon (splash, icon_pixbuf);
+		gdk_pixbuf_unref (icon_pixbuf);
+
+		g_free (icon_path);
+	}
+
+	while (gtk_events_pending ())
+		gtk_main_iteration ();
+
 	for (i = 0; i < info_list->_length; i++) {
 		const OAF_ServerInfo *info;
 
@@ -370,6 +415,11 @@ setup_components (EShell *shell)
 			g_warning ("Cannot activate Evolution component -- %s", info->iid);
 		else
 			g_print ("Evolution component activated successfully -- %s\n", info->iid);
+
+		e_splash_set_icon_highlight (splash, i, TRUE);
+
+		while (gtk_events_pending ())
+			gtk_main_iteration ();
 	}
 
 	if (info_list->_length == 0)
@@ -568,6 +618,7 @@ e_shell_construct (EShell *shell,
 		   Evolution_Shell corba_object,
 		   const char *local_directory)
 {
+	GtkWidget *splash;
 	EShellPrivate *priv;
 	gchar *shortcut_path;
 
@@ -577,6 +628,12 @@ e_shell_construct (EShell *shell,
 	g_return_if_fail (local_directory != NULL);
 	g_return_if_fail (g_path_is_absolute (local_directory));
 
+	splash = e_splash_new ();
+	gtk_widget_show (splash);
+
+	while (gtk_events_pending ())
+		gtk_main_iteration ();
+
 	bonobo_object_construct (BONOBO_OBJECT (shell), corba_object);
 
 	priv = shell->priv;
@@ -593,7 +650,7 @@ e_shell_construct (EShell *shell,
 	if (! setup_corba_storages (shell))
 		return;
 
-	setup_components (shell);
+	setup_components (shell, E_SPLASH (splash));
 
 	/* The local storage depends on the component registry.  */
 	setup_local_storage (shell);
@@ -612,6 +669,9 @@ e_shell_construct (EShell *shell,
 		gtk_object_ref (GTK_OBJECT (priv->shortcuts));
 
 	g_free (shortcut_path);
+
+	sleep (2);
+	gtk_widget_destroy (splash);
 }
 
 /**
-- 
cgit v1.2.3