Allow translation of default filenames in GUI
[pspp] / src / ui / gui / psppire-output-window.c
index 2fddefc16ab1857b15c9d558d0417109e2525b9c..9886810f1134f109d7cc5496ad36f5876e587090 100644 (file)
 
 #include <config.h>
 
-#include <gtk/gtksignal.h>
-#include <gtk/gtkbox.h>
-#include "helper.h"
-
-#include <libpspp/cast.h>
-#include <libpspp/message.h>
-#include <libpspp/string-map.h>
-#include <output/cairo.h>
-#include <output/chart-item.h>
-#include <output/driver-provider.h>
-#include <output/output-item.h>
-#include <output/table-item.h>
-#include <output/text-item.h>
-#include <output/tab.h>
+#include <errno.h>
+#include <gtk/gtk.h>
 #include <stdlib.h>
-
-#include "help-menu.h"
-
-#include "psppire-output-window.h"
-
-
-#include "xalloc.h"
-
-#include <sys/types.h>
 #include <sys/stat.h>
+#include <sys/types.h>
 #include <unistd.h>
 
+#include "libpspp/cast.h"
+#include "libpspp/message.h"
+#include "libpspp/string-map.h"
+#include "output/cairo.h"
+#include "output/chart-item.h"
+#include "output/driver-provider.h"
+#include "output/output-item.h"
+#include "output/tab.h"
+#include "output/table-item.h"
+#include "output/text-item.h"
+#include "ui/gui/help-menu.h"
+#include "ui/gui/helper.h"
+#include "ui/gui/psppire-output-window.h"
+
+#include "gl/error.h"
+#include "gl/tmpdir.h"
+#include "gl/xalloc.h"
+
 #include <gettext.h>
 #define _(msgid) gettext (msgid)
 #define N_(msgid) msgid
@@ -168,7 +166,8 @@ expose_event_callback (GtkWidget *widget, GdkEventExpose *event, gpointer data)
   cairo_t *cr;
 
   cr = gdk_cairo_create (widget->window);
-  xr_rendering_draw (r, cr);
+  xr_rendering_draw (r, cr, event->area.x, event->area.y,
+                     event->area.width, event->area.height);
   cairo_destroy (cr);
 
   return TRUE;
@@ -244,7 +243,6 @@ psppire_output_submit (struct output_driver *this,
          it is already close enough to INT_MAX when expressed as thousands of a
          point.) */
       string_map_insert (&options, "paper-size", "300x200000mm");
-      string_map_insert (&options, "headers", "off");
       string_map_insert (&options, "left-margin", "0");
       string_map_insert (&options, "right-margin", "0");
       string_map_insert (&options, "top-margin", "0");
@@ -415,17 +413,6 @@ on_row_activate (GtkTreeView *overview,
 static void psppire_output_window_print (PsppireOutputWindow *window);
 
 
-static GtkFileFilter *
-add_filter (GtkFileChooser *chooser, const char *name, const char *pattern)
-{
-  GtkFileFilter *filter = gtk_file_filter_new ();
-  g_object_ref_sink (G_OBJECT (filter));
-  gtk_file_filter_set_name (filter, name);
-  gtk_file_filter_add_pattern (filter, pattern);
-  gtk_file_chooser_add_filter (chooser, filter);
-  return filter;
-}
-
 static void
 export_output (PsppireOutputWindow *window, struct string_map *options,
                const char *format)
@@ -443,62 +430,216 @@ export_output (PsppireOutputWindow *window, struct string_map *options,
   output_driver_destroy (driver);
 }
 
+
+struct file_types
+{
+  const gchar *label;
+  const gchar *ext;
+};
+
+enum 
+  {
+    FT_AUTO = 0,
+    FT_PDF,
+    FT_HTML,
+    FT_ODT,
+    FT_TXT,
+    FT_PS,
+    FT_CSV,
+    n_FT
+  };
+
+#define N_EXTENTIONS (n_FT - 1)
+
+struct file_types ft[n_FT] = {
+  {N_("Infer file type from extension"),  NULL},
+  {N_("PDF (*.pdf)"),                     ".pdf"},
+  {N_("HTML (*.html)"),                   ".html"},
+  {N_("OpenDocument (*.odt)"),            ".odt"},
+  {N_("Text (*.txt)"),                    ".txt"},
+  {N_("PostScript (*.ps)"),               ".ps"},
+  {N_("Comma-Separated Values (*.csv)"),  ".csv"}
+};
+
+
+static void
+on_combo_change (GtkFileChooser *chooser)
+{
+  gboolean sensitive = FALSE;
+  GtkWidget *combo = gtk_file_chooser_get_extra_widget (chooser);
+
+  int x = 0; 
+  gchar *fn = gtk_file_chooser_get_filename (chooser);
+
+  if (combo &&  GTK_WIDGET_REALIZED (combo))
+    x = gtk_combo_box_get_active (GTK_COMBO_BOX (combo));
+
+  if (fn == NULL)
+    {
+      sensitive = FALSE;
+    }
+  else
+    {
+      gint i;
+      if ( x != 0 )
+       sensitive = TRUE;
+
+      for (i = 1 ; i < N_EXTENTIONS ; ++i)
+       {
+         if ( g_str_has_suffix (fn, ft[i].ext))
+           {
+             sensitive = TRUE;
+             break;
+           }
+       }
+    }
+
+  g_free (fn);
+
+  gtk_dialog_set_response_sensitive (GTK_DIALOG (chooser), GTK_RESPONSE_ACCEPT, sensitive);
+}
+
+
+static void
+on_file_chooser_change (GObject *w, GParamSpec *pspec, gpointer data)
+{
+
+  GtkFileChooser *chooser = data;
+  const gchar *name = g_param_spec_get_name (pspec);
+
+  if ( ! GTK_WIDGET_REALIZED (chooser))
+    return;
+
+  /* Ignore this one.  It causes recursion. */
+  if ( 0 == strcmp ("tooltip-text", name))
+    return;
+
+  on_combo_change (chooser);
+}
+
+
+/* Recursively descend all the children of W, connecting
+   to their "notify" signal */
+static void
+iterate_widgets (GtkWidget *w, gpointer data)
+{
+  if ( GTK_IS_CONTAINER (w))
+    gtk_container_forall (GTK_CONTAINER (w), iterate_widgets, data);
+  else
+    g_signal_connect (w, "notify",  G_CALLBACK (on_file_chooser_change), data);
+}
+
+
+
+static GtkListStore *
+create_file_type_list (void)
+{
+  int i;
+  GtkTreeIter iter;
+  GtkListStore *list = gtk_list_store_new (2, G_TYPE_STRING, G_TYPE_STRING);
+  
+  for (i = 0 ; i < 6 ; ++i)
+    {
+      gtk_list_store_append (list, &iter);
+      gtk_list_store_set (list, &iter,
+                         0,  gettext (ft[i].label),
+                         1,  ft[i].ext,
+                         -1);
+    }
+  
+  return list;
+}
+
 static void
 psppire_output_window_export (PsppireOutputWindow *window)
 {
   gint response;
+  GtkWidget *combo;
+  GtkListStore *list;
 
-  GtkFileFilter *pdf_filter;
-  GtkFileFilter *html_filter;
-  GtkFileFilter *odt_filter;
-  GtkFileFilter *txt_filter;
-  GtkFileFilter *ps_filter;
-  GtkFileFilter *csv_filter;
   GtkFileChooser *chooser;
-  GtkWidget *dialog;
-
-  dialog = gtk_file_chooser_dialog_new (_("Export Output"),
+  
+  GtkWidget *dialog = gtk_file_chooser_dialog_new (_("Export Output"),
                                         GTK_WINDOW (window),
                                         GTK_FILE_CHOOSER_ACTION_SAVE,
                                         GTK_STOCK_CANCEL, GTK_RESPONSE_CANCEL,
                                         GTK_STOCK_SAVE,   GTK_RESPONSE_ACCEPT,
                                         NULL);
+
   chooser = GTK_FILE_CHOOSER (dialog);
 
-  pdf_filter = add_filter (chooser, _("PDF Files (*.pdf)"), "*.pdf");
-  html_filter = add_filter (chooser, _("HTML Files (*.html)"), "*.html");
-  odt_filter = add_filter (chooser, _("OpenDocument Files (*.odt)"), "*.odt");
-  txt_filter = add_filter (chooser, _("Text Files (*.txt)"), "*.txt");
-  ps_filter = add_filter (chooser, _("PostScript Files (*.ps)"), "*.ps");
-  csv_filter = add_filter (chooser, _("Comma-Separated Value Files (*.csv)"),
-                           "*.csv");
+  list = create_file_type_list ();
+
+  combo = gtk_combo_box_new_with_model (GTK_TREE_MODEL (list));
+
+
+  {
+    /* Create text cell renderer */
+    GtkCellRenderer *cell = gtk_cell_renderer_text_new();
+    gtk_cell_layout_pack_start (GTK_CELL_LAYOUT (combo), cell, FALSE );
+
+    gtk_cell_layout_add_attribute (GTK_CELL_LAYOUT (combo), cell,  "text", 0);
+  }
+
+  g_signal_connect_swapped (combo, "changed", G_CALLBACK (on_combo_change), chooser);
+
+  gtk_combo_box_set_active (GTK_COMBO_BOX (combo), 0);
+
+  gtk_file_chooser_set_extra_widget (chooser, combo);
+
+  /* This kludge is necessary because there is no signal to tell us
+     when the candidate filename of a GtkFileChooser has changed */
+  gtk_container_forall (GTK_CONTAINER (dialog), iterate_widgets, dialog);
+
 
   gtk_file_chooser_set_do_overwrite_confirmation (chooser, TRUE);
-  gtk_file_chooser_set_filter (chooser, pdf_filter);
 
   response = gtk_dialog_run (GTK_DIALOG (dialog));
 
   if ( response == GTK_RESPONSE_ACCEPT )
     {
+      int file_type = gtk_combo_box_get_active (GTK_COMBO_BOX (combo));
       char *filename = gtk_file_chooser_get_filename (chooser);
-      GtkFileFilter *filter = gtk_file_chooser_get_filter (chooser);
       struct string_map options;
 
       g_return_if_fail (filename);
-      g_return_if_fail (filter);
 
+      if (file_type == FT_AUTO)
+       {
+         gint i;
+         for (i = 1 ; i < N_EXTENTIONS ; ++i)
+           {
+             if ( g_str_has_suffix (filename, ft[i].ext))
+               {
+                 file_type = i;
+                 break;
+               }
+           }
+       }
+
+      
       string_map_init (&options);
       string_map_insert (&options, "output-file", filename);
-      if (filter == pdf_filter)
-        {
+
+      switch (file_type)
+       {
+       case FT_PDF:
           export_output (window, &options, "pdf");
-        }
-      else if (filter == html_filter)
-        export_output (window, &options, "html");
-      else if (filter == odt_filter)
-        export_output (window, &options, "odt");
-      else if (filter == txt_filter)
-        {
+         break;
+       case FT_HTML:
+          export_output (window, &options, "html");
+         break;
+       case FT_ODT:
+          export_output (window, &options, "odt");
+         break;
+       case FT_PS:
+          export_output (window, &options, "ps");
+         break;
+       case FT_CSV:
+          export_output (window, &options, "csv");
+         break;
+
+       case FT_TXT:
           string_map_insert (&options, "headers", "false");
           string_map_insert (&options, "paginate", "false");
           string_map_insert (&options, "squeeze", "true");
@@ -507,23 +648,16 @@ psppire_output_window_export (PsppireOutputWindow *window)
           string_map_insert (&options, "top-margin", "0");
           string_map_insert (&options, "bottom-margin", "0");
           export_output (window, &options, "txt");
-        }
-      else if (filter == ps_filter)
-        export_output (window, &options, "ps");
-      else if (filter == csv_filter)
-        export_output (window, &options, "csv");
-      else
-        g_return_if_reached ();
+         break;
+       default:
+         g_assert_not_reached ();
+       }
+
+      string_map_destroy (&options);
 
       free (filename);
     }
 
-  g_object_unref (G_OBJECT (pdf_filter));
-  g_object_unref (G_OBJECT (html_filter));
-  g_object_unref (G_OBJECT (txt_filter));
-  g_object_unref (G_OBJECT (ps_filter));
-  g_object_unref (G_OBJECT (csv_filter));
-
   gtk_widget_destroy (dialog);
 }
 
@@ -532,7 +666,8 @@ enum {
   SELECT_FMT_NULL,
   SELECT_FMT_TEXT,
   SELECT_FMT_UTF8,
-  SELECT_FMT_HTML
+  SELECT_FMT_HTML,
+  SELECT_FMT_ODT
 };
 
 
@@ -551,26 +686,91 @@ struct glyph_pair
   char opt[10];
 };
 
+/* See the table at 
+   http://en.wikipedia.org/wiki/Box-drawing_characters */
 struct glyph_pair table[] = {
+  {0x2500, "box[1010]"},
+  {0x2501, "box[2020]"},
+  {0x2502, "box[0101]"},
+  {0x2503, "box[0202]"},
+
   {0x250C, "box[1100]"},
-  {0x2518, "box[0011]"},
+  {0x250D, "box[2100]"},
+  {0x250E, "box[1200]"},
+  {0x250F, "box[2200]"},
   {0x2510, "box[0110]"},
+  {0x2511, "box[0110]"},
+  {0x2512, "box[0210]"},
+  {0x2513, "box[0220]"},
   {0x2514, "box[1001]"},
-  {0x2502, "box[0101]"},
-  {0x2500, "box[1010]"},
-  {0x2534, "box[1011]"},
+  {0x2515, "box[2001]"},
+  {0x2516, "box[1002]"},
+  {0x2517, "box[2002]"},
+  {0x2518, "box[0011]"},
+  {0x2519, "box[0021]"},
+  {0x251A, "box[0012]"},
+  {0x251B, "box[0022]"},
+  {0x251C, "box[1101]"},
+  {0x251D, "box[2101]"},
+  {0x251E, "box[1102]"},
+  {0x251F, "box[1201]"},
+  {0x2520, "box[1202]"},
+  {0x2521, "box[2102]"},
+  {0x2522, "box[2201]"},
+  {0x2523, "box[2202]"},
+  {0x2524, "box[0111]"},
+  {0x2525, "box[0121]"},
+  {0x2526, "box[0112]"},
+  {0x2527, "box[0211]"},
+  {0x2528, "box[0212]"},
+  {0x2529, "box[0122]"},
+  {0x252A, "box[0221]"},
+  {0x252B, "box[0222]"},
   {0x252C, "box[1110]"},
-  {0x2501, "box[2020]"},
-  {0x2503, "box[0202]"},
+  {0x252D, "box[1120]"},
+  {0x252E, "box[2110]"},
+  {0x252F, "box[2120]"},
+  {0x2530, "box[1210]"},
+  {0x2531, "box[1220]"},
+  {0x2532, "box[2210]"},
+  {0x2533, "box[2220]"},
+  {0x2534, "box[1011]"},
+  {0x2535, "box[1021]"},
+  {0x2536, "box[2011]"},
+  {0x2537, "box[2021]"},
+  {0x2538, "box[1012]"},
+  {0x2539, "box[1022]"},
+  {0x253A, "box[2012]"},
+  {0x253B, "box[2022]"},
+  {0x253C, "box[1111]"},
+  {0x253D, "box[1121]"},
+  {0x253E, "box[2111]"},
   {0x253F, "box[2121]"},
+  {0x2540, "box[1112]"},
+  {0x2541, "box[1211]"},
   {0x2542, "box[1212]"},
+  {0x2543, "box[1122]"},
+  {0x2544, "box[2112]"},
+  {0x2545, "box[1221]"},
+  {0x2546, "box[2211]"},
+  {0x2547, "box[2122]"},
+  {0x2548, "box[2221]"},
+  {0x2549, "box[1222]"},
+  {0x254A, "box[2212]"},
   {0x254B, "box[2222]"},
-  {0x2525, "box[0121]"},
-  {0x2530, "box[1210]"},
-  {0x2538, "box[1012]"},
-  {0x251D, "box[2101]"},
-  {0x2537, "box[2021]"},
-  {0x252F, "box[2120]"}
+
+  {0x2574, "box[0010]"},
+  {0x2575, "box[0001]"},
+  {0x2576, "box[1000]"},
+  {0x2577, "box[0100]"},
+  {0x2578, "box[0020]"},
+  {0x2579, "box[0002]"},
+  {0x257A, "box[2000]"},
+  {0x257B, "box[0200]"},
+  {0x257C, "box[2010]"},
+  {0x257D, "box[0201]"},
+  {0x257E, "box[1020]"},
+  {0x257F, "box[0102]"},
 };
 
 
@@ -598,7 +798,7 @@ clipboard_get_cb (GtkClipboard     *clipboard,
   gsize length;
   gchar *text = NULL;
   struct output_driver *driver = NULL;
-  char *filename = NULL;
+  char dirname[PATH_MAX], *filename;
   struct string_map options;
 
   GtkTreeSelection *sel = gtk_tree_view_get_selection (window->overview);
@@ -610,8 +810,15 @@ clipboard_get_cb (GtkClipboard     *clipboard,
   if ( n == NULL)
     return;
 
+  if (path_search (dirname, sizeof dirname, NULL, NULL, true)
+      || mkdtemp (dirname) == NULL)
+    {
+      error (0, errno, _("failed to create temporary directory"));
+      return;
+    }
+  filename = xasprintf ("%s/clip.tmp", dirname);
+
   string_map_init (&options);
-  filename = tempnam (NULL, NULL);
   string_map_insert (&options, "output-file", filename);
 
   switch (info)
@@ -628,7 +835,12 @@ clipboard_get_cb (GtkClipboard     *clipboard,
       string_map_insert (&options, "format", "html");
       break;
 
+    case SELECT_FMT_ODT:
+      string_map_insert (&options, "format", "odt");
+      break;
+
     default:
+      g_warning ("unsupported clip target\n");
       goto finish;
       break;
     }
@@ -654,6 +866,12 @@ clipboard_get_cb (GtkClipboard     *clipboard,
   if ( driver->class->flush)
     driver->class->flush (driver);
 
+
+  /* Some drivers (eg: the odt one) don't write anything until they
+     are closed */
+  output_driver_destroy (driver);
+  driver = NULL;
+
   if ( g_file_get_contents (filename, &text, &length, NULL) )
     {
       gtk_selection_data_set (selection_data, selection_data->target,
@@ -663,11 +881,14 @@ clipboard_get_cb (GtkClipboard     *clipboard,
 
  finish:
 
-  output_driver_destroy (driver);
+  if (driver != NULL)
+    output_driver_destroy (driver);
+
   g_free (text);
 
   unlink (filename);
   free (filename);
+  rmdir (dirname);
 
   g_list_free (rows);
 }
@@ -688,7 +909,9 @@ static const GtkTargetEntry targets[] = {
   { "UTF8_STRING",   0, SELECT_FMT_UTF8 },
   { "text/plain;charset=utf-8", 0, SELECT_FMT_UTF8 },
 
-  { "text/html",     0, SELECT_FMT_HTML }
+  { "text/html",     0, SELECT_FMT_HTML },
+
+  { "application/vnd.oasis.opendocument.text", 0, SELECT_FMT_ODT }
 };
 
 static void
@@ -719,6 +942,7 @@ static void
 on_select_all (PsppireOutputWindow *window)
 {
   GtkTreeSelection *sel = gtk_tree_view_get_selection (window->overview);
+  gtk_tree_view_expand_all (window->overview);
   gtk_tree_selection_select_all (sel);
 }
 
@@ -819,7 +1043,8 @@ GtkWidget*
 psppire_output_window_new (void)
 {
   return GTK_WIDGET (g_object_new (psppire_output_window_get_type (),
-                                  "filename", "Output",
+                                  /* TRANSLATORS: This will form a filename.  Please avoid whitespace. */
+                                  "filename", _("Output"),
                                   "description", _("Output Viewer"),
                                   NULL));
 }