X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Fui%2Fgui%2Fpsppire-window.c;h=8e34c214be3db729a4b5f7fb9d99eb35214e7b2c;hb=5cec2f151407ded00c03b00b101578e9123b91b2;hp=45cd66c1308299e57c84e128b856fa2826afabd3;hpb=57f8d4d2612512761fbdd49f1dbd0dc313a8d257;p=pspp diff --git a/src/ui/gui/psppire-window.c b/src/ui/gui/psppire-window.c index 45cd66c130..8e34c214be 100644 --- a/src/ui/gui/psppire-window.c +++ b/src/ui/gui/psppire-window.c @@ -1,5 +1,5 @@ /* PSPPIRE - a graphical user interface for PSPP. - Copyright (C) 2009 Free Software Foundation + Copyright (C) 2009, 2010, 2011, 2013, 2014 Free Software Foundation 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 @@ -15,27 +15,36 @@ along with this program. If not, see . */ #include +#include -#include -#include -#include +#include "psppire-window.h" +#include "psppire-window-base.h" + +#include #include +#include #include #define _(msgid) gettext (msgid) #define N_(msgid) msgid -#include "psppire-window.h" +#include "data/any-reader.h" +#include "data/file-handle-def.h" +#include "data/dataset.h" +#include "libpspp/version.h" + +#include "helper.h" +#include "psppire-data-window.h" +#include "psppire-encoding-selector.h" +#include "psppire-syntax-window.h" #include "psppire-window-register.h" -static void psppire_window_base_finalize (PsppireWindowClass *, gpointer); static void psppire_window_base_init (PsppireWindowClass *class); static void psppire_window_class_init (PsppireWindowClass *class); static void psppire_window_init (PsppireWindow *window); -static PsppireWindowClass *the_class; static GObjectClass *parent_class; GType @@ -49,7 +58,7 @@ psppire_window_get_type (void) { sizeof (PsppireWindowClass), (GBaseInitFunc) psppire_window_base_init, - (GBaseFinalizeFunc) psppire_window_base_finalize, + (GBaseFinalizeFunc) NULL, (GClassInitFunc) psppire_window_class_init, (GClassFinalizeFunc) NULL, NULL, @@ -59,7 +68,7 @@ psppire_window_get_type (void) }; psppire_window_type = - g_type_register_static (GTK_TYPE_WINDOW, "PsppireWindow", + g_type_register_static (PSPPIRE_TYPE_WINDOW_BASE, "PsppireWindow", &psppire_window_info, G_TYPE_FLAG_ABSTRACT); } @@ -72,34 +81,92 @@ enum { PROP_0, PROP_FILENAME, - PROP_DESCRIPTION + PROP_DESCRIPTION, + PROP_ID }; -gchar * -uniquify (const gchar *str, int *x) -{ - return g_strdup_printf ("%s%d", str, (*x)++); -} - -static gchar mdash[6] = {0,0,0,0,0,0}; - static void psppire_window_set_title (PsppireWindow *window) { GString *title = g_string_sized_new (80); - g_string_printf (title, _("%s %s PSPPIRE %s"), - window->basename, mdash, window->description); + if (window->dirty) + g_string_append_c (title, '*'); + + if (window->basename || window->id) + { + if (window->basename) + g_string_append_printf (title, "%s ", window->basename); + + if (window->id != '\0') + g_string_append_printf (title, "[%s] ", window->id); + + g_string_append_unichar (title, 0x2014); /* em dash */ + g_string_append_c (title, ' '); /* em dash */ + } - if ( window->unsaved) - g_string_prepend_c (title, '*'); + g_string_append_printf (title, "PSPPIRE %s", window->description); gtk_window_set_title (GTK_WINDOW (window), title->str); g_string_free (title, TRUE); } +static void +psppire_window_update_list_name (PsppireWindow *window) +{ + PsppireWindowRegister *reg = psppire_window_register_new (); + GString *candidate = g_string_sized_new (80); + int n; + + n = 1; + do + { + /* Compose a name. */ + g_string_truncate (candidate, 0); + if (window->filename) + { + gchar *display_filename = g_filename_display_name (window->filename); + g_string_append (candidate, display_filename); + g_free (display_filename); + + if (window->id) + g_string_append_printf (candidate, " [%s]", window->id); + } + else if (window->id) + g_string_append_printf (candidate, "[%s]", window->id); + else + g_string_append (candidate, window->description); + + if (n++ > 1) + g_string_append_printf (candidate, " #%d", n); + + if (window->list_name && !strcmp (candidate->str, window->list_name)) + { + /* Keep the existing name. */ + g_string_free (candidate, TRUE); + return; + } + } + while (psppire_window_register_lookup (reg, candidate->str)); + + if (window->list_name) + psppire_window_register_remove (reg, window->list_name); + + g_free (window->list_name); + window->list_name = g_string_free (candidate, FALSE); + + psppire_window_register_insert (reg, window, window->list_name); +} + +static void +psppire_window_name_changed (PsppireWindow *window) +{ + psppire_window_set_title (window); + psppire_window_update_list_name (window); +} + static void psppire_window_set_property (GObject *object, guint prop_id, @@ -111,50 +178,24 @@ psppire_window_set_property (GObject *object, switch (prop_id) { case PROP_DESCRIPTION: + g_free (window->description); window->description = g_value_dup_string (value); psppire_window_set_title (window); break; case PROP_FILENAME: - { - PsppireWindowRegister *reg = psppire_window_register_new (); - - gchar *candidate_name ; - - { - const gchar *name = g_value_get_string (value); - int x = 0; - GValue def = {0}; - g_value_init (&def, pspec->value_type); - - if ( NULL == name) - { - g_param_value_set_default (pspec, &def); - name = g_value_get_string (&def); - } - - candidate_name = strdup (name); - - while ( psppire_window_register_lookup (reg, candidate_name)) - { - free (candidate_name); - candidate_name = uniquify (name, &x); - } - - window->basename = g_path_get_basename (candidate_name); - - g_value_unset (&def); - } - - psppire_window_set_title (window); - - if ( window->name) - psppire_window_register_remove (reg, window->name); - - free (window->name); - window->name = candidate_name; - - psppire_window_register_insert (reg, window, window->name); - } + g_free (window->filename); + window->filename = g_value_dup_string (value); + g_free (window->basename); + window->basename = (window->filename + ? g_filename_display_basename (window->filename) + : NULL); + psppire_window_name_changed (window); + break; + break; + case PROP_ID: + g_free (window->id); + window->id = g_value_dup_string (value); + psppire_window_name_changed (window); break; default: G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec); @@ -174,11 +215,14 @@ psppire_window_get_property (GObject *object, switch (prop_id) { case PROP_FILENAME: - g_value_set_string (value, window->name); + g_value_set_string (value, window->filename); break; case PROP_DESCRIPTION: g_value_set_string (value, window->description); break; + case PROP_ID: + g_value_set_string (value, window->id); + break; default: G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec); break; @@ -186,7 +230,6 @@ psppire_window_get_property (GObject *object, } - static void psppire_window_finalize (GObject *object) { @@ -194,15 +237,14 @@ psppire_window_finalize (GObject *object) PsppireWindowRegister *reg = psppire_window_register_new (); - psppire_window_register_remove (reg, window->name); - free (window->name); - free (window->description); - - g_signal_handler_disconnect (psppire_window_register_new (), - window->remove_handler); - - g_signal_handler_disconnect (psppire_window_register_new (), - window->insert_handler); + g_signal_handler_disconnect (reg, window->remove_handler); + g_signal_handler_disconnect (reg, window->insert_handler); + psppire_window_register_remove (reg, window->list_name); + g_free (window->filename); + g_free (window->basename); + g_free (window->id); + g_free (window->description); + g_free (window->list_name); g_hash_table_destroy (window->menuitem_table); @@ -210,27 +252,32 @@ psppire_window_finalize (GObject *object) G_OBJECT_CLASS (parent_class)->finalize (object); } - static void psppire_window_class_init (PsppireWindowClass *class) { GObjectClass *object_class = G_OBJECT_CLASS (class); GParamSpec *description_spec = - g_param_spec_string ("description", + null_if_empty_param ("description", "Description", "A string describing the usage of the window", - "??????", /*Should be overridden by derived classes */ + NULL, /*Should be overridden by derived classes */ G_PARAM_CONSTRUCT_ONLY | G_PARAM_READWRITE); GParamSpec *filename_spec = - g_param_spec_string ("filename", + null_if_empty_param ("filename", "File name", "The name of the file associated with this window, if any", - "Untitled", + NULL, G_PARAM_CONSTRUCT | G_PARAM_READWRITE); - g_unichar_to_utf8 (0x2014, mdash); + GParamSpec *id_spec = + null_if_empty_param ("id", + "Identifier", + "The PSPP language identifier for the data associated " + "with this window (e.g. dataset name)", + NULL, + G_PARAM_CONSTRUCT | G_PARAM_READWRITE); object_class->set_property = psppire_window_set_property; object_class->get_property = psppire_window_get_property; @@ -243,7 +290,10 @@ psppire_window_class_init (PsppireWindowClass *class) PROP_FILENAME, filename_spec); - the_class = class; + g_object_class_install_property (object_class, + PROP_ID, + id_spec); + parent_class = g_type_class_peek_parent (class); } @@ -258,17 +308,13 @@ psppire_window_base_init (PsppireWindowClass *class) -static void -psppire_window_base_finalize (PsppireWindowClass *class, - gpointer class_data) -{ -} - static void menu_toggled (GtkCheckMenuItem *mi, gpointer data) { +#if GTK3_TRANSITION /* Prohibit changes to the state */ mi->active = !mi->active; +#endif } @@ -288,7 +334,22 @@ menu_activate (GtkMenuItem *mi, gpointer data) static void insert_menuitem_into_menu (PsppireWindow *window, gpointer key) { - GtkWidget *item = gtk_check_menu_item_new_with_label (key); + gchar *filename; + GtkWidget *item; + + /* Add a separator before adding the first real item. If we add a separator + at any other time, sometimes GtkUIManager removes it. */ + if (!window->added_separator) + { + GtkWidget *separator = gtk_separator_menu_item_new (); + gtk_widget_show (separator); + gtk_menu_shell_append (window->menu, separator); + window->added_separator = TRUE; + } + + filename = g_filename_display_name (key); + item = gtk_check_menu_item_new_with_label (filename); + g_free (filename); g_signal_connect (item, "toggled", G_CALLBACK (menu_toggled), NULL); g_signal_connect (item, "activate", G_CALLBACK (menu_activate), key); @@ -297,9 +358,11 @@ insert_menuitem_into_menu (PsppireWindow *window, gpointer key) gtk_menu_shell_append (window->menu, item); +#if GTK3_TRANSITION /* Set the state without emitting a signal */ GTK_CHECK_MENU_ITEM (item)->active = (psppire_window_register_lookup (psppire_window_register_new (), key) == window); +#endif g_hash_table_insert (window->menuitem_table, key, item); } @@ -345,11 +408,51 @@ insert_existing_items (PsppireWindow *window) psppire_window_register_foreach (psppire_window_register_new (), insert_item, window); } + +static gboolean +on_delete (PsppireWindow *w, GdkEvent *event, gpointer user_data) +{ + PsppireWindowRegister *reg = psppire_window_register_new (); + + if ( w->dirty ) + { + gint response = psppire_window_query_save (w); + + switch (response) + { + default: + case GTK_RESPONSE_CANCEL: + return TRUE; + break; + case GTK_RESPONSE_APPLY: + psppire_window_save (w); + if (w->dirty) + { + /* Save failed, or user exited Save As dialog with Cancel. */ + return TRUE; + } + break; + case GTK_RESPONSE_REJECT: + break; + } + } + + if ( 1 == psppire_window_register_n_items (reg)) + gtk_main_quit (); + + return FALSE; +} + + static void psppire_window_init (PsppireWindow *window) { - window->name = NULL; window->menu = NULL; + window->filename = NULL; + window->basename = NULL; + window->id = NULL; + window->description = NULL; + window->list_name = NULL; window->menuitem_table = g_hash_table_new (g_str_hash, g_str_equal); @@ -366,19 +469,83 @@ psppire_window_init (PsppireWindow *window) G_CALLBACK (remove_menuitem), window); - window->unsaved = FALSE; + window->added_separator = FALSE; + window->dirty = FALSE; + + g_signal_connect_swapped (window, "delete-event", G_CALLBACK (on_delete), window); + + g_object_set (window, "icon-name", "pspp", NULL); } +/* + Ask the user if the buffer should be saved. + Return the response. +*/ +gint +psppire_window_query_save (PsppireWindow *se) +{ + gint response; + GtkWidget *dialog; + GtkWidget *cancel_button; + + gchar *description; + + GTimeVal time; + + g_get_current_time (&time); + + if (se->filename) + description = g_filename_display_basename (se->filename); + else if (se->id) + description = g_strdup (se->id); + else + description = g_strdup (se->description); + dialog = + gtk_message_dialog_new (GTK_WINDOW (se), + GTK_DIALOG_MODAL, + GTK_MESSAGE_WARNING, + GTK_BUTTONS_NONE, + _("Save the changes to `%s' before closing?"), + description); + g_free (description); + + g_object_set (dialog, "icon-name", "pspp", NULL); + + gtk_message_dialog_format_secondary_text (GTK_MESSAGE_DIALOG (dialog), + _("If you don't save, changes from the last %ld seconds will be permanently lost."), + time.tv_sec - se->savetime.tv_sec); + gtk_dialog_add_button (GTK_DIALOG (dialog), + _("Close _without saving"), + GTK_RESPONSE_REJECT); + + cancel_button = gtk_dialog_add_button (GTK_DIALOG (dialog), + _("Cancel"), + GTK_RESPONSE_CANCEL); + + gtk_dialog_add_button (GTK_DIALOG (dialog), + _("Save"), + GTK_RESPONSE_APPLY); + + gtk_widget_grab_focus (cancel_button); + + response = gtk_dialog_run (GTK_DIALOG (dialog)); + + gtk_widget_destroy (dialog); + + return response; +} + + +/* The return value is encoded in the glib filename encoding. */ const gchar * psppire_window_get_filename (PsppireWindow *w) { - const gchar *name = NULL; - g_object_get (w, "filename", &name, NULL); - return name; + return w->filename; } +/* FILENAME must be encoded in the glib filename encoding. */ void psppire_window_set_filename (PsppireWindow *w, const gchar *filename) { @@ -386,13 +553,23 @@ psppire_window_set_filename (PsppireWindow *w, const gchar *filename) } void -psppire_window_set_unsaved (PsppireWindow *w, gboolean unsaved) +psppire_window_set_unsaved (PsppireWindow *w) { - w->unsaved = unsaved; + if ( w->dirty == FALSE) + g_get_current_time (&w->savetime); + + w->dirty = TRUE; psppire_window_set_title (w); } +gboolean +psppire_window_get_unsaved (PsppireWindow *w) +{ + return w->dirty; +} + + @@ -410,3 +587,275 @@ psppire_window_minimise_all (void) g_hash_table_foreach (reg->name_table, minimise_window, NULL); } + + + + +GType +psppire_window_model_get_type (void) +{ + static GType window_model_type = 0; + + if (! window_model_type) + { + static const GTypeInfo window_model_info = + { + sizeof (PsppireWindowIface), /* class_size */ + NULL, /* base_init */ + NULL, /* base_finalize */ + NULL, + NULL, /* class_finalize */ + NULL, /* class_data */ + 0, + 0, /* n_preallocs */ + NULL + }; + + window_model_type = + g_type_register_static (G_TYPE_INTERFACE, "PsppireWindowModel", + &window_model_info, 0); + + g_type_interface_add_prerequisite (window_model_type, G_TYPE_OBJECT); + } + + return window_model_type; +} + + +void +psppire_window_save (PsppireWindow *w) +{ + PsppireWindowIface *i = PSPPIRE_WINDOW_MODEL_GET_IFACE (w); + + g_assert (i); + g_return_if_fail (i->save); + + if (w->filename == NULL) + psppire_window_save_as (w); + else + { + i->save (w); + w->dirty = FALSE; + psppire_window_set_title (w); + } +} + +void +psppire_window_save_as (PsppireWindow *w) +{ + PsppireWindowIface *i = PSPPIRE_WINDOW_MODEL_GET_IFACE (w); + gchar *old_filename; + + g_assert (i); + g_return_if_fail (i->pick_filename); + + old_filename = w->filename; + w->filename = NULL; + + i->pick_filename (w); + if (w->filename == NULL) + w->filename = old_filename; + else + { + g_free (old_filename); + psppire_window_save (w); + } +} + +static void delete_recent (const char *file_name); + +gboolean +psppire_window_load (PsppireWindow *w, const gchar *file, + const gchar *encoding, gpointer hint) +{ + gboolean ok; + PsppireWindowIface *i = PSPPIRE_WINDOW_MODEL_GET_IFACE (w); + + g_assert (PSPPIRE_IS_WINDOW_MODEL (w)); + + g_assert (i); + + g_return_val_if_fail (i->load, FALSE); + + ok = i->load (w, file, encoding, hint); + + if ( ok ) + { + psppire_window_set_filename (w, file); + w->dirty = FALSE; + } + else + delete_recent (file); + + return ok; +} + + +GtkWidget * +psppire_window_file_chooser_dialog (PsppireWindow *toplevel) +{ + GtkFileFilter *filter = gtk_file_filter_new (); + GtkWidget *dialog = + gtk_file_chooser_dialog_new (_("Open"), + GTK_WINDOW (toplevel), + GTK_FILE_CHOOSER_ACTION_OPEN, + _("Cancel"), GTK_RESPONSE_CANCEL, + _("Open"), GTK_RESPONSE_ACCEPT, + NULL); + + g_object_set (dialog, "local-only", FALSE, NULL); + + gtk_file_filter_set_name (filter, _("Data and Syntax Files")); + gtk_file_filter_add_mime_type (filter, "application/x-spss-sav"); + gtk_file_filter_add_mime_type (filter, "application/x-spss-por"); + gtk_file_filter_add_pattern (filter, "*.zsav"); + gtk_file_filter_add_pattern (filter, "*.sps"); + gtk_file_filter_add_pattern (filter, "*.SPS"); + gtk_file_chooser_add_filter (GTK_FILE_CHOOSER (dialog), filter); + + filter = gtk_file_filter_new (); + gtk_file_filter_set_name (filter, _("System Files (*.sav, *.zsav)")); + gtk_file_filter_add_mime_type (filter, "application/x-spss-sav"); + gtk_file_filter_add_pattern (filter, "*.zsav"); + gtk_file_chooser_add_filter (GTK_FILE_CHOOSER (dialog), filter); + + filter = gtk_file_filter_new (); + gtk_file_filter_set_name (filter, _("Portable Files (*.por) ")); + gtk_file_filter_add_mime_type (filter, "application/x-spss-por"); + gtk_file_chooser_add_filter (GTK_FILE_CHOOSER (dialog), filter); + + filter = gtk_file_filter_new (); + gtk_file_filter_set_name (filter, _("Syntax Files (*.sps) ")); + gtk_file_filter_add_pattern (filter, "*.sps"); + gtk_file_filter_add_pattern (filter, "*.SPS"); + gtk_file_chooser_add_filter (GTK_FILE_CHOOSER (dialog), filter); + + filter = gtk_file_filter_new (); + gtk_file_filter_set_name (filter, _("All Files")); + gtk_file_filter_add_pattern (filter, "*"); + gtk_file_chooser_add_filter (GTK_FILE_CHOOSER (dialog), filter); + + if (toplevel->filename) + { + const gchar *filename = toplevel->filename; + gchar *dir_name; + + if ( ! g_path_is_absolute (filename)) + { + gchar *path = + g_build_filename (g_get_current_dir (), filename, NULL); + dir_name = g_path_get_dirname (path); + g_free (path); + } + else + { + dir_name = g_path_get_dirname (filename); + } + gtk_file_chooser_set_current_folder (GTK_FILE_CHOOSER (dialog), + dir_name); + free (dir_name); + } + + gtk_file_chooser_set_extra_widget ( + GTK_FILE_CHOOSER (dialog), + psppire_encoding_selector_new ("Auto", true)); + + return dialog; +} + +/* Callback for the file_open action. + Prompts for a filename and opens it */ +void +psppire_window_open (PsppireWindow *de) +{ + GtkWidget *dialog = psppire_window_file_chooser_dialog (de); + + gtk_file_chooser_add_shortcut_folder (GTK_FILE_CHOOSER (dialog), relocate (examples_dir), NULL); + + switch (gtk_dialog_run (GTK_DIALOG (dialog))) + { + case GTK_RESPONSE_ACCEPT: + { + gchar *name = + gtk_file_chooser_get_filename (GTK_FILE_CHOOSER (dialog)); + + const gchar **cs = NULL; + g_get_filename_charsets (&cs); + + gchar *encoding = psppire_encoding_selector_get_encoding ( + gtk_file_chooser_get_extra_widget (GTK_FILE_CHOOSER (dialog))); + + struct file_handle *fh = fh_create_file (NULL, name, cs[0], fh_default_properties ()); + + int retval = any_reader_detect (fh, NULL); + if (retval == 1) + open_data_window (de, name, encoding, NULL); + else if (retval == 0) + open_syntax_window (name, encoding); + + g_free (encoding); + fh_unref (fh); + g_free (name); + } + break; + default: + break; + } + + gtk_widget_destroy (dialog); +} + + +/* Puts FILE_NAME (encoded in the glib file name encoding) into the recent list + with associated MIME_TYPE. If it's already in the list, it moves it to the + top. */ +void +add_most_recent (const char *file_name, + const char *mime_type, const char *encoding) +{ + gchar *uri = g_filename_to_uri (file_name, NULL, NULL); + if ( uri ) + { + GtkRecentData recent_data; + gchar *full_mime_type; + + if (encoding && encoding[0]) + full_mime_type = g_strdup_printf ("%s; charset=%s", + mime_type, encoding); + else + full_mime_type = g_strdup (mime_type); + + recent_data.display_name = NULL; + recent_data.description = NULL; + recent_data.mime_type = full_mime_type; + recent_data.app_name = CONST_CAST (gchar *, g_get_application_name ()); + recent_data.app_exec = g_strjoin (" ", g_get_prgname (), "%u", NULL); + recent_data.groups = NULL; + recent_data.is_private = FALSE; + + gtk_recent_manager_add_full (gtk_recent_manager_get_default (), + uri, &recent_data); + + g_free (recent_data.app_exec); + g_free (full_mime_type); + } + + g_free (uri); +} + + + +/* + If FILE_NAME exists in the recent list, then delete it. + */ +static void +delete_recent (const char *file_name) +{ + gchar *uri = g_filename_to_uri (file_name, NULL, NULL); + + if ( uri ) + gtk_recent_manager_remove_item (gtk_recent_manager_get_default (), uri, NULL); + + g_free (uri); +} +