+static void
+psppire_output_window_export (PsppireOutputWindow *window)
+{
+ gint response;
+
+ 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"),
+ 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");
+
+ 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 )
+ {
+ 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);
+
+ string_map_init (&options);
+ string_map_insert (&options, "output-file", filename);
+ if (filter == pdf_filter)
+ {
+ string_map_insert (&options, "output-type", "pdf");
+ export_output (window, &options, "cairo");
+ }
+ else if (filter == html_filter)
+ export_output (window, &options, "html");
+ else if (filter == odt_filter)
+ export_output (window, &options, "odf");
+ else if (filter == txt_filter)
+ {
+ string_map_insert (&options, "headers", "false");
+ string_map_insert (&options, "paginate", "false");
+ string_map_insert (&options, "squeeze", "true");
+ string_map_insert (&options, "emphasis", "none");
+ string_map_insert (&options, "chart-type", "none");
+ string_map_insert (&options, "top-margin", "0");
+ string_map_insert (&options, "bottom-margin", "0");
+ export_output (window, &options, "ascii");
+ }
+ else if (filter == ps_filter)
+ {
+ string_map_insert (&options, "output-type", "ps");
+ export_output (window, &options, "cairo");
+ }
+ else if (filter == csv_filter)
+ export_output (window, &options, "csv");
+ else
+ g_return_if_reached ();
+
+ free (filename);
+ }