/* -*- Mode: C; indent-tabs-mode: t; c-basic-offset: 8; tab-width: 8 -*- */
/* e-shell-view.c
*
* 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.
*
* Authors:
* Ettore Perazzoli <ettore@helixcode.com>
* Miguel de Icaza <miguel@helixcode.com>
* Matt Loper <matt@helixcode.com>
*/
#ifdef HAVE_CONFIG_H
#include <config.h>
#endif
#include <gnome.h>
#include <bonobo.h>
#include <libgnomeui/gnome-window-icon.h>
#include "e-shell-utils.h"
#include "e-shell.h"
#include "e-shortcuts-view.h"
#include "e-storage-set-view.h"
#include "e-title-bar.h"
#include "e-util/e-util.h"
#include "e-shell-view.h"
#include "e-shell-view-menu.h"
#include <widgets/e-paned/e-hpaned.h>
#define PARENT_TYPE gnome_app_get_type () /* Losing GnomeApp does not define GNOME_TYPE_APP. */
static GnomeAppClass *parent_class = NULL;
struct _EShellViewPrivate {
/* The shell. */
EShell *shell;
/* The UI handler. */
BonoboUIHandler *uih;
/* Currently displayed URI. */
char *uri;
/* The widgetry. */
GtkWidget *hpaned1;
GtkWidget *hpaned2;
GtkWidget *contents;
GtkWidget *notebook;
GtkWidget *shortcut_bar;
GtkWidget *shortcut_bar_box;
GtkWidget *storage_set_view;
GtkWidget *storage_set_view_box;
/* The view we have already open. */
GHashTable *uri_to_control;
/* Position of the handles in the paneds, to be restored when we show elements
after hiding them. */
unsigned int hpaned1_position;
unsigned int hpaned2_position;
};
/* FIXME this should probably go somewhere else. */
#define EVOLUTION_URI_PREFIX "evolution:"
#define EVOLUTION_URI_PREFIX_LEN 10
#define DEFAULT_SHORTCUT_BAR_WIDTH 100
#define DEFAULT_TREE_WIDTH 100
#define DEFAULT_WIDTH 600
#define DEFAULT_HEIGHT 600
static GtkWidget *
create_label_for_empty_page (void)
{
GtkWidget *label;
label = gtk_label_new (_("(No folder displayed)"));
gtk_widget_show (label);
return label;
}
static void
setup_menus (EShellView *shell_view)
{
BonoboUIHandlerMenuItem *list;
EShellViewPrivate *priv;
priv = shell_view->priv;
priv->uih = bonobo_ui_handler_new ();
bonobo_ui_handler_set_app (priv->uih, GNOME_APP (shell_view));
bonobo_ui_handler_create_menubar (priv->uih);
list = bonobo_ui_handler_menu_parse_uiinfo_list_with_data (e_shell_view_menu, shell_view);
bonobo_ui_handler_menu_add_list (priv->uih, "/", list);
bonobo_ui_handler_menu_free_list (list);
}
static gboolean
bonobo_widget_is_dead (BonoboWidget *bonobo_widget)
{
BonoboControlFrame *control_frame;
CORBA_Object corba_object;
CORBA_Environment ev;
gboolean is_dead;
control_frame = bonobo_widget_get_control_frame (bonobo_widget);
corba_object = bonobo_control_frame_get_control (control_frame);
CORBA_exception_init (&ev);
is_dead = CORBA_Object_non_existent (corba_object, &ev);
CORBA_exception_free (&ev);
return is_dead;
}
/* Callbacks. */
/* Callback called when an icon on the shortcut bar gets clicked. */
static void
activate_shortcut_cb (EShortcutsView *shortcut_view,
EShortcuts *shortcuts,
const char *uri,
gpointer data)
{
EShellView *shell_view;
shell_view = E_SHELL_VIEW (data);
e_shell_view_display_uri (shell_view, uri);
}
/* Callback called when a folder on the tree view gets clicked. */
static void
folder_selected_cb (EStorageSetView *storage_set_view,
const char *path,
gpointer data)
{
EShellView *shell_view;
char *uri;
shell_view = E_SHELL_VIEW (data);
uri = g_strconcat (EVOLUTION_URI_PREFIX, path, NULL);
e_shell_view_display_uri (shell_view, uri);
g_free (uri);
}
/* Callback called when the close button on the tree's title bar is clicked. */
static void
storage_set_view_close_button_clicked_cb (ETitleBar *title_bar,
gpointer data)
{
EShellView *shell_view;
shell_view = E_SHELL_VIEW (data);
e_shell_view_show_folders (shell_view, FALSE);
}
/* Callback called when the close button on the shorcut bar's title bar is clicked. */
static void
shortcut_bar_close_button_clicked_cb (ETitleBar *title_bar,
gpointer data)
{
EShellView *shell_view;
shell_view = E_SHELL_VIEW (data);
e_shell_view_show_shortcuts (shell_view, FALSE);
}
static void
setup_widgets (EShellView *shell_view)
{
EShellViewPrivate *priv;
GtkWidget *shortcut_bar_title_bar;
GtkWidget *storage_set_view_title_bar;
GtkWidget *storage_set_view_scrolled_window;
priv = shell_view->priv;
/* The shortcut bar. */
priv->shortcut_bar = e_shortcuts_new_view (e_shell_get_shortcuts (priv->shell));
gtk_signal_connect (GTK_OBJECT (priv->shortcut_bar), "activate_shortcut",
GTK_SIGNAL_FUNC (activate_shortcut_cb), shell_view);
priv->shortcut_bar_box = gtk_vbox_new (FALSE, 0);
shortcut_bar_title_bar = e_title_bar_new (_("Shortcuts"));
gtk_widget_show (shortcut_bar_title_bar);
gtk_box_pack_start (GTK_BOX (priv->shortcut_bar_box), shortcut_bar_title_bar,
FALSE, FALSE, 0);
gtk_box_pack_start (GTK_BOX (priv->shortcut_bar_box), priv->shortcut_bar,
TRUE, TRUE, 0);
gtk_signal_connect (GTK_OBJECT (shortcut_bar_title_bar), "close_button_clicked",
GTK_SIGNAL_FUNC (shortcut_bar_close_button_clicked_cb), shell_view);
/* The storage set view. */
priv->storage_set_view = e_storage_set_view_new (e_shell_get_storage_set (priv->shell));
gtk_signal_connect (GTK_OBJECT (priv->storage_set_view), "folder_selected",
GTK_SIGNAL_FUNC (folder_selected_cb), shell_view);
storage_set_view_scrolled_window = gtk_scrolled_window_new (NULL, NULL);
gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (storage_set_view_scrolled_window),
GTK_POLICY_AUTOMATIC, GTK_POLICY_AUTOMATIC);
gtk_container_add (GTK_CONTAINER (storage_set_view_scrolled_window),
priv->storage_set_view);
priv->storage_set_view_box = gtk_vbox_new (FALSE, 0);
storage_set_view_title_bar = e_title_bar_new (_("Folders"));
gtk_box_pack_start (GTK_BOX (priv->storage_set_view_box), storage_set_view_title_bar,
FALSE, FALSE, 0);
gtk_box_pack_start (GTK_BOX (priv->storage_set_view_box), storage_set_view_scrolled_window,
TRUE, TRUE, 0);
gtk_signal_connect (GTK_OBJECT (storage_set_view_title_bar), "close_button_clicked",
GTK_SIGNAL_FUNC (storage_set_view_close_button_clicked_cb), shell_view);
/* The tabless notebook which we used to contain the views. */
priv->notebook = gtk_notebook_new ();
gtk_notebook_set_show_border (GTK_NOTEBOOK (priv->notebook), FALSE);
gtk_notebook_set_show_tabs (GTK_NOTEBOOK (priv->notebook), FALSE);
/* Page for "No URL displayed" message. */
gtk_notebook_append_page (GTK_NOTEBOOK (priv->notebook), create_label_for_empty_page (), NULL);
/* Put things into a paned and the paned into the GnomeApp. */
priv->hpaned2 = e_hpaned_new ();
e_paned_add1 (E_PANED (priv->hpaned2), priv->storage_set_view_box);
e_paned_add2 (E_PANED (priv->hpaned2), priv->notebook);
e_paned_set_position (E_PANED (priv->hpaned2), DEFAULT_SHORTCUT_BAR_WIDTH);
priv->hpaned1 = e_hpaned_new ();
e_paned_add1 (E_PANED (priv->hpaned1), priv->shortcut_bar_box);
e_paned_add2 (E_PANED (priv->hpaned1), priv->hpaned2);
e_paned_set_position (E_PANED (priv->hpaned1), DEFAULT_SHORTCUT_BAR_WIDTH);
gtk_container_set_border_width (GTK_CONTAINER (priv->hpaned1), 0);
gtk_container_set_border_width (GTK_CONTAINER (priv->hpaned2), 0);
gnome_app_set_contents (GNOME_APP (shell_view), priv->hpaned1);
/* Show stuff. */
gtk_widget_show (priv->shortcut_bar);
gtk_widget_show (priv->shortcut_bar_box);
gtk_widget_show (priv->storage_set_view);
gtk_widget_show (priv->storage_set_view_box);
gtk_widget_show (storage_set_view_scrolled_window);
gtk_widget_show (storage_set_view_title_bar);
gtk_widget_show (priv->notebook);
gtk_widget_show (priv->hpaned1);
gtk_widget_show (priv->hpaned2);
/* FIXME: Session management and stuff? */
gtk_window_set_default_size (GTK_WINDOW (shell_view), DEFAULT_WIDTH, DEFAULT_HEIGHT);
}
/* GtkObject methods. */
static void
hash_forall_destroy_control (gpointer name,
gpointer value,
gpointer data)
{
CORBA_Object corba_control;
CORBA_Environment ev;
BonoboObject *bonobo_object;
BonoboWidget *bonobo_widget;
bonobo_widget = BONOBO_WIDGET (value);
bonobo_object = BONOBO_OBJECT (bonobo_widget_get_server (bonobo_widget));
corba_control = bonobo_object_corba_objref (bonobo_object);
g_return_if_fail (corba_control != CORBA_OBJECT_NIL);
CORBA_exception_init (&ev);
Bonobo_Unknown_unref (corba_control, &ev);
CORBA_exception_free (&ev);
g_free (name);
}
static void
destroy (GtkObject *object)
{
EShellView *shell_view;
EShellViewPrivate *priv;
shell_view = E_SHELL_VIEW (object);
priv = shell_view->priv;
g_hash_table_foreach (priv->uri_to_control, hash_forall_destroy_control, NULL);
g_hash_table_destroy (priv->uri_to_control);
g_free (priv);
(* GTK_OBJECT_CLASS (parent_class)->destroy) (object);
}
/* Initialization. */
static void
class_init (EShellViewClass *klass)
{
GtkObjectClass *object_class;
object_class = GTK_OBJECT_CLASS (klass);
object_class->destroy = destroy;
parent_class = gtk_type_class (gnome_app_get_type ());
}
static void
init (EShellView *shell_view)
{
EShellViewPrivate *priv;
priv = g_new (EShellViewPrivate, 1);
priv->shell = NULL;
priv->uih = NULL;
priv->uri = NULL;
priv->hpaned1 = NULL;
priv->hpaned2 = NULL;
priv->contents = NULL;
priv->notebook = NULL;
priv->storage_set_view = NULL;
priv->storage_set_view_box = NULL;
priv->shortcut_bar = NULL;
priv->shortcut_bar_box = NULL;
priv->hpaned1_position = 0;
priv->hpaned2_position = 0;
priv->uri_to_control = g_hash_table_new (g_str_hash, g_str_equal);
shell_view->priv = priv;
}
void
e_shell_view_construct (EShellView *shell_view,
EShell *shell)
{
EShellViewPrivate *priv;
g_return_if_fail (shell_view != NULL);
g_return_if_fail (E_IS_SHELL_VIEW (shell_view));
g_return_if_fail (shell != NULL);
g_return_if_fail (E_IS_SHELL (shell));
gnome_app_construct (GNOME_APP (shell_view), "evolution", "Evolution");
priv = shell_view->priv;
gtk_object_ref (GTK_OBJECT (shell));
priv->shell = shell;
setup_widgets (shell_view);
setup_menus (shell_view);
}
GtkWidget *
e_shell_view_new (EShell *shell)
{
GtkWidget *new;
g_return_val_if_fail (shell != NULL, NULL);
g_return_val_if_fail (E_IS_SHELL (shell), NULL);
new = gtk_type_new (e_shell_view_get_type ());
e_shell_view_construct (E_SHELL_VIEW (new), shell);
return new;
}
static const char *
get_storage_set_path_from_uri (const char *uri)
{
const char *colon;
if (g_path_is_absolute (uri))
return NULL;
colon = strchr (uri, ':');
if (colon == NULL || colon == uri || colon[1] == '\0')
return NULL;
if (! g_path_is_absolute (colon + 1))
return NULL;
if (g_strncasecmp (uri, EVOLUTION_URI_PREFIX, colon - uri) != 0)
return NULL;
return colon + 1;
}
static void
set_icon (EShellView *shell_view,
EFolder *folder)
{
EShellViewPrivate *priv;
const char *type;
const char *icon_name;
char *icon_path;
priv = shell_view->priv;
type = e_folder_get_type_string (folder);
if (type == NULL) {
icon_path = NULL;
} else {
EFolderTypeRegistry *folder_type_registry;
folder_type_registry = e_shell_get_folder_type_registry (priv->shell);
icon_name = e_folder_type_registry_get_icon_name_for_type (folder_type_registry, type);
if (icon_name == NULL)
icon_path = NULL;
else
icon_path = e_shell_get_icon_path (icon_name, TRUE);
}
if (icon_path == NULL) {
gnome_window_icon_set_from_default (GTK_WINDOW (shell_view));
} else {
gnome_window_icon_set_from_file (GTK_WINDOW (shell_view), icon_path);
g_free (icon_path);
}
}
static void
update_for_current_uri (EShellView *shell_view)
{
EShellViewPrivate *priv;
EFolder *folder;
const char *folder_name;
const char *path;
char *window_title;
priv = shell_view->priv;
path = get_storage_set_path_from_uri (priv->uri);
if (path == NULL)
folder = NULL;
else
folder = e_storage_set_get_folder (e_shell_get_storage_set (priv->shell),
path);
if (folder == NULL)
folder_name = _("None");
else
folder_name = e_folder_get_name (folder);
window_title = g_strdup_printf (_("Evolution - %s"), folder_name);
gtk_window_set_title (GTK_WINDOW (shell_view), window_title);
g_free (window_title);
set_icon (shell_view, folder);
gtk_signal_handler_block_by_func (GTK_OBJECT (priv->storage_set_view),
GTK_SIGNAL_FUNC (folder_selected_cb),
shell_view);
e_storage_set_view_set_current_folder (E_STORAGE_SET_VIEW (priv->storage_set_view),
path);
gtk_signal_handler_unblock_by_func (GTK_OBJECT (priv->storage_set_view),
GTK_SIGNAL_FUNC (folder_selected_cb),
shell_view);
}
/* This displays the specified page, doing the appropriate Bonobo activation/deactivation
magic to make sure things work nicely. FIXME: Crappy way to solve the issue. */
static void
set_current_notebook_page (EShellView *shell_view,
int page_num)
{
EShellViewPrivate *priv;
GtkNotebook *notebook;
GtkWidget *current;
BonoboControlFrame *control_frame;
int current_page;
priv = shell_view->priv;
notebook = GTK_NOTEBOOK (priv->notebook);
current_page = gtk_notebook_get_current_page (notebook);
if (current_page == page_num)
return;
if (current_page != -1 && current_page != 0) {
current = gtk_notebook_get_nth_page (notebook, current_page);
control_frame = bonobo_widget_get_control_frame (BONOBO_WIDGET (current));
bonobo_control_frame_set_autoactivate (control_frame, FALSE);
bonobo_control_frame_control_deactivate (control_frame);
}
gtk_notebook_set_page (notebook, page_num);
if (page_num == -1 || page_num == 0)
return;
current = gtk_notebook_get_nth_page (notebook, page_num);
control_frame = bonobo_widget_get_control_frame (BONOBO_WIDGET (current));
bonobo_control_frame_set_autoactivate (control_frame, FALSE);
bonobo_control_frame_control_activate (control_frame);
}
static void
show_error (EShellView *shell_view,
const char *uri)
{
EShellViewPrivate *priv;
GtkWidget *label;
GtkNotebook *notebook;
char *s;
priv = shell_view->priv;
s = g_strdup_printf (_("Cannot open location: %s\n"), uri);
label = gtk_label_new (s);
g_free (s);
gtk_widget_show (label);
notebook = GTK_NOTEBOOK (priv->notebook);
gtk_notebook_remove_page (notebook, 0);
gtk_notebook_prepend_page (notebook, label, NULL);
gtk_notebook_set_page (notebook, 0);
}
/* Create a new view for @uri with @control. It assumes a view for @uri does not exist yet. */
static GtkWidget *
get_control_for_uri (EShellView *shell_view,
const char *uri)
{
EShellViewPrivate *priv;
EFolderTypeRegistry *folder_type_registry;
EStorageSet *storage_set;
EFolder *folder;
Bonobo_UIHandler corba_uih;
BonoboObjectClient *handler_client;
Bonobo_Control corba_control;
Evolution_ShellComponent handler;
const char *path;
const char *folder_type;
GtkWidget *control;
CORBA_Environment ev;
priv = shell_view->priv;
path = strchr (uri, ':');
if (path == NULL)
return NULL;
path++;
if (*path == '\0')
return NULL;
storage_set = e_shell_get_storage_set (priv->shell);
folder_type_registry = e_shell_get_folder_type_registry (priv->shell);
folder = e_storage_set_get_folder (storage_set, path);
if (folder == NULL)
return NULL;
folder_type = e_folder_get_type_string (folder);
if (folder_type == NULL)
return NULL;
handler_client = e_folder_type_registry_get_handler_for_type (folder_type_registry, folder_type);
if (handler_client == NULL)
return NULL;
handler = bonobo_object_corba_objref (BONOBO_OBJECT (handler_client));
if (handler_client == CORBA_OBJECT_NIL)
return NULL;
CORBA_exception_init (&ev);
corba_control = Evolution_ShellComponent_create_view (handler, e_folder_get_physical_uri (folder), &ev);
if (ev._major != CORBA_NO_EXCEPTION) {
CORBA_exception_free (&ev);
return NULL;
}
CORBA_exception_free (&ev);
corba_uih = bonobo_object_corba_objref (BONOBO_OBJECT (priv->uih));
control = bonobo_widget_new_control_from_objref (corba_control, corba_uih);
return control;
}
static gboolean
show_existing_view (EShellView *shell_view,
const char *uri,
GtkWidget *control)
{
EShellViewPrivate *priv;
int notebook_page;
g_print ("Already have view for %s\n", uri);
priv = shell_view->priv;
notebook_page = gtk_notebook_page_num (GTK_NOTEBOOK (priv->notebook), control);
g_assert (notebook_page != -1);
/* A BonoboWidget can be a "zombie" in the sense that its actual
control is dead; if it's zombie, we have to recreate it. */
if (bonobo_widget_is_dead (BONOBO_WIDGET (control))) {
GtkWidget *parent;
Bonobo_UIHandler uih;
parent = control->parent;
uih = bonobo_object_corba_objref (BONOBO_OBJECT (priv->uih));
/* Out with the old. */
gtk_container_remove (GTK_CONTAINER (parent), control);
g_hash_table_remove (priv->uri_to_control, uri);
/* In with the new. */
control = get_control_for_uri (shell_view, uri);
if (control == NULL)
return FALSE;
gtk_container_add (GTK_CONTAINER (parent), control);
g_hash_table_insert (priv->uri_to_control, g_strdup (uri), control);
/* Show. */
gtk_widget_show (control);
}
set_current_notebook_page (shell_view, notebook_page);
return TRUE;
}
static gboolean
create_new_view_for_uri (EShellView *shell_view,
const char *uri)
{
GtkWidget *control;
EShellViewPrivate *priv;
int page_num;
priv = shell_view->priv;
control = get_control_for_uri (shell_view, uri);
if (control == NULL) {
show_error (shell_view, uri);
return FALSE;
}
gtk_widget_show (control);
gtk_notebook_append_page (GTK_NOTEBOOK (priv->notebook), control, NULL);
page_num = gtk_notebook_page_num (GTK_NOTEBOOK (priv->notebook), control);
g_assert (page_num != -1);
set_current_notebook_page (shell_view, page_num);
g_hash_table_insert (priv->uri_to_control, g_strdup (uri), control);
return TRUE;
}
gboolean
e_shell_view_display_uri (EShellView *shell_view,
const char *uri)
{
EShellViewPrivate *priv;
GtkWidget *control;
gboolean retval;
g_return_val_if_fail (shell_view != NULL, FALSE);
g_return_val_if_fail (E_IS_SHELL_VIEW (shell_view), FALSE);
priv = shell_view->priv;
if (uri == NULL) {
gtk_notebook_remove_page (GTK_NOTEBOOK (priv->notebook), 0);
gtk_notebook_prepend_page (GTK_NOTEBOOK (priv->notebook),
create_label_for_empty_page (), NULL);
set_current_notebook_page (shell_view, 0);
if (priv->uri != NULL) {
g_free (priv->uri);
priv->uri = NULL;
}
retval = TRUE;
goto end;
}
g_free (priv->uri);
priv->uri = g_strdup (uri);
if (strncmp (uri, EVOLUTION_URI_PREFIX, EVOLUTION_URI_PREFIX_LEN) != 0) {
show_error (shell_view, uri);
return FALSE;
}
control = g_hash_table_lookup (priv->uri_to_control, uri);
if (control != NULL) {
g_assert (GTK_IS_WIDGET (control));
show_existing_view (shell_view, uri, control);
retval = TRUE;
goto end;
}
if (! create_new_view_for_uri (shell_view, uri)) {
show_error (shell_view, uri);
retval = FALSE;
goto end;
}
retval = TRUE;
end:
update_for_current_uri (shell_view);
return retval;
}
void
e_shell_view_show_shortcuts (EShellView *shell_view,
gboolean show)
{
EShellViewPrivate *priv;
g_return_if_fail (shell_view != NULL);
g_return_if_fail (E_IS_SHELL_VIEW (shell_view));
priv = shell_view->priv;
if (show) {
if (! GTK_WIDGET_VISIBLE (priv->shortcut_bar_box)) {
gtk_widget_show (priv->shortcut_bar_box);
e_paned_set_position (E_PANED (priv->hpaned1), priv->hpaned1_position);
}
} else {
if (GTK_WIDGET_VISIBLE (priv->shortcut_bar_box)) {
gtk_widget_hide (priv->shortcut_bar_box);
/* FIXME this is a private field! */
priv->hpaned1_position = E_PANED (priv->hpaned1)->child1_size;
e_paned_set_position (E_PANED (priv->hpaned1), 0);
}
}
}
void
e_shell_view_show_folders (EShellView *shell_view,
gboolean show)
{
EShellViewPrivate *priv;
g_return_if_fail (shell_view != NULL);
g_return_if_fail (E_IS_SHELL_VIEW (shell_view));
priv = shell_view->priv;
if (show) {
if (! GTK_WIDGET_VISIBLE (priv->storage_set_view_box)) {
gtk_widget_show (priv->storage_set_view_box);
e_paned_set_position (E_PANED (priv->hpaned2), priv->hpaned2_position);
}
} else {
if (GTK_WIDGET_VISIBLE (priv->storage_set_view_box)) {
gtk_widget_hide (priv->storage_set_view_box);
/* FIXME this is a private field! */
priv->hpaned2_position = E_PANED (priv->hpaned2)->child1_size;
e_paned_set_position (E_PANED (priv->hpaned2), 0);
}
}
}
EShell *
e_shell_view_get_shell (EShellView *shell_view)
{
g_return_val_if_fail (shell_view != NULL, NULL);
g_return_val_if_fail (E_IS_SHELL_VIEW (shell_view), NULL);
return shell_view->priv->shell;
}
E_MAKE_TYPE (e_shell_view, "EShellView", EShellView, class_init, init, PARENT_TYPE)