/* nautilus-compress-dialog-controller.h
 *
 * Copyright (C) 2016 the Nautilus developers
 *
 * 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, see <http://www.gnu.org/licenses/>.
 *
 */

#include <glib/gi18n.h>
#include <gnome-autoar/gnome-autoar.h>
#include <libhandy-1/handy.h>

#ifdef GDK_WINDOWING_X11
#include <gdk/gdkx.h>
#endif

#include <eel/eel-vfs-extensions.h>

#include "nautilus-compress-dialog-controller.h"

#include "nautilus-global-preferences.h"

struct _NautilusCompressDialogController
{
    NautilusFileNameWidgetController parent_instance;

    GtkWidget *compress_dialog;
    GtkWidget *activate_button;
    GtkWidget *error_label;
    GtkWidget *name_entry;
    GtkWidget *extension_stack;
    GtkWidget *zip_row;
    GtkWidget *zip_label;
    GtkWidget *encrypted_zip_row;
    GtkWidget *encrypted_zip_label;
    GtkWidget *tar_xz_row;
    GtkWidget *tar_xz_label;
    GtkWidget *seven_zip_row;
    GtkWidget *seven_zip_label;
    GtkWidget *extension_popover;
    GtkWidget *zip_checkmark;
    GtkWidget *encrypted_zip_checkmark;
    GtkWidget *tar_xz_checkmark;
    GtkWidget *seven_zip_checkmark;
    GtkWidget *passphrase_label;
    GtkWidget *passphrase_entry;

    const char *extension;
    gchar *passphrase;

    gulong response_handler_id;
};

G_DEFINE_TYPE (NautilusCompressDialogController, nautilus_compress_dialog_controller, NAUTILUS_TYPE_FILE_NAME_WIDGET_CONTROLLER);

static gboolean
nautilus_compress_dialog_controller_name_is_valid (NautilusFileNameWidgetController  *self,
                                                   gchar                             *name,
                                                   gchar                            **error_message)
{
    gboolean is_valid;

    is_valid = TRUE;
    if (strlen (name) == 0)
    {
        is_valid = FALSE;
    }
    else if (strstr (name, "/") != NULL)
    {
        is_valid = FALSE;
        *error_message = _("Archive names cannot contain “/”.");
    }
    else if (strcmp (name, ".") == 0)
    {
        is_valid = FALSE;
        *error_message = _("An archive cannot be called “.”.");
    }
    else if (strcmp (name, "..") == 0)
    {
        is_valid = FALSE;
        *error_message = _("An archive cannot be called “..”.");
    }
    else if (nautilus_file_name_widget_controller_is_name_too_long (self, name))
    {
        is_valid = FALSE;
        *error_message = _("Archive name is too long.");
    }

    if (is_valid && g_str_has_prefix (name, "."))
    {
        /* We must warn about the side effect */
        *error_message = _("Archives with “.” at the beginning of their name are hidden.");
    }

    return is_valid;
}

static gchar *
nautilus_compress_dialog_controller_get_new_name (NautilusFileNameWidgetController *controller)
{
    NautilusCompressDialogController *self;
    g_autofree gchar *basename = NULL;
    gchar *error_message = NULL;
    gboolean valid_name;

    self = NAUTILUS_COMPRESS_DIALOG_CONTROLLER (controller);

    basename = NAUTILUS_FILE_NAME_WIDGET_CONTROLLER_CLASS (nautilus_compress_dialog_controller_parent_class)->get_new_name (controller);
    /* Do not check or add the extension if the name is invalid */
    valid_name = nautilus_compress_dialog_controller_name_is_valid (controller,
                                                                    basename,
                                                                    &error_message);

    if (!valid_name)
    {
        return g_strdup (basename);
    }

    if (g_str_has_suffix (basename, self->extension))
    {
        return g_strdup (basename);
    }

    return g_strconcat (basename, self->extension, NULL);
}

static void
compress_dialog_controller_on_response (GtkDialog *dialog,
                                        gint       response_id,
                                        gpointer   user_data)
{
    NautilusCompressDialogController *controller;

    controller = NAUTILUS_COMPRESS_DIALOG_CONTROLLER (user_data);

    if (response_id != GTK_RESPONSE_OK)
    {
        g_signal_emit_by_name (controller, "cancelled");
    }
}

static void
update_selected_format (NautilusCompressDialogController *self,
                        NautilusCompressionFormat         format)
{
    const char *extension;
    GtkWidget *active_label;
    GtkWidget *active_checkmark;
    gboolean show_passphrase = FALSE;

    switch (format)
    {
        case NAUTILUS_COMPRESSION_ZIP:
        {
            extension = ".zip";
            active_label = self->zip_label;
            active_checkmark = self->zip_checkmark;
        }
        break;

        case NAUTILUS_COMPRESSION_ENCRYPTED_ZIP:
        {
            extension = ".zip";
            active_label = self->encrypted_zip_label;
            active_checkmark = self->encrypted_zip_checkmark;
            show_passphrase = TRUE;
        }
        break;

        case NAUTILUS_COMPRESSION_TAR_XZ:
        {
            extension = ".tar.xz";
            active_label = self->tar_xz_label;
            active_checkmark = self->tar_xz_checkmark;
        }
        break;

        case NAUTILUS_COMPRESSION_7ZIP:
        {
            extension = ".7z";
            active_label = self->seven_zip_label;
            active_checkmark = self->seven_zip_checkmark;
        }
        break;

        default:
        {
            g_assert_not_reached ();
        }
        break;
    }

    self->extension = extension;

    gtk_widget_set_visible (self->passphrase_label, show_passphrase);
    gtk_widget_set_visible (self->passphrase_entry, show_passphrase);
    if (!show_passphrase)
    {
        gtk_entry_set_text (GTK_ENTRY (self->passphrase_entry), "");
        gtk_entry_set_visibility (GTK_ENTRY (self->passphrase_entry), FALSE);
        gtk_entry_set_icon_from_icon_name (GTK_ENTRY (self->passphrase_entry),
                                           GTK_ENTRY_ICON_SECONDARY,
                                           "view-conceal");
    }

    gtk_stack_set_visible_child (GTK_STACK (self->extension_stack),
                                 active_label);

    gtk_image_set_from_icon_name (GTK_IMAGE (self->zip_checkmark),
                                  NULL,
                                  GTK_ICON_SIZE_BUTTON);
    gtk_image_set_from_icon_name (GTK_IMAGE (self->encrypted_zip_checkmark),
                                  NULL,
                                  GTK_ICON_SIZE_BUTTON);
    gtk_image_set_from_icon_name (GTK_IMAGE (self->tar_xz_checkmark),
                                  NULL,
                                  GTK_ICON_SIZE_BUTTON);
    gtk_image_set_from_icon_name (GTK_IMAGE (self->seven_zip_checkmark),
                                  NULL,
                                  GTK_ICON_SIZE_BUTTON);
    gtk_image_set_from_icon_name (GTK_IMAGE (active_checkmark),
                                  "object-select-symbolic",
                                  GTK_ICON_SIZE_BUTTON);

    g_settings_set_enum (nautilus_compression_preferences,
                         NAUTILUS_PREFERENCES_DEFAULT_COMPRESSION_FORMAT,
                         format);
    /* Since the extension changes when the button is toggled, force a
     * verification of the new file name by simulating an entry change
     */
    gtk_widget_set_sensitive (self->activate_button, FALSE);
    g_signal_emit_by_name (self->name_entry, "changed");
}

static void
zip_row_on_activated (HdyActionRow *row,
                      gpointer      user_data)
{
    NautilusCompressDialogController *controller;

    controller = NAUTILUS_COMPRESS_DIALOG_CONTROLLER (user_data);

    gtk_popover_popdown (GTK_POPOVER (controller->extension_popover));
    update_selected_format (controller,
                            NAUTILUS_COMPRESSION_ZIP);
}

static void
encrypted_zip_row_on_activated (HdyActionRow *row,
                                gpointer      user_data)
{
    NautilusCompressDialogController *controller;

    controller = NAUTILUS_COMPRESS_DIALOG_CONTROLLER (user_data);

    gtk_popover_popdown (GTK_POPOVER (controller->extension_popover));
    update_selected_format (controller,
                            NAUTILUS_COMPRESSION_ENCRYPTED_ZIP);
}

static void
tar_xz_row_on_activated (HdyActionRow *row,
                         gpointer      user_data)
{
    NautilusCompressDialogController *controller;

    controller = NAUTILUS_COMPRESS_DIALOG_CONTROLLER (user_data);

    gtk_popover_popdown (GTK_POPOVER (controller->extension_popover));
    update_selected_format (controller,
                            NAUTILUS_COMPRESSION_TAR_XZ);
}

static void
seven_zip_row_on_activated (HdyActionRow *row,
                            gpointer      user_data)
{
    NautilusCompressDialogController *controller;

    controller = NAUTILUS_COMPRESS_DIALOG_CONTROLLER (user_data);

    gtk_popover_popdown (GTK_POPOVER (controller->extension_popover));
    update_selected_format (controller,
                            NAUTILUS_COMPRESSION_7ZIP);
}

static void
passphrase_entry_on_changed (GtkEditable *editable,
                             gpointer     user_data)
{
    NautilusCompressDialogController *self;
    const gchar *error_message;

    self = NAUTILUS_COMPRESS_DIALOG_CONTROLLER (user_data);

    g_free (self->passphrase);
    self->passphrase = g_strdup (gtk_entry_get_text (GTK_ENTRY (self->passphrase_entry)));

    /* Simulate a change of the name_entry to ensure the correct sensitivity of
     * the activate_button, but only if the name_entry is valid in order to
     * avoid changes of the error_revealer.
     */
    error_message = gtk_label_get_text (GTK_LABEL (self->error_label));
    if (error_message[0] == '\0')
    {
        gtk_widget_set_sensitive (self->activate_button, FALSE);
        g_signal_emit_by_name (self->name_entry, "changed");
    }
}

static void
passphrase_entry_on_icon_press (GtkEntry             *entry,
                                GtkEntryIconPosition  icon_pos,
                                GdkEvent             *event,
                                gpointer              user_data)
{
    NautilusCompressDialogController *self;
    gboolean visibility;

    self = NAUTILUS_COMPRESS_DIALOG_CONTROLLER (user_data);
    visibility = gtk_entry_get_visibility (GTK_ENTRY (self->passphrase_entry));

    gtk_entry_set_icon_from_icon_name (GTK_ENTRY (self->passphrase_entry),
                                       GTK_ENTRY_ICON_SECONDARY,
                                       visibility ? "view-conceal" : "view-reveal");
    gtk_entry_set_visibility (GTK_ENTRY (self->passphrase_entry), !visibility);
}

static void
activate_button_on_sensitive_notify (GObject    *gobject,
                                     GParamSpec *pspec,
                                     gpointer    user_data)
{
    NautilusCompressDialogController *self;
    NautilusCompressionFormat format;

    self = NAUTILUS_COMPRESS_DIALOG_CONTROLLER (user_data);
    format = g_settings_get_enum (nautilus_compression_preferences,
                                  NAUTILUS_PREFERENCES_DEFAULT_COMPRESSION_FORMAT);
    if (format == NAUTILUS_COMPRESSION_ENCRYPTED_ZIP &&
        (self->passphrase == NULL || self->passphrase[0] == '\0'))
    {
        /* Reset sensitivity of the activate_button if password is not set. */
        gtk_widget_set_sensitive (self->activate_button, FALSE);
    }
}

static void
popover_on_show (GtkWidget *widget,
                 gpointer   user_data)
{
    NautilusCompressDialogController *self;
    NautilusCompressionFormat format;

    self = NAUTILUS_COMPRESS_DIALOG_CONTROLLER (user_data);
    format = g_settings_get_enum (nautilus_compression_preferences,
                                  NAUTILUS_PREFERENCES_DEFAULT_COMPRESSION_FORMAT);
    switch (format)
    {
        case NAUTILUS_COMPRESSION_ZIP:
        {
            gtk_widget_grab_focus (self->zip_row);
        }
        break;

        case NAUTILUS_COMPRESSION_ENCRYPTED_ZIP:
        {
            gtk_widget_grab_focus (self->encrypted_zip_row);
        }
        break;

        case NAUTILUS_COMPRESSION_TAR_XZ:
        {
            gtk_widget_grab_focus (self->tar_xz_row);
        }
        break;

        case NAUTILUS_COMPRESSION_7ZIP:
        {
            gtk_widget_grab_focus (self->seven_zip_row);
        }
        break;

        default:
        {
            g_assert_not_reached ();
        }
        break;
    }

#ifdef GDK_WINDOWING_X11
    if (GDK_IS_X11_DISPLAY (gdk_display_get_default ()))
    {
        int w, h;

        /* Workaround for https://gitlab.gnome.org/GNOME/nautilus/-/issues/2018 */
        gtk_window_get_default_size (GTK_WINDOW (self->compress_dialog), &w, &h);
        gtk_window_resize (GTK_WINDOW (self->compress_dialog), w, h * 2);
    }
#endif
}

NautilusCompressDialogController *
nautilus_compress_dialog_controller_new (GtkWindow         *parent_window,
                                         NautilusDirectory *destination_directory,
                                         gchar             *initial_name)
{
    NautilusCompressDialogController *self;
    g_autoptr (GtkBuilder) builder = NULL;
    GtkWidget *compress_dialog;
    GtkWidget *error_revealer;
    GtkWidget *error_label;
    GtkWidget *name_entry;
    GtkWidget *activate_button;
    GtkWidget *extension_stack;
    GtkWidget *zip_row;
    GtkWidget *zip_label;
    GtkWidget *encrypted_zip_row;
    GtkWidget *encrypted_zip_label;
    GtkWidget *tar_xz_row;
    GtkWidget *tar_xz_label;
    GtkWidget *seven_zip_row;
    GtkWidget *seven_zip_label;
    GtkWidget *extension_popover;
    GtkWidget *zip_checkmark;
    GtkWidget *encrypted_zip_checkmark;
    GtkWidget *tar_xz_checkmark;
    GtkWidget *seven_zip_checkmark;
    GtkWidget *passphrase_label;
    GtkWidget *passphrase_entry;
    NautilusCompressionFormat format;

    builder = gtk_builder_new_from_resource ("/org/gnome/nautilus/ui/nautilus-compress-dialog.ui");
    compress_dialog = GTK_WIDGET (gtk_builder_get_object (builder, "compress_dialog"));
    error_revealer = GTK_WIDGET (gtk_builder_get_object (builder, "error_revealer"));
    error_label = GTK_WIDGET (gtk_builder_get_object (builder, "error_label"));
    name_entry = GTK_WIDGET (gtk_builder_get_object (builder, "name_entry"));
    activate_button = GTK_WIDGET (gtk_builder_get_object (builder, "activate_button"));
    extension_stack = GTK_WIDGET (gtk_builder_get_object (builder, "extension_stack"));
    zip_label = GTK_WIDGET (gtk_builder_get_object (builder, "zip_label"));
    encrypted_zip_label = GTK_WIDGET (gtk_builder_get_object (builder, "encrypted_zip_label"));
    tar_xz_label = GTK_WIDGET (gtk_builder_get_object (builder, "tar_xz_label"));
    seven_zip_label = GTK_WIDGET (gtk_builder_get_object (builder, "seven_zip_label"));
    extension_popover = GTK_WIDGET (gtk_builder_get_object (builder, "extension_popover"));
    zip_checkmark = GTK_WIDGET (gtk_builder_get_object (builder, "zip_checkmark"));
    encrypted_zip_checkmark = GTK_WIDGET (gtk_builder_get_object (builder, "encrypted_zip_checkmark"));
    tar_xz_checkmark = GTK_WIDGET (gtk_builder_get_object (builder, "tar_xz_checkmark"));
    seven_zip_checkmark = GTK_WIDGET (gtk_builder_get_object (builder, "seven_zip_checkmark"));
    passphrase_label = GTK_WIDGET (gtk_builder_get_object (builder, "passphrase_label"));
    passphrase_entry = GTK_WIDGET (gtk_builder_get_object (builder, "passphrase_entry"));
    zip_row = GTK_WIDGET (gtk_builder_get_object (builder, "zip_row"));
    encrypted_zip_row = GTK_WIDGET (gtk_builder_get_object (builder, "encrypted_zip_row"));
    tar_xz_row = GTK_WIDGET (gtk_builder_get_object (builder, "tar_xz_row"));
    seven_zip_row = GTK_WIDGET (gtk_builder_get_object (builder, "seven_zip_row"));

    gtk_window_set_transient_for (GTK_WINDOW (compress_dialog),
                                  parent_window);

    self = g_object_new (NAUTILUS_TYPE_COMPRESS_DIALOG_CONTROLLER,
                         "error-revealer", error_revealer,
                         "error-label", error_label,
                         "name-entry", name_entry,
                         "activate-button", activate_button,
                         "containing-directory", destination_directory, NULL);

    self->compress_dialog = compress_dialog;
    self->activate_button = activate_button;
    self->error_label = error_label;
    self->extension_stack = extension_stack;
    self->zip_label = zip_label;
    self->encrypted_zip_label = encrypted_zip_label;
    self->tar_xz_label = tar_xz_label;
    self->seven_zip_label = seven_zip_label;
    self->name_entry = name_entry;
    self->extension_popover = extension_popover;
    self->zip_checkmark = zip_checkmark;
    self->encrypted_zip_checkmark = encrypted_zip_checkmark;
    self->tar_xz_checkmark = tar_xz_checkmark;
    self->seven_zip_checkmark = seven_zip_checkmark;
    self->name_entry = name_entry;
    self->passphrase_label = passphrase_label;
    self->passphrase_entry = passphrase_entry;
    self->zip_row = zip_row;
    self->encrypted_zip_row = encrypted_zip_row;
    self->tar_xz_row = tar_xz_row;
    self->seven_zip_row = seven_zip_row;

    self->response_handler_id = g_signal_connect (compress_dialog,
                                                  "response",
                                                  (GCallback) compress_dialog_controller_on_response,
                                                  self);

    g_signal_connect (self->zip_row, "activated",
                      G_CALLBACK (zip_row_on_activated), self);
    g_signal_connect (self->encrypted_zip_row, "activated",
                      G_CALLBACK (encrypted_zip_row_on_activated), self);
    g_signal_connect (self->tar_xz_row, "activated",
                      G_CALLBACK (tar_xz_row_on_activated), self);
    g_signal_connect (self->seven_zip_row, "activated",
                      G_CALLBACK (seven_zip_row_on_activated), self);
    g_signal_connect (self->passphrase_entry, "changed",
                      G_CALLBACK (passphrase_entry_on_changed), self);
    g_signal_connect (self->passphrase_entry, "icon-press",
                      G_CALLBACK (passphrase_entry_on_icon_press), self);
    g_signal_connect (self->activate_button, "notify::sensitive",
                      G_CALLBACK (activate_button_on_sensitive_notify), self);
    g_signal_connect (self->extension_popover, "show",
                      G_CALLBACK (popover_on_show), self);

    format = g_settings_get_enum (nautilus_compression_preferences,
                                  NAUTILUS_PREFERENCES_DEFAULT_COMPRESSION_FORMAT);

    if (initial_name != NULL)
    {
        gtk_entry_set_text (GTK_ENTRY (name_entry), initial_name);
    }

    gtk_widget_show_all (compress_dialog);

    update_selected_format (self, format);

    return self;
}

static void
nautilus_compress_dialog_controller_init (NautilusCompressDialogController *self)
{
}

static void
nautilus_compress_dialog_controller_finalize (GObject *object)
{
    NautilusCompressDialogController *self;

    self = NAUTILUS_COMPRESS_DIALOG_CONTROLLER (object);

    if (self->compress_dialog != NULL)
    {
        g_clear_signal_handler (&self->response_handler_id, self->compress_dialog);
        gtk_widget_destroy (self->compress_dialog);
        self->compress_dialog = NULL;
    }

    g_free (self->passphrase);

    G_OBJECT_CLASS (nautilus_compress_dialog_controller_parent_class)->finalize (object);
}

static void
nautilus_compress_dialog_controller_class_init (NautilusCompressDialogControllerClass *klass)
{
    GObjectClass *object_class = G_OBJECT_CLASS (klass);
    NautilusFileNameWidgetControllerClass *parent_class = NAUTILUS_FILE_NAME_WIDGET_CONTROLLER_CLASS (klass);

    object_class->finalize = nautilus_compress_dialog_controller_finalize;

    parent_class->get_new_name = nautilus_compress_dialog_controller_get_new_name;
    parent_class->name_is_valid = nautilus_compress_dialog_controller_name_is_valid;
}

const gchar *
nautilus_compress_dialog_controller_get_passphrase (NautilusCompressDialogController *self)
{
    return self->passphrase;
}
