path: root/mail/em-account-prefs.c

/*
 * em-account-prefs.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)
 *
 */

/* XXX EAccountManager handles all the user interface stuff.  This subclass
 *     applies policies using mailer resources that EAccountManager does not
 *     have access to.  The desire is to someday move account management
 *     completely out of the mailer, perhaps to evolution-data-server. */

#include "em-account-prefs.h"

#ifdef HAVE_CONFIG_H
#include <config.h>
#endif

#include <camel/camel-url.h>

#include <glib/gi18n.h>

#include "e-util/e-error.h"

#include "em-config.h"
#include "em-account-editor.h"
#include "e-mail-shell-backend.h"

#define EM_ACCOUNT_PREFS_GET_PRIVATE(obj) \
    (G_TYPE_INSTANCE_GET_PRIVATE \
    ((obj), EM_TYPE_ACCOUNT_PREFS, EMAccountPrefsPrivate))

struct _EMAccountPrefsPrivate {
    gpointer druid;   /* weak pointer */
    gpointer editor;  /* weak pointer */
};

static gpointer parent_class;

static void
account_prefs_enable_account_cb (EAccountTreeView *tree_view)
{
    EAccount *account;

    account = e_account_tree_view_get_selected (tree_view);
    g_return_if_fail (account != NULL);

    e_mail_shell_backend_load_store_by_uri (
        global_mail_shell_backend,
        account->source->url, account->name);
}

static void
account_prefs_disable_account_cb (EAccountTreeView *tree_view)
{
    EAccountList *account_list;
    EAccount *account;
    gpointer parent;
    gint response;

    account = e_account_tree_view_get_selected (tree_view);
    g_return_if_fail (account != NULL);

    account_list = e_account_tree_view_get_account_list (tree_view);
    g_return_if_fail (account_list != NULL);

    if (!e_account_list_account_has_proxies (account_list, account))
        return;

    parent = gtk_widget_get_toplevel (GTK_WIDGET (tree_view));
    parent = GTK_WIDGET_TOPLEVEL (parent) ? parent : NULL;

    response = e_error_run (
        parent, "mail:ask-delete-proxy-accounts", NULL);

    if (response != GTK_RESPONSE_YES) {
        g_signal_stop_emission_by_name (tree_view, "disable-account");
        return;
    }

    e_account_list_remove_account_proxies (account_list, account);

    e_mail_shell_backend_remove_store_by_uri (
        global_mail_shell_backend, account->source->url);
}

static void
account_prefs_add_account (EAccountManager *manager)
{
    EMAccountPrefsPrivate *priv;
    EMAccountEditor *emae;
    gpointer parent;

    priv = EM_ACCOUNT_PREFS_GET_PRIVATE (manager);

    if (priv->druid != NULL) {
        gtk_window_present (GTK_WINDOW (priv->druid));
        return;
    }

    parent = gtk_widget_get_toplevel (GTK_WIDGET (manager));
    parent = GTK_WIDGET_TOPLEVEL (parent) ? parent : NULL;

    /** @HookPoint-EMConfig: New Mail Account Druid
     * @Id: org.gnome.evolution.mail.config.accountDruid
     * @Type: E_CONFIG_DRUID
     * @Class: org.gnome.evolution.mail.config:1.0
     * @Target: EMConfigTargetAccount
     *
     * The new mail account druid.
     */
    emae = em_account_editor_new (
        NULL, EMAE_DRUID,
        "org.gnome.evolution.mail.config.accountDruid");
    priv->druid = emae->editor;

    g_object_add_weak_pointer (G_OBJECT (priv->druid), &priv->druid);
    gtk_window_set_transient_for (GTK_WINDOW (priv->druid), parent);
    gtk_widget_show (priv->druid);
}

static void
account_prefs_edit_account (EAccountManager *manager)
{
    EMAccountPrefsPrivate *priv;
    EMAccountEditor *emae;
    EAccountTreeView *tree_view;
    EAccountList *account_list;
    EAccount *account;
    gpointer parent;

    priv = EM_ACCOUNT_PREFS_GET_PRIVATE (manager);

    if (priv->editor != NULL) {
        gtk_window_present (GTK_WINDOW (priv->editor));
        return;
    }

    account_list = e_account_manager_get_account_list (manager);
    tree_view = e_account_manager_get_tree_view (manager);
    account = e_account_tree_view_get_selected (tree_view);
    g_return_if_fail (account != NULL);

    parent = gtk_widget_get_toplevel (GTK_WIDGET (manager));
    parent = GTK_WIDGET_TOPLEVEL (parent) ? parent : NULL;

    /** @HookPoint-EMConfig: Mail Account Editor
     * @Id: org.gnome.evolution.mail.config.accountEditor
     * @Type: E_CONFIG_BOOK
     * @Class: org.gnome.evolution.mail.config:1.0
     * @Target: EMConfigTargetAccount
     *
     * The account editor window.
     */
    emae = em_account_editor_new (
        account, EMAE_NOTEBOOK,
        "org.gnome.evolution.mail.config.accountEditor");
    priv->editor = emae->editor;

    g_object_add_weak_pointer (G_OBJECT (priv->editor), &priv->editor);
    gtk_window_set_transient_for (GTK_WINDOW (priv->editor), parent);
    gtk_widget_show (priv->editor);
}

static void
account_prefs_delete_account (EAccountManager *manager)
{
    EMAccountPrefsPrivate *priv;
    EAccountTreeView *tree_view;
    EAccountList *account_list;
    EAccount *account;
    gboolean has_proxies;
    gpointer parent;
    gint response;

    priv = EM_ACCOUNT_PREFS_GET_PRIVATE (manager);

    account_list = e_account_manager_get_account_list (manager);
    tree_view = e_account_manager_get_tree_view (manager);
    account = e_account_tree_view_get_selected (tree_view);
    g_return_if_fail (account != NULL);

    /* Make sure we aren't editing anything... */
    if (priv->editor != NULL)
        return;

    parent = gtk_widget_get_toplevel (GTK_WIDGET (manager));
    parent = GTK_WIDGET_TOPLEVEL (parent) ? parent : NULL;

    has_proxies =
        e_account_list_account_has_proxies (account_list, account);

    response = e_error_run (
        parent, has_proxies ?
        "mail:ask-delete-account-with-proxies" :
        "mail:ask-delete-account", NULL);

    if (response != GTK_RESPONSE_YES) {
        g_signal_stop_emission_by_name (manager, "delete-account");
        return;
    }

    /* Remove the account from the folder tree. */
    if (account->enabled && account->source && account->source->url)
        e_mail_shell_backend_remove_store_by_uri (
            global_mail_shell_backend, account->source->url);

    /* Remove all the proxies the account has created. */
    if (has_proxies)
        e_account_list_remove_account_proxies (account_list, account);

    /* Remove it from the config file. */
    e_account_list_remove (account_list, account);

    e_account_list_save (account_list);
}

static void
account_prefs_dispose (GObject *object)
{
    EMAccountPrefsPrivate *priv;

    priv = EM_ACCOUNT_PREFS_GET_PRIVATE (object);

    if (priv->druid != NULL) {
        g_object_remove_weak_pointer (
            G_OBJECT (priv->druid), &priv->druid);
        priv->druid = NULL;
    }

    if (priv->editor != NULL) {
        g_object_remove_weak_pointer (
            G_OBJECT (priv->editor), &priv->editor);
        priv->editor = NULL;
    }

    /* Chain up to parent's dispose() method. */
    G_OBJECT_CLASS (parent_class)->dispose (object);
}

static void
account_prefs_class_init (EMAccountPrefsClass *class)
{
    GObjectClass *object_class;
    EAccountManagerClass *account_manager_class;

    parent_class = g_type_class_peek_parent (class);
    g_type_class_add_private (class, sizeof (EMAccountPrefsPrivate));

    object_class = G_OBJECT_CLASS (class);
    object_class->dispose = account_prefs_dispose;

    account_manager_class = E_ACCOUNT_MANAGER_CLASS (class);
    account_manager_class->add_account = account_prefs_add_account;
    account_manager_class->edit_account = account_prefs_edit_account;
    account_manager_class->delete_account = account_prefs_delete_account;
}

static void
account_prefs_init (EMAccountPrefs *prefs)
{
    EAccountManager *manager;
    EAccountTreeView *tree_view;

    prefs->priv = EM_ACCOUNT_PREFS_GET_PRIVATE (prefs);

    manager = E_ACCOUNT_MANAGER (prefs);
    tree_view = e_account_manager_get_tree_view (manager);

    g_signal_connect (
        tree_view, "enable-account",
        G_CALLBACK (account_prefs_enable_account_cb), NULL);

    g_signal_connect (
        tree_view, "disable-account",
        G_CALLBACK (account_prefs_disable_account_cb), NULL);
}

GType
em_account_prefs_get_type (void)
{
    static GType type = 0;

    if (G_UNLIKELY (type == 0)) {
        static const GTypeInfo type_info = {
            sizeof (EMAccountPrefsClass),
            (GBaseInitFunc) NULL,
            (GBaseFinalizeFunc) NULL,
            (GClassInitFunc) account_prefs_class_init,
            (GClassFinalizeFunc) NULL,
            NULL,  /* class_data */
            sizeof (EMAccountPrefs),
            0,     /* n_preallocs */
            (GInstanceInitFunc) account_prefs_init,
            NULL   /* value_table */
        };

        type = g_type_register_static (
            E_TYPE_ACCOUNT_MANAGER, "EMAccountPrefs",
            &type_info, 0);
    }

    return type;
}

GtkWidget *
em_account_prefs_new (EAccountList *account_list)
{
    g_return_val_if_fail (E_IS_ACCOUNT_LIST (account_list), NULL);

    return g_object_new (
        EM_TYPE_ACCOUNT_PREFS, "account-list", account_list, NULL);
}