From 8663b54cae296883452850f3baad6d4cbc92e220 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Dan=20Vr=C3=A1til?= Date: Wed, 25 Jul 2012 11:29:22 +0200 Subject: Highlighting of text parts and source codes This adds 'Format as' submenu to the preview pane context menu. The submenu is available only for text/plain parts or parts with a source code (we support about 40 various types). Using the 'highlight' utility, the formatter processes the part and highlights the source code it contains. (discussion in bug #680026) --- .../e-mail-formatter-text-highlight.c | 391 +++++++++++++++++++++ 1 file changed, 391 insertions(+) create mode 100644 modules/text-highlight/e-mail-formatter-text-highlight.c (limited to 'modules/text-highlight/e-mail-formatter-text-highlight.c') diff --git a/modules/text-highlight/e-mail-formatter-text-highlight.c b/modules/text-highlight/e-mail-formatter-text-highlight.c new file mode 100644 index 0000000000..e216245500 --- /dev/null +++ b/modules/text-highlight/e-mail-formatter-text-highlight.c @@ -0,0 +1,391 @@ +/* + * text-highlight.c + * + * This program is free software; you can redistribute it and/or + * modify it under the terms of the GNU Lesser General Public + * License as published by the Free Software Foundation; either + * version 2 of the License, or (at your option) version 3. + * + * 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 + * Lesser General Public License for more details. + * + * You should have received a copy of the GNU Lesser General Public + * License along with the program; if not, see + * + */ + +#ifdef HAVE_CONFIG_H +#include +#endif + +#include "e-mail-formatter-text-highlight.h" +#include "languages.h" + +#include +#include +#include +#include + +#include +#include + +#include +#include + +#include +#include +#include + +typedef struct _EMailFormatterTextHighlight EMailFormatterTextHighlight; +typedef struct _EMailFormatterTextHighlightClass EMailFormatterTextHighlightClass; + +struct _EMailFormatterTextHighlight { + EExtension parent; +}; + +struct _EMailFormatterTextHighlightClass { + EExtensionClass parent_class; +}; + +GType e_mail_formatter_text_highlight_get_type (void); +static void e_mail_formatter_formatter_extension_interface_init (EMailFormatterExtensionInterface *iface); +static void e_mail_formatter_mail_extension_interface_init (EMailExtensionInterface *iface); + +G_DEFINE_DYNAMIC_TYPE_EXTENDED ( + EMailFormatterTextHighlight, + e_mail_formatter_text_highlight, + E_TYPE_EXTENSION, + 0, + G_IMPLEMENT_INTERFACE_DYNAMIC ( + E_TYPE_MAIL_EXTENSION, + e_mail_formatter_mail_extension_interface_init) + G_IMPLEMENT_INTERFACE_DYNAMIC ( + E_TYPE_MAIL_FORMATTER_EXTENSION, + e_mail_formatter_formatter_extension_interface_init)); + +static gchar * +get_default_font (void) +{ + gchar *font; + GSettings *settings; + + settings = g_settings_new ("org.gnome.desktop.interface"); + + font = g_settings_get_string (settings, "monospace-font-name"); + + g_object_unref (settings); + + return font ? font : g_strdup ("monospace 10"); +} + +static gchar * +get_syntax (EMailPart *part, + const gchar *uri) +{ + gchar *syntax = NULL; + + if (uri) { + SoupURI *soup_uri = soup_uri_new (uri); + GHashTable *query = soup_form_decode (soup_uri->query); + + syntax = g_hash_table_lookup (query, "__formatas"); + if (syntax) { + syntax = g_strdup (syntax); + } + g_hash_table_destroy (query); + soup_uri_free (soup_uri); + } + + /* Try to detect syntax from attachment filename extension */ + if (syntax == NULL) { + const gchar *filename = camel_mime_part_get_filename (part->part); + if (filename) { + gchar *ext = g_strrstr (filename, "."); + if (ext) { + syntax = (gchar *) get_syntax_for_ext (ext + 1); + syntax = g_strdup (syntax ? syntax : "txt"); + } + } + } + + /* Try it by mime type */ + if (syntax == NULL) { + CamelContentType *ct = camel_mime_part_get_content_type (part->part); + if (ct) { + gchar *mime_type = camel_content_type_simple (ct); + + syntax = (gchar *) get_syntax_for_mime_type (mime_type); + syntax = g_strdup (syntax ? syntax : "txt"); + g_free (mime_type); + } + } + + /* Out of ideas - use plain text */ + if (syntax == NULL) { + syntax = g_strdup ("txt"); + } + + return syntax; +} + +static gboolean +emfe_text_highlight_format (EMailFormatterExtension *extension, + EMailFormatter *formatter, + EMailFormatterContext *context, + EMailPart *part, + CamelStream *stream, + GCancellable *cancellable) +{ + /* Don't format text/html unless it's an attachment */ + CamelContentType *ct = camel_mime_part_get_content_type (part->part); + if (ct && camel_content_type_is (ct, "text", "html")) { + const CamelContentDisposition *disp; + disp = camel_mime_part_get_content_disposition (part->part); + + if (!disp || g_strcmp0 (disp->disposition, "attachment") != 0) + return FALSE; + } + + + if (context->mode == E_MAIL_FORMATTER_MODE_PRINTING) { + + CamelDataWrapper *dw; + CamelStream *filter_stream; + CamelMimeFilter *mime_filter; + + dw = camel_medium_get_content (CAMEL_MEDIUM (part->part)); + if (!dw) { + return FALSE; + } + + camel_stream_write_string ( + stream, "
", cancellable, NULL);
+
+		filter_stream = camel_stream_filter_new (stream);
+		mime_filter = camel_mime_filter_tohtml_new (
+				CAMEL_MIME_FILTER_TOHTML_PRE |
+				CAMEL_MIME_FILTER_TOHTML_CONVERT_SPACES, 0);
+		camel_stream_filter_add (
+			CAMEL_STREAM_FILTER (filter_stream), mime_filter);
+		g_object_unref (mime_filter);
+
+		e_mail_formatter_format_text (
+			formatter, part, filter_stream, cancellable);
+
+		camel_stream_flush (filter_stream, cancellable, NULL);
+		g_object_unref (filter_stream);
+
+		camel_stream_write_string (
+			stream, "
", cancellable, NULL); + + return TRUE; + + } else if (context->mode == E_MAIL_FORMATTER_MODE_RAW) { + gint stdin, stdout; + GPid pid; + CamelStream *read, *write; + CamelDataWrapper *dw; + gchar *font_family, *font_size, *syntax; + gboolean use_custom_font; + EShell *shell; + EShellSettings *settings; + PangoFontDescription *fd; + const gchar *argv[] = { "highlight", + NULL, /* --font= */ + NULL, /* --font-size= */ + NULL, /* --syntax= */ + "--out-format=html", + "--include-style", + "--inline-css", + "--style=bclear", + "--failsafe", + NULL }; + + dw = camel_medium_get_content (CAMEL_MEDIUM (part->part)); + if (!dw) { + return FALSE; + } + + syntax = get_syntax (part, context->uri); + + /* Use the traditional text/plain formatter for plain-text */ + if (g_strcmp0 (syntax, "txt") == 0) { + g_free (syntax); + return FALSE; + } + + shell = e_shell_get_default (); + settings = e_shell_get_shell_settings (shell); + + fd = NULL; + use_custom_font = e_shell_settings_get_boolean ( + settings, "mail-use-custom-fonts"); + if (!use_custom_font) { + gchar *font; + + font = get_default_font (); + fd = pango_font_description_from_string (font); + g_free (font); + + } else { + gchar *font; + + font = e_shell_settings_get_string ( + settings, "mail-font-monospace"); + if (!font) + font = get_default_font (); + + fd = pango_font_description_from_string (font); + g_free (font); + } + + font_family = g_strdup_printf ("--font='%s'", + pango_font_description_get_family (fd)); + font_size = g_strdup_printf ("--font-size=%d", + pango_font_description_get_size (fd) / PANGO_SCALE); + + argv[1] = font_family; + argv[2] = font_size; + argv[3] = g_strdup_printf ("--syntax=%s", syntax); + g_free (syntax); + + if (!g_spawn_async_with_pipes ( + NULL, (gchar **) argv, NULL, + G_SPAWN_SEARCH_PATH | + G_SPAWN_DO_NOT_REAP_CHILD, + NULL, NULL, &pid, &stdin, &stdout, NULL, NULL)) { + return FALSE; + } + + write = camel_stream_fs_new_with_fd (stdin); + read = camel_stream_fs_new_with_fd (stdout); + + camel_data_wrapper_decode_to_stream_sync ( + dw, write, cancellable, NULL); + g_object_unref (write); + + g_spawn_close_pid (pid); + + g_seekable_seek (G_SEEKABLE (read), 0, G_SEEK_SET, cancellable, NULL); + camel_stream_write_to_stream (read, stream, cancellable, NULL); + g_object_unref (read); + + g_free (font_family); + g_free (font_size); + g_free ((gchar *) argv[3]); + pango_font_description_free (fd); + + } else { + gchar *uri, *str; + gchar *syntax; + + syntax = get_syntax (part, NULL); + + uri = e_mail_part_build_uri ( + context->folder, context->message_uid, + "part_id", G_TYPE_STRING, part->id, + "mode", G_TYPE_INT, E_MAIL_FORMATTER_MODE_RAW, + "__formatas", G_TYPE_STRING, syntax, + NULL); + + g_free (syntax); + + str = g_strdup_printf ( + "
" + "
\n" + "" + "
", + e_color_to_value ((GdkColor *) + e_mail_formatter_get_color ( + formatter, E_MAIL_FORMATTER_COLOR_FRAME)), + e_color_to_value ((GdkColor *) + e_mail_formatter_get_color ( + formatter, E_MAIL_FORMATTER_COLOR_CONTENT)), + part->id, uri); + + camel_stream_write_string (stream, str, cancellable, NULL); + + g_free (str); + g_free (uri); + + } + + return TRUE; +} + +static const gchar * +emfe_text_highlight_get_display_name (EMailFormatterExtension *extension) +{ + return _("Text Highlight"); +} + +static const gchar * +emfe_text_highlight_get_description (EMailFormatterExtension *extension) +{ + return _("Syntax highlighting of mail parts"); +} + +static const gchar ** +emfe_text_highlight_mime_types (EMailExtension *extension) +{ + return get_mime_types (); +} + +static void +emfe_text_highlight_constructed (GObject *object) +{ + EExtensible *extensible; + EMailExtensionRegistry *reg; + + extensible = e_extension_get_extensible (E_EXTENSION (object)); + reg = E_MAIL_EXTENSION_REGISTRY (extensible); + + e_mail_extension_registry_add_extension (reg, E_MAIL_EXTENSION (object)); +} + +static void +e_mail_formatter_text_highlight_init (EMailFormatterTextHighlight *object) +{ +} + +static void +e_mail_formatter_text_highlight_class_init (EMailFormatterTextHighlightClass *class) +{ + GObjectClass *object_class; + EExtensionClass *extension_class; + + object_class = G_OBJECT_CLASS (class); + object_class->constructed = emfe_text_highlight_constructed; + + extension_class = E_EXTENSION_CLASS (class); + extension_class->extensible_type = E_TYPE_MAIL_FORMATTER_EXTENSION_REGISTRY; +} + +static void +e_mail_formatter_text_highlight_class_finalize (EMailFormatterTextHighlightClass *class) +{ +} + +void +e_mail_formatter_text_highlight_type_register (GTypeModule *type_module) +{ + e_mail_formatter_text_highlight_register_type (type_module); +} + +static void +e_mail_formatter_formatter_extension_interface_init (EMailFormatterExtensionInterface *iface) +{ + iface->format = emfe_text_highlight_format; + iface->get_display_name = emfe_text_highlight_get_display_name; + iface->get_description = emfe_text_highlight_get_description; +} + +static void +e_mail_formatter_mail_extension_interface_init (EMailExtensionInterface *iface) +{ + iface->mime_types = emfe_text_highlight_mime_types; +} -- cgit v1.2.3