diff options
Diffstat (limited to 'mail/e-mail-browser.c')
| -rw-r--r-- | mail/e-mail-browser.c | 1166 |
1 files changed, 1166 insertions, 0 deletions
diff --git a/mail/e-mail-browser.c b/mail/e-mail-browser.c new file mode 100644 index 0000000000..052d08a0dc --- /dev/null +++ b/mail/e-mail-browser.c @@ -0,0 +1,1166 @@ +/* + * e-mail-browser.c + * + * This program is free software; you can redistribute it and/or + * modify it under the terms of the GNU Lesser General Public + * License as published by the Free Software Foundation; either + * version 2 of the License, or (at your option) version 3. + * + * 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 + * Lesser General Public License for more details. + * + * You should have received a copy of the GNU Lesser General Public + * License along with the program; if not, see <http://www.gnu.org/licenses/> + * + * + * Copyright (C) 1999-2008 Novell, Inc. (www.novell.com) + * + */ + +#ifdef HAVE_CONFIG_H +#include <config.h> +#endif + +#include "e-mail-browser.h" + +#include <string.h> +#include <glib/gi18n.h> + +#include <shell/e-shell.h> +#include <shell/e-shell-utils.h> + +#include <em-format/e-mail-formatter-enumtypes.h> + +#include "e-mail-reader.h" +#include "e-mail-reader-utils.h" +#include "em-folder-tree-model.h" +#include "message-list.h" + +#define E_MAIL_BROWSER_GET_PRIVATE(obj) \ + (G_TYPE_INSTANCE_GET_PRIVATE \ + ((obj), E_TYPE_MAIL_BROWSER, EMailBrowserPrivate)) + +#define ACTION_GROUP_STANDARD "action-group-standard" +#define ACTION_GROUP_SEARCH_FOLDERS "action-group-search-folders" + +struct _EMailBrowserPrivate { + EMailBackend *backend; + GtkUIManager *ui_manager; + EFocusTracker *focus_tracker; + + EMailFormatterMode display_mode; + EAutomaticActionPolicy close_on_reply_policy; + + GtkWidget *main_menu; + GtkWidget *main_toolbar; + GtkWidget *message_list; + GtkWidget *preview_pane; + GtkWidget *statusbar; + + EAlert *close_on_reply_alert; + gulong close_on_reply_response_handler_id; + + guint show_deleted : 1; +}; + +enum { + PROP_0, + PROP_BACKEND, + PROP_CLOSE_ON_REPLY_POLICY, + PROP_DISPLAY_MODE, + PROP_FOCUS_TRACKER, + PROP_FORWARD_STYLE, + PROP_GROUP_BY_THREADS, + PROP_REPLY_STYLE, + PROP_SHOW_DELETED, + PROP_UI_MANAGER +}; + +/* This is too trivial to put in a file. + * It gets merged with the EMailReader UI. */ +static const gchar *ui = +"<ui>" +" <menubar name='main-menu'>" +" <menu action='file-menu'>" +" <placeholder name='file-actions'/>" +" <placeholder name='print-actions'/>" +" <separator/>" +" <menuitem action='close'/>" +" </menu>" +" <menu action='edit-menu'>" +" <placeholder name='selection-actions'>" +" <menuitem action='cut-clipboard'/>" +" <menuitem action='copy-clipboard'/>" +" <menuitem action='paste-clipboard'/>" +" <separator/>" +" <menuitem action='select-all'/>" +" </placeholder>" +" </menu>" +" </menubar>" +"</ui>"; + +static void e_mail_browser_reader_init + (EMailReaderInterface *interface); + +G_DEFINE_TYPE_WITH_CODE ( + EMailBrowser, + e_mail_browser, + GTK_TYPE_WINDOW, + G_IMPLEMENT_INTERFACE ( + E_TYPE_MAIL_READER, e_mail_browser_reader_init) + G_IMPLEMENT_INTERFACE ( + E_TYPE_EXTENSIBLE, NULL)) + +static void +action_close_cb (GtkAction *action, + EMailBrowser *browser) +{ + e_mail_browser_close (browser); +} + +static GtkActionEntry mail_browser_entries[] = { + + { "close", + GTK_STOCK_CLOSE, + NULL, + NULL, + N_("Close this window"), + G_CALLBACK (action_close_cb) }, + + { "copy-clipboard", + GTK_STOCK_COPY, + NULL, + NULL, + N_("Copy the selection"), + NULL }, /* Handled by EFocusTracker */ + + { "cut-clipboard", + GTK_STOCK_CUT, + NULL, + NULL, + N_("Cut the selection"), + NULL }, /* Handled by EFocusTracker */ + + { "paste-clipboard", + GTK_STOCK_PASTE, + NULL, + NULL, + N_("Paste the clipboard"), + NULL }, /* Handled by EFocusTracker */ + + { "select-all", + GTK_STOCK_SELECT_ALL, + NULL, + NULL, + N_("Select all text"), + NULL }, /* Handled by EFocusTracker */ + + /*** Menus ***/ + + { "file-menu", + NULL, + N_("_File"), + NULL, + NULL, + NULL }, + + { "edit-menu", + NULL, + N_("_Edit"), + NULL, + NULL, + NULL }, + + { "view-menu", + NULL, + N_("_View"), + NULL, + NULL, + NULL } +}; + +static EPopupActionEntry mail_browser_popup_entries[] = { + + { "popup-copy-clipboard", + NULL, + "copy-clipboard" } +}; + +static void +mail_browser_menu_item_select_cb (EMailBrowser *browser, + GtkWidget *widget) +{ + GtkAction *action; + GtkActivatable *activatable; + GtkStatusbar *statusbar; + const gchar *tooltip; + guint context_id; + gpointer data; + + activatable = GTK_ACTIVATABLE (widget); + action = gtk_activatable_get_related_action (activatable); + tooltip = gtk_action_get_tooltip (action); + + data = g_object_get_data (G_OBJECT (widget), "context-id"); + context_id = GPOINTER_TO_UINT (data); + + if (tooltip == NULL) + return; + + statusbar = GTK_STATUSBAR (browser->priv->statusbar); + gtk_statusbar_push (statusbar, context_id, tooltip); +} + +static void +mail_browser_menu_item_deselect_cb (EMailBrowser *browser, + GtkWidget *menu_item) +{ + GtkStatusbar *statusbar; + guint context_id; + gpointer data; + + data = g_object_get_data (G_OBJECT (menu_item), "context-id"); + context_id = GPOINTER_TO_UINT (data); + + statusbar = GTK_STATUSBAR (browser->priv->statusbar); + gtk_statusbar_pop (statusbar, context_id); +} + +static void +mail_browser_connect_proxy_cb (EMailBrowser *browser, + GtkAction *action, + GtkWidget *proxy) +{ + GtkStatusbar *statusbar; + guint context_id; + + if (!GTK_IS_MENU_ITEM (proxy)) + return; + + statusbar = GTK_STATUSBAR (browser->priv->statusbar); + context_id = gtk_statusbar_get_context_id (statusbar, G_STRFUNC); + + g_object_set_data ( + G_OBJECT (proxy), "context-id", + GUINT_TO_POINTER (context_id)); + + g_signal_connect_swapped ( + proxy, "select", + G_CALLBACK (mail_browser_menu_item_select_cb), browser); + + g_signal_connect_swapped ( + proxy, "deselect", + G_CALLBACK (mail_browser_menu_item_deselect_cb), browser); +} + +static void +mail_browser_message_selected_cb (EMailBrowser *browser, + const gchar *uid) +{ + CamelMessageInfo *info; + CamelFolder *folder; + EMailReader *reader; + guint32 state; + + reader = E_MAIL_READER (browser); + state = e_mail_reader_check_state (reader); + e_mail_reader_update_actions (reader, state); + + if (uid == NULL) + return; + + folder = e_mail_reader_ref_folder (reader); + + info = camel_folder_get_message_info (folder, uid); + + if (info != NULL) { + EMailDisplay *display; + const gchar *title; + + display = e_mail_reader_get_mail_display (reader); + + title = camel_message_info_subject (info); + if (title == NULL || *title == '\0') + title = _("(No Subject)"); + + gtk_window_set_title (GTK_WINDOW (browser), title); + gtk_widget_grab_focus (GTK_WIDGET (display)); + + camel_message_info_set_flags ( + info, CAMEL_MESSAGE_SEEN, CAMEL_MESSAGE_SEEN); + + camel_folder_free_message_info (folder, info); + } + + g_clear_object (&folder); +} + +static gboolean +close_on_idle_cb (gpointer browser) +{ + e_mail_browser_close (browser); + return FALSE; +} + +static void +mail_browser_message_list_built_cb (EMailBrowser *browser, + MessageList *message_list) +{ + g_return_if_fail (E_IS_MAIL_BROWSER (browser)); + g_return_if_fail (IS_MESSAGE_LIST (message_list)); + + if (message_list_count (message_list) == 0) + /* Prioritize ahead of GTK+ redraws. */ + g_idle_add_full ( + G_PRIORITY_HIGH_IDLE, + close_on_idle_cb, browser, NULL); +} + +static gboolean +mail_browser_popup_event_cb (EMailBrowser *browser, + const gchar *uri) +{ + EMailReader *reader; + EWebView *web_view; + GtkMenu *menu; + guint32 state; + + if (uri != NULL) + return FALSE; + + reader = E_MAIL_READER (browser); + web_view = E_WEB_VIEW (e_mail_reader_get_mail_display (reader)); + + if (e_web_view_get_cursor_image_src (web_view) != NULL) + return FALSE; + + menu = e_mail_reader_get_popup_menu (reader); + + state = e_mail_reader_check_state (reader); + e_mail_reader_update_actions (reader, state); + + gtk_menu_popup ( + menu, NULL, NULL, NULL, NULL, + 0, gtk_get_current_event_time ()); + + return TRUE; +} + +static void +mail_browser_status_message_cb (EMailBrowser *browser, + const gchar *status_message) +{ + GtkStatusbar *statusbar; + guint context_id; + + statusbar = GTK_STATUSBAR (browser->priv->statusbar); + context_id = gtk_statusbar_get_context_id (statusbar, G_STRFUNC); + + /* Always pop first. This prevents messages from piling up. */ + gtk_statusbar_pop (statusbar, context_id); + + if (status_message != NULL && *status_message != '\0') + gtk_statusbar_push (statusbar, context_id, status_message); +} + +static void +mail_browser_close_on_reply_response_cb (EAlert *alert, + gint response_id, + EMailBrowser *browser) +{ + /* Disconnect the signal handler, but leave the EAlert + * itself in place so we know it's already been presented. */ + g_signal_handler_disconnect ( + browser->priv->close_on_reply_alert, + browser->priv->close_on_reply_response_handler_id); + browser->priv->close_on_reply_response_handler_id = 0; + + if (response_id == GTK_RESPONSE_YES) { + e_mail_browser_set_close_on_reply_policy ( + browser, E_AUTOMATIC_ACTION_POLICY_ALWAYS); + e_mail_browser_close (browser); + } + + if (response_id == GTK_RESPONSE_NO) { + e_mail_browser_set_close_on_reply_policy ( + browser, E_AUTOMATIC_ACTION_POLICY_NEVER); + } +} + +static void +mail_browser_set_backend (EMailBrowser *browser, + EMailBackend *backend) +{ + g_return_if_fail (E_IS_MAIL_BACKEND (backend)); + g_return_if_fail (browser->priv->backend == NULL); + + browser->priv->backend = g_object_ref (backend); +} + +static void +mail_browser_set_display_mode (EMailBrowser *browser, + EMailFormatterMode display_mode) +{ + browser->priv->display_mode = display_mode; +} + +static void +mail_browser_set_property (GObject *object, + guint property_id, + const GValue *value, + GParamSpec *pspec) +{ + switch (property_id) { + case PROP_BACKEND: + mail_browser_set_backend ( + E_MAIL_BROWSER (object), + g_value_get_object (value)); + return; + + case PROP_CLOSE_ON_REPLY_POLICY: + e_mail_browser_set_close_on_reply_policy ( + E_MAIL_BROWSER (object), + g_value_get_enum (value)); + return; + + case PROP_DISPLAY_MODE: + mail_browser_set_display_mode ( + E_MAIL_BROWSER (object), + g_value_get_enum (value)); + return; + + case PROP_FORWARD_STYLE: + e_mail_reader_set_forward_style ( + E_MAIL_READER (object), + g_value_get_enum (value)); + return; + + case PROP_GROUP_BY_THREADS: + e_mail_reader_set_group_by_threads ( + E_MAIL_READER (object), + g_value_get_boolean (value)); + return; + + case PROP_REPLY_STYLE: + e_mail_reader_set_reply_style ( + E_MAIL_READER (object), + g_value_get_enum (value)); + return; + + case PROP_SHOW_DELETED: + e_mail_browser_set_show_deleted ( + E_MAIL_BROWSER (object), + g_value_get_boolean (value)); + return; + } + + G_OBJECT_WARN_INVALID_PROPERTY_ID (object, property_id, pspec); +} + +static void +mail_browser_get_property (GObject *object, + guint property_id, + GValue *value, + GParamSpec *pspec) +{ + switch (property_id) { + case PROP_BACKEND: + g_value_set_object ( + value, + e_mail_reader_get_backend ( + E_MAIL_READER (object))); + return; + + case PROP_CLOSE_ON_REPLY_POLICY: + g_value_set_enum ( + value, + e_mail_browser_get_close_on_reply_policy ( + E_MAIL_BROWSER (object))); + return; + + case PROP_DISPLAY_MODE: + g_value_set_enum ( + value, + e_mail_browser_get_display_mode ( + E_MAIL_BROWSER (object))); + return; + + case PROP_FOCUS_TRACKER: + g_value_set_object ( + value, + e_mail_browser_get_focus_tracker ( + E_MAIL_BROWSER (object))); + return; + + case PROP_FORWARD_STYLE: + g_value_set_enum ( + value, + e_mail_reader_get_forward_style ( + E_MAIL_READER (object))); + return; + + case PROP_GROUP_BY_THREADS: + g_value_set_boolean ( + value, + e_mail_reader_get_group_by_threads ( + E_MAIL_READER (object))); + return; + + case PROP_REPLY_STYLE: + g_value_set_enum ( + value, + e_mail_reader_get_reply_style ( + E_MAIL_READER (object))); + return; + + case PROP_SHOW_DELETED: + g_value_set_boolean ( + value, + e_mail_browser_get_show_deleted ( + E_MAIL_BROWSER (object))); + return; + + case PROP_UI_MANAGER: + g_value_set_object ( + value, + e_mail_browser_get_ui_manager ( + E_MAIL_BROWSER (object))); + return; + } + + G_OBJECT_WARN_INVALID_PROPERTY_ID (object, property_id, pspec); +} + +static void +mail_browser_dispose (GObject *object) +{ + EMailBrowserPrivate *priv; + + priv = E_MAIL_BROWSER_GET_PRIVATE (object); + + if (priv->close_on_reply_response_handler_id > 0) { + g_signal_handler_disconnect ( + priv->close_on_reply_alert, + priv->close_on_reply_response_handler_id); + priv->close_on_reply_response_handler_id = 0; + } + + g_clear_object (&priv->backend); + g_clear_object (&priv->ui_manager); + g_clear_object (&priv->focus_tracker); + g_clear_object (&priv->main_menu); + g_clear_object (&priv->main_toolbar); + g_clear_object (&priv->preview_pane); + g_clear_object (&priv->statusbar); + g_clear_object (&priv->close_on_reply_alert); + + if (priv->message_list != NULL) { + /* This will cancel a regen operation. */ + gtk_widget_destroy (priv->message_list); + priv->message_list = NULL; + } + + /* Chain up to parent's dispose() method. */ + G_OBJECT_CLASS (e_mail_browser_parent_class)->dispose (object); +} + +static void +mail_browser_constructed (GObject *object) +{ + EMailBrowser *browser; + EMailReader *reader; + EMailBackend *backend; + EMailSession *session; + EShellBackend *shell_backend; + EShell *shell; + EFocusTracker *focus_tracker; + GtkAccelGroup *accel_group; + GtkActionGroup *action_group; + GtkAction *action; + GtkUIManager *ui_manager; + GtkWidget *container; + GtkWidget *display; + GtkWidget *widget; + const gchar *domain; + const gchar *id; + guint merge_id; + + /* Chain up to parent's constructed() method. */ + G_OBJECT_CLASS (e_mail_browser_parent_class)->constructed (object); + + browser = E_MAIL_BROWSER (object); + reader = E_MAIL_READER (object); + backend = e_mail_reader_get_backend (reader); + session = e_mail_backend_get_session (backend); + + shell_backend = E_SHELL_BACKEND (backend); + shell = e_shell_backend_get_shell (shell_backend); + + ui_manager = gtk_ui_manager_new (); + + browser->priv->ui_manager = ui_manager; + domain = GETTEXT_PACKAGE; + + gtk_application_add_window ( + GTK_APPLICATION (shell), GTK_WINDOW (object)); + + /* The message list is a widget, but it is not shown in the browser. + * Unfortunately, the widget is inseparable from its model, and the + * model is all we need. */ + browser->priv->message_list = message_list_new (session); + g_object_ref_sink (browser->priv->message_list); + + g_signal_connect_swapped ( + browser->priv->message_list, "message-selected", + G_CALLBACK (mail_browser_message_selected_cb), object); + + g_signal_connect_swapped ( + browser->priv->message_list, "message-list-built", + G_CALLBACK (mail_browser_message_list_built_cb), object); + + display = e_mail_display_new (); + + e_mail_display_set_mode ( + E_MAIL_DISPLAY (display), + browser->priv->display_mode); + + g_signal_connect_swapped ( + display, "popup-event", + G_CALLBACK (mail_browser_popup_event_cb), object); + + g_signal_connect_swapped ( + display, "status-message", + G_CALLBACK (mail_browser_status_message_cb), object); + + widget = e_preview_pane_new (E_WEB_VIEW (display)); + browser->priv->preview_pane = g_object_ref (widget); + gtk_widget_show (widget); + + action_group = gtk_action_group_new (ACTION_GROUP_STANDARD); + gtk_action_group_set_translation_domain (action_group, domain); + gtk_action_group_add_actions ( + action_group, mail_browser_entries, + G_N_ELEMENTS (mail_browser_entries), object); + e_action_group_add_popup_actions ( + action_group, mail_browser_popup_entries, + G_N_ELEMENTS (mail_browser_popup_entries)); + gtk_ui_manager_insert_action_group (ui_manager, action_group, 0); + + /* For easy access. Takes ownership of the reference. */ + g_object_set_data_full ( + object, ACTION_GROUP_STANDARD, + action_group, (GDestroyNotify) g_object_unref); + + action_group = gtk_action_group_new (ACTION_GROUP_SEARCH_FOLDERS); + gtk_action_group_set_translation_domain (action_group, domain); + gtk_ui_manager_insert_action_group (ui_manager, action_group, 0); + + /* For easy access. Takes ownership of the reference. */ + g_object_set_data_full ( + object, ACTION_GROUP_SEARCH_FOLDERS, + action_group, (GDestroyNotify) g_object_unref); + + e_mail_reader_init (reader, TRUE, TRUE); + + e_load_ui_manager_definition (ui_manager, E_MAIL_READER_UI_DEFINITION); + gtk_ui_manager_add_ui_from_string (ui_manager, ui, -1, NULL); + + merge_id = gtk_ui_manager_new_merge_id (ui_manager); + e_mail_reader_create_charset_menu (reader, ui_manager, merge_id); + + accel_group = gtk_ui_manager_get_accel_group (ui_manager); + gtk_window_add_accel_group (GTK_WINDOW (object), accel_group); + + g_signal_connect_swapped ( + ui_manager, "connect-proxy", + G_CALLBACK (mail_browser_connect_proxy_cb), object); + + /* Configure an EFocusTracker to manage selection actions. */ + + focus_tracker = e_focus_tracker_new (GTK_WINDOW (object)); + action = e_mail_reader_get_action (reader, "cut-clipboard"); + e_focus_tracker_set_cut_clipboard_action (focus_tracker, action); + action = e_mail_reader_get_action (reader, "copy-clipboard"); + e_focus_tracker_set_copy_clipboard_action (focus_tracker, action); + action = e_mail_reader_get_action (reader, "paste-clipboard"); + e_focus_tracker_set_paste_clipboard_action (focus_tracker, action); + action = e_mail_reader_get_action (reader, "select-all"); + e_focus_tracker_set_select_all_action (focus_tracker, action); + browser->priv->focus_tracker = focus_tracker; + + /* Construct window widgets. */ + + widget = gtk_box_new (GTK_ORIENTATION_VERTICAL, 0); + gtk_container_add (GTK_CONTAINER (object), widget); + gtk_widget_show (widget); + + container = widget; + + widget = gtk_statusbar_new (); + gtk_box_pack_end (GTK_BOX (container), widget, FALSE, FALSE, 0); + browser->priv->statusbar = g_object_ref (widget); + gtk_widget_show (widget); + + widget = gtk_ui_manager_get_widget (ui_manager, "/main-menu"); + gtk_box_pack_start (GTK_BOX (container), widget, FALSE, FALSE, 0); + browser->priv->main_menu = g_object_ref (widget); + gtk_widget_show (widget); + + widget = gtk_ui_manager_get_widget (ui_manager, "/main-toolbar"); + gtk_box_pack_start (GTK_BOX (container), widget, FALSE, FALSE, 0); + browser->priv->main_toolbar = g_object_ref (widget); + gtk_widget_show (widget); + + gtk_style_context_add_class ( + gtk_widget_get_style_context (widget), + GTK_STYLE_CLASS_PRIMARY_TOOLBAR); + + gtk_box_pack_start ( + GTK_BOX (container), + browser->priv->preview_pane, + TRUE, TRUE, 0); + + id = "org.gnome.evolution.mail.browser"; + e_plugin_ui_register_manager (ui_manager, id, object); + e_plugin_ui_enable_manager (ui_manager, id); + + e_extensible_load_extensions (E_EXTENSIBLE (object)); +} + +static gboolean +mail_browser_key_press_event (GtkWidget *widget, + GdkEventKey *event) +{ + if (event->keyval == GDK_KEY_Escape) { + e_mail_browser_close (E_MAIL_BROWSER (widget)); + return TRUE; + } + + /* Chain up to parent's key_press_event() method. */ + return GTK_WIDGET_CLASS (e_mail_browser_parent_class)-> + key_press_event (widget, event); +} + +static GtkActionGroup * +mail_browser_get_action_group (EMailReader *reader, + EMailReaderActionGroup group) +{ + const gchar *group_name; + + switch (group) { + case E_MAIL_READER_ACTION_GROUP_STANDARD: + group_name = ACTION_GROUP_STANDARD; + break; + case E_MAIL_READER_ACTION_GROUP_SEARCH_FOLDERS: + group_name = ACTION_GROUP_SEARCH_FOLDERS; + break; + default: + g_return_val_if_reached (NULL); + } + + return g_object_get_data (G_OBJECT (reader), group_name); +} + +static EMailBackend * +mail_browser_get_backend (EMailReader *reader) +{ + EMailBrowser *browser; + + browser = E_MAIL_BROWSER (reader); + + return browser->priv->backend; +} + +static gboolean +mail_browser_get_hide_deleted (EMailReader *reader) +{ + EMailBrowser *browser; + + browser = E_MAIL_BROWSER (reader); + + return !e_mail_browser_get_show_deleted (browser); +} + +static EMailDisplay * +mail_browser_get_mail_display (EMailReader *reader) +{ + EPreviewPane *preview_pane; + EWebView *web_view; + + preview_pane = e_mail_reader_get_preview_pane (reader); + web_view = e_preview_pane_get_web_view (preview_pane); + + return E_MAIL_DISPLAY (web_view); +} + +static GtkWidget * +mail_browser_get_message_list (EMailReader *reader) +{ + EMailBrowserPrivate *priv; + + priv = E_MAIL_BROWSER_GET_PRIVATE (reader); + + return priv->message_list; +} + +static GtkMenu * +mail_browser_get_popup_menu (EMailReader *reader) +{ + EMailBrowser *browser; + GtkUIManager *ui_manager; + GtkWidget *widget; + + browser = E_MAIL_BROWSER (reader); + ui_manager = e_mail_browser_get_ui_manager (browser); + widget = gtk_ui_manager_get_widget (ui_manager, "/mail-preview-popup"); + + return GTK_MENU (widget); +} + +static EPreviewPane * +mail_browser_get_preview_pane (EMailReader *reader) +{ + EMailBrowserPrivate *priv; + + priv = E_MAIL_BROWSER_GET_PRIVATE (reader); + + return E_PREVIEW_PANE (priv->preview_pane); +} + +static GtkWindow * +mail_browser_get_window (EMailReader *reader) +{ + return GTK_WINDOW (reader); +} + +static void +mail_browser_set_message (EMailReader *reader, + const gchar *uid) +{ + EMailReaderInterface *interface; + EMailBrowser *browser; + CamelMessageInfo *info; + CamelFolder *folder; + + browser = E_MAIL_BROWSER (reader); + + /* Chain up to parent's set_message() method. */ + interface = g_type_default_interface_peek (E_TYPE_MAIL_READER); + interface->set_message (reader, uid); + + if (uid == NULL) { + e_mail_browser_close (browser); + return; + } + + folder = e_mail_reader_ref_folder (reader); + + info = camel_folder_get_message_info (folder, uid); + + if (info != NULL) { + gtk_window_set_title ( + GTK_WINDOW (reader), + camel_message_info_subject (info)); + camel_folder_free_message_info (folder, info); + } + + g_clear_object (&folder); +} + +static void +mail_browser_composer_created (EMailReader *reader, + EMsgComposer *composer, + CamelMimeMessage *message) +{ + EMailBrowser *browser; + EAutomaticActionPolicy policy; + + /* Do not prompt if there is no source message. It means + * the user wants to start a brand new message, presumably + * unrelated to the message shown in the browser window. */ + if (message == NULL) + return; + + browser = E_MAIL_BROWSER (reader); + policy = e_mail_browser_get_close_on_reply_policy (browser); + + switch (policy) { + case E_AUTOMATIC_ACTION_POLICY_ALWAYS: + e_mail_browser_close (browser); + break; + + case E_AUTOMATIC_ACTION_POLICY_NEVER: + /* do nothing */ + break; + + case E_AUTOMATIC_ACTION_POLICY_ASK: + e_mail_browser_ask_close_on_reply (browser); + break; + } +} + +static void +e_mail_browser_class_init (EMailBrowserClass *class) +{ + GObjectClass *object_class; + GtkWidgetClass *widget_class; + + g_type_class_add_private (class, sizeof (EMailBrowserPrivate)); + + object_class = G_OBJECT_CLASS (class); + object_class->set_property = mail_browser_set_property; + object_class->get_property = mail_browser_get_property; + object_class->dispose = mail_browser_dispose; + object_class->constructed = mail_browser_constructed; + + widget_class = GTK_WIDGET_CLASS (class); + widget_class->key_press_event = mail_browser_key_press_event; + + g_object_class_install_property ( + object_class, + PROP_BACKEND, + g_param_spec_object ( + "backend", + "Mail Backend", + "The mail backend", + E_TYPE_MAIL_BACKEND, + G_PARAM_READWRITE | + G_PARAM_CONSTRUCT_ONLY | + G_PARAM_STATIC_STRINGS)); + + g_object_class_install_property ( + object_class, + PROP_CLOSE_ON_REPLY_POLICY, + g_param_spec_enum ( + "close-on-reply-policy", + "Close on Reply Policy", + "Policy for automatically closing the message " + "browser window when forwarding or replying to " + "the displayed message", + E_TYPE_AUTOMATIC_ACTION_POLICY, + E_AUTOMATIC_ACTION_POLICY_ASK, + G_PARAM_READWRITE | + G_PARAM_CONSTRUCT | + G_PARAM_STATIC_STRINGS)); + + g_object_class_install_property ( + object_class, + PROP_DISPLAY_MODE, + g_param_spec_enum ( + "display-mode", + "Display Mode", + NULL, + E_TYPE_MAIL_FORMATTER_MODE, + E_MAIL_FORMATTER_MODE_NORMAL, + G_PARAM_READWRITE | + G_PARAM_CONSTRUCT_ONLY | + G_PARAM_STATIC_STRINGS)); + + g_object_class_install_property ( + object_class, + PROP_FOCUS_TRACKER, + g_param_spec_object ( + "focus-tracker", + "Focus Tracker", + NULL, + E_TYPE_FOCUS_TRACKER, + G_PARAM_READABLE | + G_PARAM_STATIC_STRINGS)); + + /* Inherited from EMailReader */ + g_object_class_override_property ( + object_class, + PROP_FORWARD_STYLE, + "forward-style"); + + /* Inherited from EMailReader */ + g_object_class_override_property ( + object_class, + PROP_GROUP_BY_THREADS, + "group-by-threads"); + + /* Inherited from EMailReader */ + g_object_class_override_property ( + object_class, + PROP_REPLY_STYLE, + "reply-style"); + + g_object_class_install_property ( + object_class, + PROP_SHOW_DELETED, + g_param_spec_boolean ( + "show-deleted", + "Show Deleted", + "Show deleted messages", + FALSE, + G_PARAM_READWRITE | + G_PARAM_STATIC_STRINGS)); + + g_object_class_install_property ( + object_class, + PROP_UI_MANAGER, + g_param_spec_object ( + "ui-manager", + "UI Manager", + NULL, + GTK_TYPE_UI_MANAGER, + G_PARAM_READABLE | + G_PARAM_STATIC_STRINGS)); +} + +static void +e_mail_browser_reader_init (EMailReaderInterface *interface) +{ + interface->get_action_group = mail_browser_get_action_group; + interface->get_backend = mail_browser_get_backend; + interface->get_mail_display = mail_browser_get_mail_display; + interface->get_hide_deleted = mail_browser_get_hide_deleted; + interface->get_message_list = mail_browser_get_message_list; + interface->get_popup_menu = mail_browser_get_popup_menu; + interface->get_preview_pane = mail_browser_get_preview_pane; + interface->get_window = mail_browser_get_window; + interface->set_message = mail_browser_set_message; + interface->composer_created = mail_browser_composer_created; +} + +static void +e_mail_browser_init (EMailBrowser *browser) +{ + browser->priv = E_MAIL_BROWSER_GET_PRIVATE (browser); + + gtk_window_set_title (GTK_WINDOW (browser), _("Evolution")); + gtk_window_set_default_size (GTK_WINDOW (browser), 600, 400); + + e_restore_window ( + GTK_WINDOW (browser), + "/org/gnome/evolution/mail/browser-window/", + E_RESTORE_WINDOW_SIZE); +} + +GtkWidget * +e_mail_browser_new (EMailBackend *backend, + CamelFolder *folder, + const gchar *msg_uid, + EMailFormatterMode display_mode) +{ + g_return_val_if_fail (E_IS_MAIL_BACKEND (backend), NULL); + + return g_object_new ( + E_TYPE_MAIL_BROWSER, + "backend", backend, + "display-mode", display_mode, + NULL); +} + +void +e_mail_browser_close (EMailBrowser *browser) +{ + g_return_if_fail (E_IS_MAIL_BROWSER (browser)); + + gtk_widget_destroy (GTK_WIDGET (browser)); +} + +void +e_mail_browser_ask_close_on_reply (EMailBrowser *browser) +{ + EAlertSink *alert_sink; + EAlert *alert; + gulong handler_id; + + g_return_if_fail (E_IS_MAIL_BROWSER (browser)); + + /* Do nothing if the question has already been presented, even if + * the user dismissed it without answering. We only present the + * question once per browser window, lest it become annoying. */ + if (browser->priv->close_on_reply_alert != NULL) + return; + + alert = e_alert_new ("mail:browser-close-on-reply", NULL); + + handler_id = g_signal_connect ( + alert, "response", + G_CALLBACK (mail_browser_close_on_reply_response_cb), + browser); + + browser->priv->close_on_reply_alert = g_object_ref (alert); + browser->priv->close_on_reply_response_handler_id = handler_id; + + alert_sink = e_mail_reader_get_alert_sink (E_MAIL_READER (browser)); + e_alert_sink_submit_alert (alert_sink, alert); + + g_object_unref (alert); +} + +EAutomaticActionPolicy +e_mail_browser_get_close_on_reply_policy (EMailBrowser *browser) +{ + g_return_val_if_fail ( + E_IS_MAIL_BROWSER (browser), + E_AUTOMATIC_ACTION_POLICY_ASK); + + return browser->priv->close_on_reply_policy; +} + +void +e_mail_browser_set_close_on_reply_policy (EMailBrowser *browser, + EAutomaticActionPolicy policy) +{ + g_return_if_fail (E_IS_MAIL_BROWSER (browser)); + + if (policy == browser->priv->close_on_reply_policy) + return; + + browser->priv->close_on_reply_policy = policy; + + g_object_notify (G_OBJECT (browser), "close-on-reply-policy"); +} + +EMailFormatterMode +e_mail_browser_get_display_mode (EMailBrowser *browser) +{ + g_return_val_if_fail ( + E_IS_MAIL_BROWSER (browser), + E_MAIL_FORMATTER_MODE_INVALID); + + return browser->priv->display_mode; +} + +EFocusTracker * +e_mail_browser_get_focus_tracker (EMailBrowser *browser) +{ + g_return_val_if_fail (E_IS_MAIL_BROWSER (browser), NULL); + + return browser->priv->focus_tracker; +} + +gboolean +e_mail_browser_get_show_deleted (EMailBrowser *browser) +{ + g_return_val_if_fail (E_IS_MAIL_BROWSER (browser), FALSE); + + return browser->priv->show_deleted; +} + +void +e_mail_browser_set_show_deleted (EMailBrowser *browser, + gboolean show_deleted) +{ + g_return_if_fail (E_IS_MAIL_BROWSER (browser)); + + if (browser->priv->show_deleted == show_deleted) + return; + + browser->priv->show_deleted = show_deleted; + + g_object_notify (G_OBJECT (browser), "show-deleted"); +} + +GtkUIManager * +e_mail_browser_get_ui_manager (EMailBrowser *browser) +{ + g_return_val_if_fail (E_IS_MAIL_BROWSER (browser), NULL); + + return browser->priv->ui_manager; +} |