path: root/shell/e-shell-folder-commands.c

/* -*- Mode: C; indent-tabs-mode: t; c-basic-offset: 8; tab-width: 8 -*- */
/* e-shell-folder-commands.h
 *
 * Copyright (C) 2001  Ximian, 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.
 *
 * Author: Ettore Perazzoli
 */

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

#include "e-shell-folder-commands.h"

#include <gal/widgets/e-gui-utils.h>
#include <gal/widgets/e-unicode.h>

#include <libgnome/gnome-i18n.h>
#include <libgnome/gnome-util.h>
#include <libgnomeui/gnome-dialog.h>
#include <libgnomeui/gnome-stock.h>

#include <gtk/gtklabel.h>
#include <gtk/gtksignal.h>
#include <gtk/gtkentry.h>

#include "e-shell-constants.h"
#include "e-shell-folder-creation-dialog.h"
#include "e-shell-folder-selection-dialog.h"


/* Utility functions.  */

static const char *
get_folder_name (EShell *shell,
         const char *path)
{
    EStorageSet *storage_set;
    EFolder *folder;

    storage_set = e_shell_get_storage_set (shell);
    folder = e_storage_set_get_folder (storage_set, path);

    return e_folder_get_name (folder);
}

static int
get_folder_unread (EShell *shell,
           const char *path)
{
    EStorageSet *storage_set;
    EFolder *folder;

    storage_set = e_shell_get_storage_set (shell);
    folder = e_storage_set_get_folder (storage_set, path);

    return e_folder_get_unread_count (folder);
}


/* The data passed to the signals handled during the execution of the folder
   commands.  */

enum _FolderCommand {
    FOLDER_COMMAND_COPY,
    FOLDER_COMMAND_MOVE
};
typedef enum _FolderCommand FolderCommand;

struct _FolderCommandData {
    EShell *shell;
    EShellView *shell_view;
    FolderCommand command;
    char *source_path;
    char *destination_path;
};
typedef struct _FolderCommandData FolderCommandData;

static FolderCommandData *
folder_command_data_new (EShell *shell,
             EShellView *shell_view,
             FolderCommand command,
             const char *source_path,
             const char *destination_path)
{
    FolderCommandData *new;

    new = g_new (FolderCommandData, 1);
    new->shell            = shell;
    new->shell_view       = shell_view;
    new->command          = command;
    new->source_path      = g_strdup (source_path);
    new->destination_path = g_strdup (destination_path);

    return new;
}

static void
folder_command_data_free (FolderCommandData *folder_command_data)
{
    g_free (folder_command_data->source_path);
    g_free (folder_command_data->destination_path);

    g_free (folder_command_data);
}


/* Callback for the storage result.  */

static void
xfer_result_callback (EStorageSet *storage_set,
              EStorageResult result,
              void *data)
{
    FolderCommandData *folder_command_data;

    folder_command_data = (FolderCommandData *) data;

    /* FIXME: do something.  */

    folder_command_data_free (folder_command_data);
}


/* The signals for the folder selection dialog.  This used for the copy and
   move commands.  */

static void
folder_selection_dialog_folder_selected_callback (EShellFolderSelectionDialog *folder_selection_dialog,
                          const char *path,
                          void *data)
{
    FolderCommandData *folder_command_data;
    EStorageSet *storage_set;
    gboolean remove_source;

    folder_command_data = (FolderCommandData *) data;

    folder_command_data->destination_path = g_concat_dir_and_file (path,
                                       g_basename (folder_command_data->source_path));

    switch (folder_command_data->command) {
    case FOLDER_COMMAND_COPY:
        remove_source = FALSE;
        break;
    case FOLDER_COMMAND_MOVE:
        remove_source = TRUE;
        break;
    default:
        g_assert_not_reached ();
        return;
    }

    if (strcmp (folder_command_data->destination_path,
            folder_command_data->source_path) == 0) {
        const char *msg;

        if (remove_source)
            msg = _("Cannot move a folder over itself.");
        else
            msg = _("Cannot copy a folder over itself.");

        e_notice (GTK_WINDOW (folder_selection_dialog), GNOME_MESSAGE_BOX_ERROR, msg);
        return;
    }

    if (remove_source) {
        int source_len;

        source_len = strlen (folder_command_data->source_path);
        if (strncmp (folder_command_data->destination_path,
                 folder_command_data->source_path,
                 source_len) == 0) {
            e_notice (GTK_WINDOW (folder_selection_dialog), GNOME_MESSAGE_BOX_ERROR,
                  _("Cannot move a folder into one of its descendants."));
            return;
        }
    }

    storage_set = e_shell_get_storage_set (folder_command_data->shell);

    if (remove_source)
        e_shell_view_remove_control_for_uri (folder_command_data->shell_view,
                             e_shell_view_get_current_uri (folder_command_data->shell_view));

    e_storage_set_async_xfer_folder (storage_set,
                     folder_command_data->source_path,
                     folder_command_data->destination_path,
                     remove_source,
                     xfer_result_callback,
                     folder_command_data);

    gtk_widget_destroy (GTK_WIDGET (folder_selection_dialog));
}

static void
folder_selection_dialog_cancelled_callback (EShellFolderSelectionDialog *folder_selection_dialog,
                        void *data)
{
    folder_command_data_free ((FolderCommandData *) data);
}

static void
connect_folder_selection_dialog_signals (EShellFolderSelectionDialog *folder_selection_dialog,
                     FolderCommandData *folder_command_data)
{
    g_assert (folder_command_data != NULL);

    gtk_signal_connect (GTK_OBJECT (folder_selection_dialog), "folder_selected",
                GTK_SIGNAL_FUNC (folder_selection_dialog_folder_selected_callback),
                folder_command_data);

    gtk_signal_connect (GTK_OBJECT (folder_selection_dialog), "cancelled",
                GTK_SIGNAL_FUNC (folder_selection_dialog_cancelled_callback),
                folder_command_data);
}


/* Create new folder.  */

void
e_shell_command_create_new_folder (EShell *shell,
                   EShellView *shell_view)
{
    g_return_if_fail (shell != NULL);
    g_return_if_fail (E_IS_SHELL (shell));
    g_return_if_fail (shell_view != NULL && E_IS_SHELL_VIEW (shell_view));

    /* FIXME: Should handle the result stuff.  */
    e_shell_show_folder_creation_dialog (shell, GTK_WINDOW (shell_view),
                         e_shell_view_get_current_path (shell_view),
                         NULL /* result_callback */,
                         NULL /* result_callback_data */);
}


/* Open folder in other window.   */

void
e_shell_command_open_folder_in_other_window (EShell *shell,
                         EShellView *shell_view)
{
    g_return_if_fail (shell != NULL);
    g_return_if_fail (E_IS_SHELL (shell));
    g_return_if_fail (shell_view != NULL && E_IS_SHELL_VIEW (shell_view));

    e_shell_create_view (shell, e_shell_view_get_current_uri (shell_view));
}


/* Copy folder.  */

void
e_shell_command_copy_folder (EShell *shell,
                 EShellView *shell_view)
{
    GtkWidget *folder_selection_dialog;
    FolderCommandData *data;
    const char *current_path;
    const char *current_uri;
    char *caption;

    g_return_if_fail (shell != NULL);
    g_return_if_fail (E_IS_SHELL (shell));
    g_return_if_fail (shell_view != NULL && E_IS_SHELL_VIEW (shell_view));

    current_path = e_shell_view_get_current_path (shell_view);

    if (current_path == NULL) {
        g_warning ("Called `e_shell_command_copy_folder()' without a valid displayed folder");
        return;
    }

    caption = g_strdup_printf (_("Specify a folder to copy folder \"%s\" into:"),
                   get_folder_name (shell, current_path));

    current_uri = e_shell_view_get_current_uri (shell_view);
    folder_selection_dialog = e_shell_folder_selection_dialog_new (shell,
                                       _("Copy folder"),
                                       caption,
                                       current_uri,
                                       NULL);

    g_free (caption);

    data = folder_command_data_new (shell, shell_view, FOLDER_COMMAND_COPY, current_path, NULL);
    connect_folder_selection_dialog_signals (E_SHELL_FOLDER_SELECTION_DIALOG (folder_selection_dialog),
                         data);

    gtk_widget_show (folder_selection_dialog);
}


/* Move folder.  */

void
e_shell_command_move_folder (EShell *shell,
                 EShellView *shell_view)
{
    GtkWidget *folder_selection_dialog;
    FolderCommandData *data;
    const char *current_path;
    const char *current_uri;
    char *caption;

    g_return_if_fail (shell != NULL);
    g_return_if_fail (E_IS_SHELL (shell));
    g_return_if_fail (shell_view != NULL);
    g_return_if_fail (E_IS_SHELL_VIEW (shell_view));

    current_path = e_shell_view_get_current_path (shell_view);
    if (current_path == NULL) {
        g_warning ("Called `e_shell_command_move_folder()' without a valid displayed folder");
        return;
    }

    caption = g_strdup_printf (_("Specify a folder to move folder \"%s\" into:"),
                   get_folder_name (shell, current_path));

    current_uri = e_shell_view_get_current_uri (shell_view);
    folder_selection_dialog = e_shell_folder_selection_dialog_new (shell,
                                       _("Move folder"),
                                       caption,
                                       current_uri,
                                       NULL);

    g_free (caption);

    data = folder_command_data_new (shell, shell_view, FOLDER_COMMAND_MOVE, current_path, NULL);
    connect_folder_selection_dialog_signals (E_SHELL_FOLDER_SELECTION_DIALOG (folder_selection_dialog),
                         data);

    gtk_widget_show (folder_selection_dialog);
}

static void
delete_cb (EStorageSet *storage_set,
       EStorageResult result,
       void *data)
{
    EShellView *shell_view;

    shell_view = E_SHELL_VIEW (data);

    if (result != E_STORAGE_OK)
        e_notice (GTK_WINDOW (shell_view), GNOME_MESSAGE_BOX_ERROR,
              _("Cannot delete folder:\n%s"), e_storage_result_to_string (result));
}

static int
delete_dialog (EShellView *shell_view, const char *utf8_folder)
{
    GnomeDialog *dialog;
    char *title;
    GtkWidget *question_label;
    char *question;
    char *folder_name;

    /* Popup a dialog asking if they are sure they want to delete
           the folder */
    folder_name = e_utf8_to_gtk_string (GTK_WIDGET (shell_view), 
                        (char *)utf8_folder);
    title = g_strdup_printf (_("Delete folder '%s'"), folder_name);

    dialog = GNOME_DIALOG (gnome_dialog_new (title,
                         GNOME_STOCK_BUTTON_YES,
                         GNOME_STOCK_BUTTON_NO,
                         NULL));
    g_free (title);
    gnome_dialog_set_parent (dialog, GTK_WINDOW (shell_view));

    /* "Are you sure..." label */
    question = g_strdup_printf (_("Are you sure you want to remove the '%s' folder?"),
                    folder_name);
    question_label = gtk_label_new (question);  
    gtk_widget_show (question_label);

    gtk_box_pack_start (GTK_BOX (dialog->vbox), question_label, FALSE, TRUE, 2);
    g_free (folder_name);
    g_free (question);

    gnome_dialog_set_default (dialog, 1);

    return gnome_dialog_run_and_close (dialog);
}

void
e_shell_command_delete_folder (EShell *shell,
                   EShellView *shell_view)
{
    EStorageSet *storage_set;
    char *path;

    g_return_if_fail (shell != NULL);
    g_return_if_fail (E_IS_SHELL (shell));
    g_return_if_fail (shell_view != NULL);
    g_return_if_fail (E_IS_SHELL_VIEW (shell_view));

    storage_set = e_shell_get_storage_set (shell);
    path = g_strdup (e_shell_view_get_current_path (shell_view));
    
    if (delete_dialog (shell_view, get_folder_name (shell, path)) == 0) {
        /* Remove and destroy the control */
        e_shell_view_remove_control_for_uri (shell_view,
                             e_shell_view_get_current_uri (shell_view));

        /* Remove the folder */
        e_storage_set_async_remove_folder (storage_set,
                           path,
                           delete_cb,
                           shell_view);

        /* Select another folder to prevent bad things from happening */
        e_shell_view_display_uri (shell_view, DEFAULT_URI);
    }

    g_free (path);
}

#if 0
static void
rename_clicked (GtkWidget *dialog, gint button_num, void *data)
{
    char **retval = data;
    GtkWidget *entry;

    entry = gtk_object_get_data (GTK_OBJECT (dialog), "entry");
    *retval = g_strdup (gtk_entry_get_text (GTK_ENTRY (entry)));
}
#endif

#if 0
static char *
rename_dialog (char *folder_name)
{
    GnomeDialog *dialog;
    int result;
    char *title;
    GtkWidget *hbox;
    char *label;
    GtkWidget *prompt_label;
    GtkWidget *entry;
    char *question;
    char *retval;

    /* Popup a dialog asking what the user would like to rename
           the folder to */
    title = g_strdup_printf (_("Rename folder '%s'"),
                 folder_name);

    dialog = GNOME_DIALOG (gnome_dialog_new (title,
                         _("Rename"),
                         GNOME_STOCK_BUTTON_CANCEL,
                         NULL));
    g_free (title);

    hbox = gtk_hbox_new (FALSE, 2);

    /* Make, pack the label */
    label = g_strdup_printf (_("Folder name:"));
    prompt_label = gtk_label_new (label);
    gtk_box_pack_start (GTK_BOX (hbox), prompt_label, FALSE, TRUE, 2);

    /* Make, setup, pack the entry */
    entry = gtk_entry_new ();
    gtk_entry_set_text (GTK_ENTRY (entry), folder_name);
    gtk_box_pack_start (GTK_BOX (hbox), entry, FALSE, TRUE, 2);

    gtk_widget_show (GTK_WIDGET (prompt_label));
    gtk_widget_show (GTK_WIDGET (entry));
    gtk_widget_show (GTK_WIDGET (hbox));

    gtk_box_pack_start (GTK_BOX (dialog->vbox), hbox, FALSE, TRUE, 2);

    gtk_object_set_data (GTK_OBJECT (dialog), "entry", entry);

    gtk_signal_connect (GTK_OBJECT (dialog), "clicked",
                rename_clicked, &retval);

    gnome_dialog_set_default (dialog, 1);

    result = gnome_dialog_run_and_close (dialog);
       
    return retval;
}
#endif



#if 0
static void
rename_cb (EStorageSet *storage_set,
       EStorageResult result,
       void *data)
{
    /* FIXME: Do something? */
}
#endif

#if 0
void
e_shell_command_rename_folder (EShell *shell,
                   EShellView *shell_view)
{
    EStorageSet *storage_set;
    char *oldname;
    char *newname;

    char *path;
    char *newpath;

    g_return_if_fail (shell != NULL);
    g_return_if_fail (E_IS_SHELL (shell));
    g_return_if_fail (shell_view != NULL);
    g_return_if_fail (E_IS_SHELL_VIEW (shell_view));

    storage_set = e_shell_get_storage_set (shell);
    path = g_strdup (e_shell_view_get_current_path (shell_view));

    oldname = get_folder_name (shell, path);
    newname = rename_dialog (oldname);

    if (strcmp (oldname, newname)) {
        /* FIXME: Doing strstr isn't robust enough, will fail
                   when path is /blah/blah, do looped strchr for '/' */
        char *tmp = strstr (path, oldname);
        char *tmp2;

        tmp2 = g_strndup (path, strlen (path) - strlen (tmp));

        newpath = g_strconcat (tmp2, newname, NULL);

        printf ("newpath: %s\n", newpath);

        g_free (tmp2);
        g_free (tmp);

/* FIXME: newpath needs to be correct
        e_storage_set_async_xfer_folder (storage_set,
                         oldpath,
                         newpath,
                         TRUE,
                         rename_cb,
                         NULL);
*/
    }

    g_free (path);
}
#endif


void
e_shell_command_add_to_shortcut_bar (EShell *shell,
                     EShellView *shell_view)
{
    EShortcuts *shortcuts;
    EStorageSet *storage_set;
    EFolder *folder;
    int group_num;
    const char *uri;
    int unread_count;

    g_return_if_fail (shell != NULL);
    g_return_if_fail (E_IS_SHELL (shell));
    g_return_if_fail (shell_view != NULL);
    g_return_if_fail (E_IS_SHELL_VIEW (shell_view));

    shortcuts = e_shell_get_shortcuts (shell);
    group_num = e_shell_view_get_current_shortcuts_group_num (shell_view);
    uri = e_shell_view_get_current_uri (shell_view);

    unread_count = get_folder_unread (shell, e_shell_view_get_current_path (shell_view));

    storage_set = e_shell_get_storage_set (shell);
    folder = e_storage_set_get_folder (storage_set, e_shell_view_get_current_path (shell_view));

    e_shortcuts_add_shortcut (shortcuts, group_num, -1, uri, NULL, unread_count, e_folder_get_type_string (folder));
}