git.maemo.org Git - modest/blob - src/widgets/modest-gtkhtml-mime-part-view.c

   1 /* Copyright (c) 2006, 2007, Nokia Corporation
   2  * All rights reserved.
   3  *
   4  * Redistribution and use in source and binary forms, with or without
   5  * modification, are permitted provided that the following conditions are
   6  * met:
   7  *
   8  * * Redistributions of source code must retain the above copyright
   9  *   notice, this list of conditions and the following disclaimer.
  10  * * Redistributions in binary form must reproduce the above copyright
  11  *   notice, this list of conditions and the following disclaimer in the
  12  *   documentation and/or other materials provided with the distribution.
  13  * * Neither the name of the Nokia Corporation nor the names of its
  14  *   contributors may be used to endorse or promote products derived from
  15  *   this software without specific prior written permission.
  16  *
  17  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS
  18  * IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
  19  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A
  20  * PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER
  21  * OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
  22  * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
  23  * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
  24  * PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
  25  * LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
  26  * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
  27  * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  28  */
  29
  30 #include <config.h>
  31 #include <widgets/modest-gtkhtml-mime-part-view.h>
  32 #include <string.h>
  33 #include <gtkhtml/gtkhtml-stream.h>
  34 #include <gtkhtml/gtkhtml-search.h>
  35 #include <tny-stream.h>
  36 #include <tny-mime-part-view.h>
  37 #include "modest-tny-mime-part.h"
  38 #include <modest-stream-text-to-html.h>
  39 #include <modest-text-utils.h>
  40 #include <modest-conf.h>
  41 #include <modest-runtime.h>
  42 #include <widgets/modest-mime-part-view.h>
  43 #include <widgets/modest-zoomable.h>
  44 #include <widgets/modest-tny-stream-gtkhtml.h>
  45 #include <libgnomevfs/gnome-vfs.h>
  46 #include <gdk/gdkkeysyms.h>
  47 #include <modest-ui-constants.h>
  48
  49 /* gobject structure methods */
  50 static void    modest_gtkhtml_mime_part_view_class_init (ModestGtkhtmlMimePartViewClass *klass);
  51 static void    tny_mime_part_view_init                  (gpointer g, gpointer iface_data);
  52 static void    modest_mime_part_view_init               (gpointer g, gpointer iface_data);
  53 static void    modest_zoomable_init                     (gpointer g, gpointer iface_data);
  54 static void    modest_isearch_view_init                 (gpointer g, gpointer iface_data);
  55 static void    modest_gtkhtml_mime_part_view_init       (ModestGtkhtmlMimePartView *self);
  56 static void    modest_gtkhtml_mime_part_view_finalize   (GObject *self);
  57 static void    modest_gtkhtml_mime_part_view_dispose    (GObject *self);
  58
  59 /* GtkHTML signal handlers */
  60 static gboolean  on_link_clicked  (GtkWidget *widget, const gchar *uri, ModestGtkhtmlMimePartView *self);
  61 static gboolean  on_url           (GtkWidget *widget, const gchar *uri, ModestGtkhtmlMimePartView *self);
  62 static gboolean  on_url_requested (GtkWidget *widget, const gchar *uri, GtkHTMLStream *stream,
  63                                    ModestGtkhtmlMimePartView *self);
  64 static void      on_notify_style  (GObject *obj, GParamSpec *spec, gpointer userdata);
  65 static gboolean  update_style     (ModestGtkhtmlMimePartView *self);
  66 /* TnyMimePartView implementation */
  67 static void modest_gtkhtml_mime_part_view_clear (TnyMimePartView *self);
  68 static void modest_gtkhtml_mime_part_view_clear_default (TnyMimePartView *self);
  69 static void modest_gtkhtml_mime_part_view_set_part (TnyMimePartView *self, TnyMimePart *part);
  70 static void modest_gtkhtml_mime_part_view_set_part_default (TnyMimePartView *self, TnyMimePart *part);
  71 static TnyMimePart* modest_gtkhtml_mime_part_view_get_part (TnyMimePartView *self);
  72 static TnyMimePart* modest_gtkhtml_mime_part_view_get_part_default (TnyMimePartView *self);
  73 /* ModestMimePartView implementation */
  74 static gboolean modest_gtkhtml_mime_part_view_is_empty (ModestMimePartView *self);
  75 static gboolean modest_gtkhtml_mime_part_view_is_empty_default (ModestMimePartView *self);
  76 static gboolean modest_gtkhtml_mime_part_view_get_view_images (ModestMimePartView *self);
  77 static gboolean modest_gtkhtml_mime_part_view_get_view_images_default (ModestMimePartView *self);
  78 static void     modest_gtkhtml_mime_part_view_set_view_images (ModestMimePartView *self, gboolean view_images);
  79 static void     modest_gtkhtml_mime_part_view_set_view_images_default (ModestMimePartView *self, gboolean view_images);
  80 static gboolean modest_gtkhtml_mime_part_view_has_external_images (ModestMimePartView *self);
  81 static gboolean modest_gtkhtml_mime_part_view_has_external_images_default (ModestMimePartView *self);
  82 /* ModestZoomable implementation */
  83 static gdouble modest_gtkhtml_mime_part_view_get_zoom (ModestZoomable *self);
  84 static void modest_gtkhtml_mime_part_view_set_zoom (ModestZoomable *self, gdouble value);
  85 static gboolean modest_gtkhtml_mime_part_view_zoom_minus (ModestZoomable *self);
  86 static gboolean modest_gtkhtml_mime_part_view_zoom_plus (ModestZoomable *self);
  87 static gdouble modest_gtkhtml_mime_part_view_get_zoom_default (ModestZoomable *self);
  88 static void modest_gtkhtml_mime_part_view_set_zoom_default (ModestZoomable *self, gdouble value);
  89 static gboolean modest_gtkhtml_mime_part_view_zoom_minus_default (ModestZoomable *self);
  90 static gboolean modest_gtkhtml_mime_part_view_zoom_plus_default (ModestZoomable *self);
  91 /* ModestISearchView implementation */
  92 static gboolean modest_gtkhtml_mime_part_view_search                    (ModestISearchView *self, const gchar *string);
  93 static gboolean modest_gtkhtml_mime_part_view_search_next               (ModestISearchView *self);
  94 static gboolean modest_gtkhtml_mime_part_view_get_selection_area        (ModestISearchView *self, gint *x, gint *y,
  95                                                                          gint *width, gint *height);
  96 static gboolean modest_gtkhtml_mime_part_view_search_default            (ModestISearchView *self, const gchar *string);
  97 static gboolean modest_gtkhtml_mime_part_view_search_next_default       (ModestISearchView *self);
  98 static gboolean modest_gtkhtml_mime_part_view_get_selection_area_default (ModestISearchView *self, gint *x, gint *y,
  99                                                                           gint *width, gint *height);
 100
 101
 102 /* internal api */
 103 static TnyMimePart  *get_part   (ModestGtkhtmlMimePartView *self);
 104 static void          set_html_part   (ModestGtkhtmlMimePartView *self, TnyMimePart *part);
 105 static void          set_text_part   (ModestGtkhtmlMimePartView *self, TnyMimePart *part);
 106 static void          set_empty_part  (ModestGtkhtmlMimePartView *self);
 107 static void          set_part   (ModestGtkhtmlMimePartView *self, TnyMimePart *part);
 108 static gboolean      is_empty   (ModestGtkhtmlMimePartView *self);
 109 static gboolean      get_view_images   (ModestGtkhtmlMimePartView *self);
 110 static void          set_view_images   (ModestGtkhtmlMimePartView *self, gboolean view_images);
 111 static gboolean      has_external_images   (ModestGtkhtmlMimePartView *self);
 112 static void          set_zoom   (ModestGtkhtmlMimePartView *self, gdouble zoom);
 113 static gdouble       get_zoom   (ModestGtkhtmlMimePartView *self);
 114 static gboolean      has_contents_receiver (gpointer engine, const gchar *data,
 115                                             size_t len, gboolean *has_contents);
 116 static gboolean      search             (ModestGtkhtmlMimePartView *self, const gchar *string);
 117 static gboolean      search_next        (ModestGtkhtmlMimePartView *self);
 118 static gboolean      get_selection_area (ModestGtkhtmlMimePartView *self, gint *x, gint *y,
 119                                          gint *width, gint *height);
 120
 121 typedef struct _ModestGtkhtmlMimePartViewPrivate ModestGtkhtmlMimePartViewPrivate;
 122 struct _ModestGtkhtmlMimePartViewPrivate {
 123         TnyMimePart *part;
 124         gdouble current_zoom;
 125         gboolean view_images;
 126         gboolean has_external_images;
 127         GSList *sighandlers;
 128 };
 129
 130 #define MODEST_GTKHTML_MIME_PART_VIEW_GET_PRIVATE(o)      (G_TYPE_INSTANCE_GET_PRIVATE((o), \
 131                                                                                        MODEST_TYPE_GTKHTML_MIME_PART_VIEW, \
 132                                                                                        ModestGtkhtmlMimePartViewPrivate))
 133
 134 enum {
 135         STOP_STREAMS_SIGNAL,
 136         LAST_SIGNAL
 137 };
 138
 139 static GtkHTMLClass *parent_class = NULL;
 140
 141 static guint signals[LAST_SIGNAL] = {0};
 142
 143 GtkWidget *
 144 modest_gtkhtml_mime_part_view_new ()
 145 {
 146         return g_object_new (MODEST_TYPE_GTKHTML_MIME_PART_VIEW, NULL);
 147 }
 148
 149 /* GOBJECT IMPLEMENTATION */
 150 GType
 151 modest_gtkhtml_mime_part_view_get_type (void)
 152 {
 153         static GType my_type = 0;
 154         if (!my_type) {
 155                 static const GTypeInfo my_info = {
 156                         sizeof(ModestGtkhtmlMimePartViewClass),
 157                         NULL,           /* base init */
 158                         NULL,           /* base finalize */
 159                         (GClassInitFunc) modest_gtkhtml_mime_part_view_class_init,
 160                         NULL,           /* class finalize */
 161                         NULL,           /* class data */
 162                         sizeof(ModestGtkhtmlMimePartView),
 163                         1,              /* n_preallocs */
 164                         (GInstanceInitFunc) modest_gtkhtml_mime_part_view_init,
 165                         NULL
 166                 };
 167
 168                 static const GInterfaceInfo tny_mime_part_view_info =
 169                 {
 170                   (GInterfaceInitFunc) tny_mime_part_view_init, /* interface_init */
 171                   NULL,         /* interface_finalize */
 172                   NULL          /* interface_data */
 173                 };
 174
 175                 static const GInterfaceInfo modest_mime_part_view_info =
 176                 {
 177                   (GInterfaceInitFunc) modest_mime_part_view_init, /* interface_init */
 178                   NULL,         /* interface_finalize */
 179                   NULL          /* interface_data */
 180                 };
 181
 182                 static const GInterfaceInfo modest_zoomable_info =
 183                 {
 184                   (GInterfaceInitFunc) modest_zoomable_init, /* interface_init */
 185                   NULL,         /* interface_finalize */
 186                   NULL          /* interface_data */
 187                 };
 188
 189                 static const GInterfaceInfo modest_isearch_view_info =
 190                 {
 191                   (GInterfaceInitFunc) modest_isearch_view_init, /* interface_init */
 192                   NULL,         /* interface_finalize */
 193                   NULL          /* interface_data */
 194                 };
 195
 196                 my_type = g_type_register_static (GTK_TYPE_HTML,
 197                                                   "ModestGtkhtmlMimePartView",
 198                                                   &my_info, 0);
 199
 200                 g_type_add_interface_static (my_type, TNY_TYPE_MIME_PART_VIEW,
 201                         &tny_mime_part_view_info);
 202
 203                 g_type_add_interface_static (my_type, MODEST_TYPE_MIME_PART_VIEW,
 204                         &modest_mime_part_view_info);
 205
 206                 g_type_add_interface_static (my_type, MODEST_TYPE_ZOOMABLE,
 207                         &modest_zoomable_info);
 208                 g_type_add_interface_static (my_type, MODEST_TYPE_ISEARCH_VIEW,
 209                         &modest_isearch_view_info);
 210         }
 211         return my_type;
 212 }
 213
 214 static void
 215 modest_gtkhtml_mime_part_view_class_init (ModestGtkhtmlMimePartViewClass *klass)
 216 {
 217         GObjectClass *gobject_class;
 218         GtkBindingSet *binding_set;
 219
 220         gobject_class = (GObjectClass*) klass;
 221
 222         parent_class            = g_type_class_peek_parent (klass);
 223         gobject_class->dispose = modest_gtkhtml_mime_part_view_dispose;
 224         gobject_class->finalize = modest_gtkhtml_mime_part_view_finalize;
 225
 226         klass->get_part_func = modest_gtkhtml_mime_part_view_get_part_default;
 227         klass->set_part_func = modest_gtkhtml_mime_part_view_set_part_default;
 228         klass->clear_func = modest_gtkhtml_mime_part_view_clear_default;
 229         klass->is_empty_func = modest_gtkhtml_mime_part_view_is_empty_default;
 230         klass->get_view_images_func = modest_gtkhtml_mime_part_view_get_view_images_default;
 231         klass->set_view_images_func = modest_gtkhtml_mime_part_view_set_view_images_default;
 232         klass->has_external_images_func = modest_gtkhtml_mime_part_view_has_external_images_default;
 233         klass->get_zoom_func = modest_gtkhtml_mime_part_view_get_zoom_default;
 234         klass->set_zoom_func = modest_gtkhtml_mime_part_view_set_zoom_default;
 235         klass->zoom_minus_func = modest_gtkhtml_mime_part_view_zoom_minus_default;
 236         klass->zoom_plus_func = modest_gtkhtml_mime_part_view_zoom_plus_default;
 237         klass->search_func = modest_gtkhtml_mime_part_view_search_default;
 238         klass->search_next_func = modest_gtkhtml_mime_part_view_search_next_default;
 239         klass->get_selection_area_func = modest_gtkhtml_mime_part_view_get_selection_area_default;
 240
 241         binding_set = gtk_binding_set_by_class (klass);
 242         gtk_binding_entry_skip (binding_set, GDK_Down, 0);
 243         gtk_binding_entry_skip (binding_set, GDK_Up, 0);
 244         gtk_binding_entry_skip (binding_set, GDK_KP_Up, 0);
 245         gtk_binding_entry_skip (binding_set, GDK_KP_Down, 0);
 246         gtk_binding_entry_skip (binding_set, GDK_Page_Down, 0);
 247         gtk_binding_entry_skip (binding_set, GDK_Page_Up, 0);
 248         gtk_binding_entry_skip (binding_set, GDK_KP_Page_Up, 0);
 249         gtk_binding_entry_skip (binding_set, GDK_KP_Page_Down, 0);
 250         gtk_binding_entry_skip (binding_set, GDK_Home, 0);
 251         gtk_binding_entry_skip (binding_set, GDK_End, 0);
 252         gtk_binding_entry_skip (binding_set, GDK_KP_Home, 0);
 253         gtk_binding_entry_skip (binding_set, GDK_KP_End, 0);
 254
 255         g_type_class_add_private (gobject_class, sizeof(ModestGtkhtmlMimePartViewPrivate));
 256
 257         signals[STOP_STREAMS_SIGNAL] =
 258                 g_signal_new ("stop-streams",
 259                               G_TYPE_FROM_CLASS (gobject_class),
 260                               G_SIGNAL_RUN_FIRST,
 261                               G_STRUCT_OFFSET (ModestGtkhtmlMimePartViewClass,stop_streams),
 262                               NULL, NULL,
 263                               g_cclosure_marshal_VOID__VOID,
 264                               G_TYPE_NONE, 0);
 265
 266 }
 267
 268 static void
 269 modest_gtkhtml_mime_part_view_init (ModestGtkhtmlMimePartView *self)
 270 {
 271         ModestGtkhtmlMimePartViewPrivate *priv = MODEST_GTKHTML_MIME_PART_VIEW_GET_PRIVATE (self);
 272         GdkColor base;
 273         GdkColor text;
 274
 275         gtk_html_set_editable        (GTK_HTML(self), FALSE);
 276         gtk_html_allow_selection     (GTK_HTML(self), TRUE);
 277         gtk_html_set_caret_mode      (GTK_HTML(self), FALSE);
 278         gtk_html_set_blocking        (GTK_HTML(self), TRUE);
 279         gtk_html_set_images_blocking (GTK_HTML(self), TRUE);
 280         gtk_container_set_border_width (GTK_CONTAINER (self), MODEST_MARGIN_DEFAULT);
 281
 282 #ifdef MODEST_TOOLKIT_HILDON2
 283 #ifdef HAVE_GTK_HTML_SET_MAX_IMAGE_SIZE
 284         /* We set a maximum width of a bit less than the width of the screen, and a
 285            maximum height of 2 times the full size of the window. Should be enough */
 286         gtk_html_set_max_image_size (GTK_HTML (self), 720, 880);
 287 #endif
 288 #endif
 289
 290         gdk_color_parse ("#fff", &base);
 291         gdk_color_parse ("#000", &text);
 292         gtk_widget_modify_base (GTK_WIDGET (self), GTK_STATE_NORMAL, &base);
 293         gtk_widget_modify_text (GTK_WIDGET (self), GTK_STATE_NORMAL, &text);
 294
 295         priv->sighandlers = modest_signal_mgr_connect (priv->sighandlers,
 296                                                        G_OBJECT(self), "link_clicked",
 297                                                        G_CALLBACK(on_link_clicked), self);
 298         priv->sighandlers = modest_signal_mgr_connect (priv->sighandlers,
 299                                                        G_OBJECT(self), "url_requested",
 300                                                        G_CALLBACK(on_url_requested), self);
 301         priv->sighandlers = modest_signal_mgr_connect (priv->sighandlers,
 302                                                        G_OBJECT(self), "on_url",
 303                                                        G_CALLBACK(on_url), self);
 304         priv->sighandlers = modest_signal_mgr_connect (priv->sighandlers,
 305                                                        G_OBJECT(self), "notify::style",
 306                                                        G_CALLBACK (on_notify_style), (gpointer) self);
 307
 308         priv->part = NULL;
 309         priv->current_zoom = 1.0;
 310         priv->view_images = FALSE;
 311         priv->has_external_images = FALSE;
 312 }
 313
 314 static void
 315 modest_gtkhtml_mime_part_view_finalize (GObject *obj)
 316 {
 317         ModestGtkhtmlMimePartViewPrivate *priv = MODEST_GTKHTML_MIME_PART_VIEW_GET_PRIVATE (obj);
 318
 319         modest_signal_mgr_disconnect_all_and_destroy (priv->sighandlers);
 320         priv->sighandlers = NULL;
 321
 322         G_OBJECT_CLASS (parent_class)->finalize (obj);
 323 }
 324
 325 static void
 326 modest_gtkhtml_mime_part_view_dispose (GObject *obj)
 327 {
 328         ModestGtkhtmlMimePartViewPrivate *priv = MODEST_GTKHTML_MIME_PART_VIEW_GET_PRIVATE (obj);
 329
 330         g_signal_emit (G_OBJECT (obj), signals[STOP_STREAMS_SIGNAL], 0);
 331
 332         if (priv->part) {
 333                 g_object_unref (priv->part);
 334                 priv->part = NULL;
 335         }
 336
 337         G_OBJECT_CLASS (parent_class)->dispose (obj);
 338 }
 339
 340 /* GTKHTML SIGNALS HANDLERS */
 341
 342 static void
 343 on_notify_style (GObject *obj, GParamSpec *spec, gpointer userdata)
 344 {
 345         if (strcmp ("style", spec->name) == 0) {
 346                 g_idle_add_full (G_PRIORITY_DEFAULT, (GSourceFunc) update_style,
 347                                  g_object_ref (obj), g_object_unref);
 348                 gtk_widget_queue_draw (GTK_WIDGET (obj));
 349         }
 350 }
 351
 352 gboolean
 353 same_color (GdkColor *a, GdkColor *b)
 354 {
 355         return ((a->red == b->red) &&
 356                 (a->green == b->green) &&
 357                 (a->blue == b->blue));
 358 }
 359
 360 static gboolean
 361 update_style (ModestGtkhtmlMimePartView *self)
 362 {
 363         GdkColor base;
 364         GdkColor text;
 365         GtkRcStyle *rc_style;
 366
 367         gdk_threads_enter ();
 368
 369         if (GTK_WIDGET_VISIBLE (self)) {
 370                 rc_style = gtk_widget_get_modifier_style (GTK_WIDGET (self));
 371
 372                 gdk_color_parse ("#fff", &base);
 373                 gdk_color_parse ("#000", &text);
 374
 375                 if (!same_color (&(rc_style->base[GTK_STATE_NORMAL]), &base) &&
 376                     !same_color (&(rc_style->text[GTK_STATE_NORMAL]), &text)) {
 377
 378                         rc_style->base[GTK_STATE_NORMAL] = base;
 379                         rc_style->text[GTK_STATE_NORMAL] = text;
 380                         gtk_widget_modify_style (GTK_WIDGET (self), rc_style);
 381                 }
 382         }
 383
 384         gdk_threads_leave ();
 385
 386         return FALSE;
 387 }
 388
 389
 390
 391 static gboolean
 392 on_link_clicked (GtkWidget *widget, const gchar *uri, ModestGtkhtmlMimePartView *self)
 393 {
 394         gboolean result;
 395         g_return_val_if_fail (MODEST_IS_GTKHTML_MIME_PART_VIEW (self), FALSE);
 396
 397         g_signal_emit_by_name (G_OBJECT (self), "activate-link", uri, &result);
 398         return result;
 399 }
 400
 401 static gboolean
 402 on_url (GtkWidget *widget, const gchar *uri, ModestGtkhtmlMimePartView *self)
 403 {
 404         gboolean result;
 405         g_return_val_if_fail (MODEST_IS_GTKHTML_MIME_PART_VIEW (self), FALSE);
 406
 407         g_signal_emit_by_name (G_OBJECT (self), "link-hover", uri, &result);
 408         return result;
 409 }
 410
 411 typedef struct {
 412         gpointer buffer;
 413         GtkHTML *html;
 414         GtkHTMLStream *stream;
 415 } ImageFetcherInfo;
 416
 417 static gboolean
 418 on_url_requested (GtkWidget *widget, const gchar *uri, GtkHTMLStream *stream,
 419                   ModestGtkhtmlMimePartView *self)
 420 {
 421         gboolean result;
 422         TnyStream *tny_stream;
 423         g_return_val_if_fail (MODEST_IS_GTKHTML_MIME_PART_VIEW (self), FALSE);
 424
 425         if (g_str_has_prefix (uri, "http:")) {
 426                 ModestGtkhtmlMimePartViewPrivate *priv = MODEST_GTKHTML_MIME_PART_VIEW_GET_PRIVATE (self);
 427
 428                 if (!priv->view_images)
 429                         priv->has_external_images = TRUE;
 430         }
 431
 432         tny_stream = TNY_STREAM (modest_tny_stream_gtkhtml_new (stream, GTK_HTML (widget)));
 433         g_signal_emit_by_name (MODEST_MIME_PART_VIEW (self), "fetch-url", uri, tny_stream, &result);
 434         g_object_unref (tny_stream);
 435         return result;
 436 }
 437
 438 /* INTERNAL API */
 439 static void
 440 decode_to_stream_cb (TnyMimePart *self,
 441                      gboolean cancelled,
 442                      TnyStream *stream,
 443                      GError *err,
 444                      gpointer user_data)
 445 {
 446         gboolean is_text = GPOINTER_TO_INT (user_data);
 447
 448         if (is_text) {
 449                 if (tny_stream_write (stream, "\n", 1) == -1) {
 450                         g_warning ("failed to write CR in %s", __FUNCTION__);
 451                 }
 452                 tny_stream_reset (stream);
 453         }
 454         tny_stream_close (stream);
 455 }
 456
 457 static void
 458 set_html_part (ModestGtkhtmlMimePartView *self, TnyMimePart *part)
 459 {
 460         GtkHTMLStream *gtkhtml_stream;
 461         TnyStream *tny_stream;
 462
 463         g_return_if_fail (self);
 464         g_return_if_fail (part);
 465
 466         g_signal_emit (G_OBJECT (self), signals[STOP_STREAMS_SIGNAL], 0);
 467
 468         gtkhtml_stream = gtk_html_begin(GTK_HTML(self));
 469
 470         tny_stream     = TNY_STREAM(modest_tny_stream_gtkhtml_new (gtkhtml_stream, GTK_HTML (self)));
 471         tny_stream_reset (tny_stream);
 472
 473         tny_mime_part_decode_to_stream_async (TNY_MIME_PART (part),
 474                                               tny_stream, decode_to_stream_cb,
 475                                               NULL, GINT_TO_POINTER (FALSE));
 476         g_object_unref (tny_stream);
 477 }
 478
 479 static void
 480 set_text_part (ModestGtkhtmlMimePartView *self, TnyMimePart *part)
 481 {
 482         TnyStream* text_to_html_stream, *tny_stream;
 483         GtkHTMLStream *gtkhtml_stream;
 484
 485         g_return_if_fail (self);
 486         g_return_if_fail (part);
 487
 488         g_signal_emit (G_OBJECT (self), signals[STOP_STREAMS_SIGNAL], 0);
 489
 490         gtkhtml_stream = gtk_html_begin(GTK_HTML(self));
 491         tny_stream =  TNY_STREAM(modest_tny_stream_gtkhtml_new (gtkhtml_stream, GTK_HTML (self)));
 492         text_to_html_stream = TNY_STREAM (modest_stream_text_to_html_new (tny_stream));
 493         modest_stream_text_to_html_set_linkify_limit (MODEST_STREAM_TEXT_TO_HTML (text_to_html_stream),
 494                                                       64*1024);
 495         modest_stream_text_to_html_set_full_limit (MODEST_STREAM_TEXT_TO_HTML (text_to_html_stream),
 496                                                    640*1024);
 497
 498         tny_mime_part_decode_to_stream_async (TNY_MIME_PART (part),
 499                                               text_to_html_stream, decode_to_stream_cb,
 500                                               NULL, GINT_TO_POINTER (TRUE));
 501
 502         g_object_unref (G_OBJECT(text_to_html_stream));
 503         g_object_unref (G_OBJECT(tny_stream));
 504 }
 505
 506 static void
 507 set_empty_part (ModestGtkhtmlMimePartView *self)
 508 {
 509         g_return_if_fail (self);
 510
 511         g_signal_emit (G_OBJECT (self), signals[STOP_STREAMS_SIGNAL], 0);
 512         gtk_html_load_from_string (GTK_HTML(self), "", 1);
 513 }
 514
 515 static void
 516 set_part (ModestGtkhtmlMimePartView *self, TnyMimePart *part)
 517 {
 518         ModestGtkhtmlMimePartViewPrivate *priv;
 519
 520         g_return_if_fail (self);
 521
 522         priv = MODEST_GTKHTML_MIME_PART_VIEW_GET_PRIVATE(self);
 523         priv->has_external_images = FALSE;
 524
 525         if (part != priv->part) {
 526                 if (priv->part)
 527                         g_object_unref (G_OBJECT(priv->part));
 528                 if (part)
 529                         g_object_ref   (G_OBJECT(part));
 530                 priv->part = part;
 531         }
 532
 533         if (!part) {
 534                 set_empty_part (self);
 535                 return;
 536         }
 537
 538         if (tny_mime_part_content_type_is (part, "text/html")) {
 539                 set_html_part (self, part);
 540         } else {
 541                 if (tny_mime_part_content_type_is (part, "message/rfc822")) {
 542                         gchar *header_content_type, *header_content_type_lower;
 543                         header_content_type = modest_tny_mime_part_get_header_value (part, "Content-Type");
 544                         if (header_content_type) {
 545                                 header_content_type = g_strstrip (header_content_type);
 546                                 header_content_type_lower = g_ascii_strdown (header_content_type, -1);
 547
 548                                 if (!g_ascii_strcasecmp (header_content_type_lower, "text/html"))
 549                                         set_html_part (self, part);
 550                                 else
 551                                         set_text_part (self, part);
 552
 553                                 g_free (header_content_type_lower);
 554                                 g_free (header_content_type);
 555                         } else {
 556                                 set_text_part (self, part);
 557                         }
 558                 } else {
 559                         set_text_part (self, part);
 560                 }
 561         }
 562
 563 }
 564
 565 static TnyMimePart*
 566 get_part (ModestGtkhtmlMimePartView *self)
 567 {
 568         TnyMimePart *part;
 569
 570         g_return_val_if_fail (MODEST_IS_GTKHTML_MIME_PART_VIEW (self), NULL);
 571
 572         part = MODEST_GTKHTML_MIME_PART_VIEW_GET_PRIVATE(self)->part;
 573
 574         if (part)
 575                 g_object_ref (part);
 576
 577         return part;
 578 }
 579
 580 static gboolean
 581 has_contents_receiver (gpointer engine, const gchar *data,
 582                        size_t len, gboolean *has_contents)
 583 {
 584         if (len > 1 || ((len == 1)&&(data[0]!='\n'))) {
 585                 *has_contents = TRUE;
 586                 return FALSE;
 587         }
 588         return TRUE;
 589 }
 590
 591 static gboolean
 592 is_empty   (ModestGtkhtmlMimePartView *self)
 593 {
 594         /* TODO: Find some gtkhtml API to check whether there is any (visible, non markup)
 595          * text in the message:
 596          */
 597         gboolean has_contents = FALSE;
 598
 599         gtk_html_export (GTK_HTML (self), "text/plain",
 600                          (GtkHTMLSaveReceiverFn) has_contents_receiver, &has_contents);
 601
 602         return !has_contents;
 603 }
 604
 605 static gboolean
 606 get_view_images   (ModestGtkhtmlMimePartView *self)
 607 {
 608         ModestGtkhtmlMimePartViewPrivate *priv;
 609
 610         g_return_val_if_fail (MODEST_IS_GTKHTML_MIME_PART_VIEW (self), FALSE);
 611
 612         priv = MODEST_GTKHTML_MIME_PART_VIEW_GET_PRIVATE (self);
 613         return priv->view_images;
 614 }
 615
 616 static void
 617 set_view_images   (ModestGtkhtmlMimePartView *self, gboolean view_images)
 618 {
 619         ModestGtkhtmlMimePartViewPrivate *priv;
 620
 621         g_return_if_fail (MODEST_IS_GTKHTML_MIME_PART_VIEW (self));
 622
 623         priv = MODEST_GTKHTML_MIME_PART_VIEW_GET_PRIVATE (self);
 624         priv->view_images = view_images;
 625 }
 626
 627 static gboolean
 628 has_external_images   (ModestGtkhtmlMimePartView *self)
 629 {
 630         ModestGtkhtmlMimePartViewPrivate *priv;
 631
 632         g_return_val_if_fail (MODEST_IS_GTKHTML_MIME_PART_VIEW (self), FALSE);
 633
 634         priv = MODEST_GTKHTML_MIME_PART_VIEW_GET_PRIVATE (self);
 635         return priv->has_external_images;
 636 }
 637
 638 static void
 639 set_zoom (ModestGtkhtmlMimePartView *self, gdouble zoom)
 640 {
 641         ModestGtkhtmlMimePartViewPrivate *priv;
 642
 643         g_return_if_fail (MODEST_IS_GTKHTML_MIME_PART_VIEW (self));
 644
 645         priv = MODEST_GTKHTML_MIME_PART_VIEW_GET_PRIVATE (self);
 646         priv->current_zoom = zoom;
 647         gtk_html_set_magnification (GTK_HTML(self), zoom);
 648
 649         gtk_widget_queue_resize (GTK_WIDGET (self));
 650 }
 651
 652 static gdouble
 653 get_zoom (ModestGtkhtmlMimePartView *self)
 654 {
 655         ModestGtkhtmlMimePartViewPrivate *priv;
 656
 657         g_return_val_if_fail (MODEST_IS_GTKHTML_MIME_PART_VIEW (self), 1.0);
 658
 659         priv = MODEST_GTKHTML_MIME_PART_VIEW_GET_PRIVATE (self);
 660
 661         return priv->current_zoom;
 662 }
 663
 664 static gboolean
 665 search (ModestGtkhtmlMimePartView *self,
 666         const gchar *string)
 667 {
 668         return gtk_html_engine_search (GTK_HTML (self),
 669                                        string,
 670                                        FALSE,   /* case sensitive */
 671                                        TRUE,    /* forward */
 672                                        FALSE);  /* regexp */
 673 }
 674
 675 static gboolean
 676 search_next (ModestGtkhtmlMimePartView *self)
 677 {
 678         return gtk_html_engine_search_next (GTK_HTML (self));
 679 }
 680
 681 static gboolean
 682 get_selection_area (ModestGtkhtmlMimePartView *self,
 683                     gint *x, gint *y,
 684                     gint *width, gint *height)
 685 {
 686 #ifdef HAVE_GTK_HTML_GET_SELECTION_AREA
 687         gtk_html_get_selection_area (GTK_HTML (self), x, y, width, height);
 688         return TRUE;
 689 #else
 690         return FALSE;
 691 #endif
 692 }
 693
 694
 695 /* TNY MIME PART IMPLEMENTATION */
 696
 697 static void
 698 tny_mime_part_view_init (gpointer g, gpointer iface_data)
 699 {
 700         TnyMimePartViewIface *klass = (TnyMimePartViewIface *)g;
 701
 702         klass->get_part = modest_gtkhtml_mime_part_view_get_part;
 703         klass->set_part = modest_gtkhtml_mime_part_view_set_part;
 704         klass->clear = modest_gtkhtml_mime_part_view_clear;
 705
 706         return;
 707 }
 708
 709 static TnyMimePart*
 710 modest_gtkhtml_mime_part_view_get_part (TnyMimePartView *self)
 711 {
 712         return MODEST_GTKHTML_MIME_PART_VIEW_GET_CLASS (self)->get_part_func (self);
 713 }
 714
 715
 716 static TnyMimePart*
 717 modest_gtkhtml_mime_part_view_get_part_default (TnyMimePartView *self)
 718 {
 719         return TNY_MIME_PART (get_part (MODEST_GTKHTML_MIME_PART_VIEW (self)));
 720 }
 721
 722 static void
 723 modest_gtkhtml_mime_part_view_set_part (TnyMimePartView *self,
 724                                         TnyMimePart *part)
 725 {
 726         MODEST_GTKHTML_MIME_PART_VIEW_GET_CLASS (self)->set_part_func (self, part);
 727 }
 728
 729 static void
 730 modest_gtkhtml_mime_part_view_set_part_default (TnyMimePartView *self,
 731                                                 TnyMimePart *part)
 732 {
 733         g_return_if_fail ((part == NULL) || TNY_IS_MIME_PART (part));
 734
 735         set_part (MODEST_GTKHTML_MIME_PART_VIEW (self), part);
 736 }
 737
 738 static void
 739 modest_gtkhtml_mime_part_view_clear (TnyMimePartView *self)
 740 {
 741         MODEST_GTKHTML_MIME_PART_VIEW_GET_CLASS (self)->clear_func (self);
 742 }
 743
 744 static void
 745 modest_gtkhtml_mime_part_view_clear_default (TnyMimePartView *self)
 746 {
 747         set_part (MODEST_GTKHTML_MIME_PART_VIEW (self), NULL);
 748 }
 749
 750 /* MODEST MIME PART VIEW IMPLEMENTATION */
 751
 752 static void
 753 modest_mime_part_view_init (gpointer g, gpointer iface_data)
 754 {
 755         ModestMimePartViewIface *klass = (ModestMimePartViewIface *)g;
 756
 757         klass->is_empty_func = modest_gtkhtml_mime_part_view_is_empty;
 758         klass->get_view_images_func = modest_gtkhtml_mime_part_view_get_view_images;
 759         klass->set_view_images_func = modest_gtkhtml_mime_part_view_set_view_images;
 760         klass->has_external_images_func = modest_gtkhtml_mime_part_view_has_external_images;
 761
 762         return;
 763 }
 764
 765 static gboolean
 766 modest_gtkhtml_mime_part_view_is_empty (ModestMimePartView *self)
 767 {
 768         return MODEST_GTKHTML_MIME_PART_VIEW_GET_CLASS (self)->is_empty_func (self);
 769 }
 770
 771 static gboolean
 772 modest_gtkhtml_mime_part_view_get_view_images (ModestMimePartView *self)
 773 {
 774         return MODEST_GTKHTML_MIME_PART_VIEW_GET_CLASS (self)->get_view_images_func (self);
 775 }
 776
 777 static void
 778 modest_gtkhtml_mime_part_view_set_view_images (ModestMimePartView *self, gboolean view_images)
 779 {
 780         MODEST_GTKHTML_MIME_PART_VIEW_GET_CLASS (self)->set_view_images_func (self, view_images);
 781 }
 782
 783 static gboolean
 784 modest_gtkhtml_mime_part_view_has_external_images (ModestMimePartView *self)
 785 {
 786         return MODEST_GTKHTML_MIME_PART_VIEW_GET_CLASS (self)->has_external_images_func (self);
 787 }
 788
 789 static gboolean
 790 modest_gtkhtml_mime_part_view_is_empty_default (ModestMimePartView *self)
 791 {
 792         return is_empty (MODEST_GTKHTML_MIME_PART_VIEW (self));
 793 }
 794
 795 static gboolean
 796 modest_gtkhtml_mime_part_view_get_view_images_default (ModestMimePartView *self)
 797 {
 798         return get_view_images (MODEST_GTKHTML_MIME_PART_VIEW (self));
 799 }
 800
 801 static void
 802 modest_gtkhtml_mime_part_view_set_view_images_default (ModestMimePartView *self, gboolean view_images)
 803 {
 804         set_view_images (MODEST_GTKHTML_MIME_PART_VIEW (self), view_images);
 805 }
 806
 807 static gboolean
 808 modest_gtkhtml_mime_part_view_has_external_images_default (ModestMimePartView *self)
 809 {
 810         return has_external_images (MODEST_GTKHTML_MIME_PART_VIEW (self));
 811 }
 812
 813
 814 /* MODEST ZOOMABLE IMPLEMENTATION */
 815 static void
 816 modest_zoomable_init (gpointer g, gpointer iface_data)
 817 {
 818         ModestZoomableIface *klass = (ModestZoomableIface *)g;
 819
 820         klass->get_zoom_func = modest_gtkhtml_mime_part_view_get_zoom;
 821         klass->set_zoom_func = modest_gtkhtml_mime_part_view_set_zoom;
 822         klass->zoom_minus_func = modest_gtkhtml_mime_part_view_zoom_minus;
 823         klass->zoom_plus_func = modest_gtkhtml_mime_part_view_zoom_plus;
 824
 825         return;
 826 }
 827
 828 static gdouble
 829 modest_gtkhtml_mime_part_view_get_zoom (ModestZoomable *self)
 830 {
 831         return MODEST_GTKHTML_MIME_PART_VIEW_GET_CLASS (self)->get_zoom_func (self);
 832 }
 833
 834 static gdouble
 835 modest_gtkhtml_mime_part_view_get_zoom_default (ModestZoomable *self)
 836 {
 837         return get_zoom (MODEST_GTKHTML_MIME_PART_VIEW (self));
 838 }
 839
 840 static void
 841 modest_gtkhtml_mime_part_view_set_zoom (ModestZoomable *self, gdouble value)
 842 {
 843         MODEST_GTKHTML_MIME_PART_VIEW_GET_CLASS (self)->set_zoom_func (self, value);
 844 }
 845
 846 static void
 847 modest_gtkhtml_mime_part_view_set_zoom_default (ModestZoomable *self, gdouble value)
 848 {
 849         set_zoom (MODEST_GTKHTML_MIME_PART_VIEW (self), value);
 850 }
 851
 852 static gboolean
 853 modest_gtkhtml_mime_part_view_zoom_minus (ModestZoomable *self)
 854 {
 855         return MODEST_GTKHTML_MIME_PART_VIEW_GET_CLASS (self)->zoom_minus_func (self);
 856 }
 857
 858 static gboolean
 859 modest_gtkhtml_mime_part_view_zoom_minus_default (ModestZoomable *self)
 860 {
 861         /* operation not supported in ModestGtkhtmlMimePartView */
 862         return FALSE;
 863 }
 864
 865 static gboolean
 866 modest_gtkhtml_mime_part_view_zoom_plus (ModestZoomable *self)
 867 {
 868         return MODEST_GTKHTML_MIME_PART_VIEW_GET_CLASS (self)->zoom_plus_func (self);
 869 }
 870
 871 static gboolean
 872 modest_gtkhtml_mime_part_view_zoom_plus_default (ModestZoomable *self)
 873 {
 874         /* operation not supported in ModestGtkhtmlMimePartView */
 875         return FALSE;
 876 }
 877
 878 /* ISEARCH VIEW IMPLEMENTATION */
 879 static void
 880 modest_isearch_view_init (gpointer g, gpointer iface_data)
 881 {
 882         ModestISearchViewIface *klass = (ModestISearchViewIface *)g;
 883
 884         klass->search_func = modest_gtkhtml_mime_part_view_search;
 885         klass->search_next_func = modest_gtkhtml_mime_part_view_search_next;
 886         klass->get_selection_area_func = modest_gtkhtml_mime_part_view_get_selection_area;
 887
 888         return;
 889 }
 890
 891 static gboolean
 892 modest_gtkhtml_mime_part_view_search (ModestISearchView *self, const gchar *string)
 893 {
 894         return MODEST_GTKHTML_MIME_PART_VIEW_GET_CLASS (self)->search_func (self, string);
 895 }
 896
 897 static gboolean
 898 modest_gtkhtml_mime_part_view_search_default (ModestISearchView *self, const gchar *string)
 899 {
 900         return search (MODEST_GTKHTML_MIME_PART_VIEW (self), string);
 901 }
 902
 903 static gboolean
 904 modest_gtkhtml_mime_part_view_search_next(ModestISearchView *self)
 905 {
 906         return MODEST_GTKHTML_MIME_PART_VIEW_GET_CLASS (self)->search_next_func (self);
 907 }
 908
 909 static gboolean
 910 modest_gtkhtml_mime_part_view_search_next_default (ModestISearchView *self)
 911 {
 912         return search_next (MODEST_GTKHTML_MIME_PART_VIEW (self));
 913 }
 914
 915 static gboolean
 916 modest_gtkhtml_mime_part_view_get_selection_area (ModestISearchView *self, gint *x, gint *y,
 917                                                   gint *width, gint *height)
 918 {
 919         return MODEST_GTKHTML_MIME_PART_VIEW_GET_CLASS (self)->get_selection_area_func (self, x, y, width, height);
 920 }
 921
 922 static gboolean
 923 modest_gtkhtml_mime_part_view_get_selection_area_default (ModestISearchView *self, gint *x, gint *y,
 924                                                           gint *width, gint *height)
 925 {
 926         return get_selection_area (MODEST_GTKHTML_MIME_PART_VIEW (self), x, y, width, height);
 927 }