git.maemo.org Git - modest/blob - src/modest-tny-msg-view.c

   1 /* modest-tny-msg-view.c */
   2
   3 /* insert (c)/licensing information) */
   4
   5 #include "modest-tny-msg-view.h"
   6 #include "modest-tny-stream-gtkhtml.h"
   7 #include "modest-tny-msg-actions.h"
   8
   9 #include <tny-text-buffer-stream.h>
  10 #include <string.h>
  11 #include <regex.h>
  12 #include <ctype.h>
  13 #include <glib/gi18n.h>
  14 #include <gtkhtml/gtkhtml.h>
  15 #include <gtkhtml/gtkhtml-stream.h>
  16
  17 /* 'private'/'protected' functions */
  18 static void     modest_tny_msg_view_class_init   (ModestTnyMsgViewClass *klass);
  19 static void     modest_tny_msg_view_init         (ModestTnyMsgView *obj);
  20 static void     modest_tny_msg_view_finalize     (GObject *obj);
  21
  22
  23 static GSList*  get_url_matches (GString *txt);
  24 static gboolean fill_gtkhtml_with_txt (ModestTnyMsgView *self, GtkHTML* gtkhtml, const gchar* txt, TnyMsgIface *msg);
  25
  26 static gboolean on_link_clicked (GtkWidget *widget, const gchar *uri,
  27                                  ModestTnyMsgView *msg_view);
  28 static gboolean on_url_requested (GtkWidget *widget, const gchar *uri,
  29                                   GtkHTMLStream *stream,
  30                                   ModestTnyMsgView *msg_view);
  31 static gchar *construct_virtual_filename(const gchar *filename, const gint position, const gchar *id, const gboolean active);
  32 static gchar *construct_virtual_filename_from_mime_part(TnyMsgMimePartIface *msg, const gint position);
  33 gint virtual_filename_get_pos(const gchar *filename);
  34 /*
  35  * we need these regexps to find URLs in plain text e-mails
  36  */
  37 typedef struct _UrlMatchPattern UrlMatchPattern;
  38 struct _UrlMatchPattern {
  39         gchar   *regex;
  40         regex_t *preg;
  41         gchar   *prefix;
  42
  43 };
  44 #define MAIL_VIEWER_URL_MATCH_PATTERNS  {\
  45         { "(file|http|ftp|https)://[-A-Za-z0-9_$.+!*(),;:@%&=?/~#]+[-A-Za-z0-9_$%&=?/~#]",\
  46           NULL, NULL },\
  47         { "www\\.[-a-z0-9.]+[-a-z0-9](:[0-9]*)?(/[-A-Za-z0-9_$.+!*(),;:@%&=?/~#]*[^]}\\),?!;:\"]?)?",\
  48           NULL, "http://" },\
  49         { "ftp\\.[-a-z0-9.]+[-a-z0-9](:[0-9]*)?(/[-A-Za-z0-9_$.+!*(),;:@%&=?/~#]*[^]}\\),?!;:\"]?)?",\
  50           NULL, "ftp://" },\
  51         { "(voipto|callto|chatto|jabberto|xmpp):[-_a-z@0-9.\\+]+", \
  52            NULL, NULL},                                             \
  53         { "mailto:[-_a-z0-9.\\+]+@[-_a-z0-9.]+",                    \
  54           NULL, NULL},\
  55         { "[-_a-z0-9.\\+]+@[-_a-z0-9.]+",\
  56           NULL, "mailto:"}\
  57         }
  58
  59
  60 /* list my signals */
  61 enum {
  62         /* MY_SIGNAL_1, */
  63         /* MY_SIGNAL_2, */
  64         LAST_SIGNAL
  65 };
  66
  67 typedef struct _ModestTnyMsgViewPrivate ModestTnyMsgViewPrivate;
  68 struct _ModestTnyMsgViewPrivate {
  69         GtkWidget *gtkhtml;
  70         TnyMsgIface *msg;
  71         ModestConf *conf;
  72 };
  73 #define MODEST_TNY_MSG_VIEW_GET_PRIVATE(o)      (G_TYPE_INSTANCE_GET_PRIVATE((o), \
  74                                                  MODEST_TYPE_TNY_MSG_VIEW, \
  75                                                  ModestTnyMsgViewPrivate))
  76 /* globals */
  77 static GtkContainerClass *parent_class = NULL;
  78
  79 /* uncomment the following if you have defined any signals */
  80 /* static guint signals[LAST_SIGNAL] = {0}; */
  81
  82 GType
  83 modest_tny_msg_view_get_type (void)
  84 {
  85         static GType my_type = 0;
  86         if (!my_type) {
  87                 static const GTypeInfo my_info = {
  88                         sizeof(ModestTnyMsgViewClass),
  89                         NULL,           /* base init */
  90                         NULL,           /* base finalize */
  91                         (GClassInitFunc) modest_tny_msg_view_class_init,
  92                         NULL,           /* class finalize */
  93                         NULL,           /* class data */
  94                         sizeof(ModestTnyMsgView),
  95                         1,              /* n_preallocs */
  96                         (GInstanceInitFunc) modest_tny_msg_view_init,
  97                 };
  98                 my_type = g_type_register_static (GTK_TYPE_SCROLLED_WINDOW,
  99                                                   "ModestTnyMsgView",
 100                                                   &my_info, 0);
 101         }
 102         return my_type;
 103 }
 104
 105 static void
 106 modest_tny_msg_view_class_init (ModestTnyMsgViewClass *klass)
 107 {
 108         GObjectClass *gobject_class;
 109         gobject_class = (GObjectClass*) klass;
 110
 111         parent_class            = g_type_class_peek_parent (klass);
 112         gobject_class->finalize = modest_tny_msg_view_finalize;
 113
 114         g_type_class_add_private (gobject_class, sizeof(ModestTnyMsgViewPrivate));
 115 }
 116
 117 static void
 118 modest_tny_msg_view_init (ModestTnyMsgView *obj)
 119 {
 120         ModestTnyMsgViewPrivate *priv;
 121
 122         priv = MODEST_TNY_MSG_VIEW_GET_PRIVATE(obj);
 123
 124         priv->msg = NULL;
 125
 126         priv->gtkhtml = gtk_html_new();
 127
 128         priv->conf = NULL;
 129
 130         gtk_html_set_editable        (GTK_HTML(priv->gtkhtml), FALSE);
 131         gtk_html_allow_selection     (GTK_HTML(priv->gtkhtml), TRUE);
 132         gtk_html_set_caret_mode      (GTK_HTML(priv->gtkhtml), FALSE);
 133         gtk_html_set_blocking        (GTK_HTML(priv->gtkhtml), FALSE);
 134         gtk_html_set_images_blocking (GTK_HTML(priv->gtkhtml), FALSE);
 135
 136         g_signal_connect (G_OBJECT(priv->gtkhtml), "link_clicked",
 137                           G_CALLBACK(on_link_clicked), obj);
 138
 139         g_signal_connect (G_OBJECT(priv->gtkhtml), "url_requested",
 140                           G_CALLBACK(on_url_requested), obj);
 141 }
 142
 143
 144 static void
 145 modest_tny_msg_view_finalize (GObject *obj)
 146 {
 147
 148 }
 149
 150 GtkWidget*
 151 modest_tny_msg_view_new (TnyMsgIface *msg, ModestConf *conf)
 152 {
 153         GObject *obj;
 154         ModestTnyMsgView* self;
 155         ModestTnyMsgViewPrivate *priv;
 156
 157         obj  = G_OBJECT(g_object_new(MODEST_TYPE_TNY_MSG_VIEW, NULL));
 158         self = MODEST_TNY_MSG_VIEW(obj);
 159         priv = MODEST_TNY_MSG_VIEW_GET_PRIVATE (self);
 160
 161         gtk_scrolled_window_set_policy(GTK_SCROLLED_WINDOW(self),
 162                                        GTK_POLICY_AUTOMATIC,
 163                                        GTK_POLICY_AUTOMATIC);
 164
 165         if (priv->gtkhtml)
 166                 gtk_container_add (GTK_CONTAINER(obj), priv->gtkhtml);
 167
 168         if (msg)
 169                 modest_tny_msg_view_set_message (self, msg);
 170
 171         priv->conf = conf;
 172
 173         return GTK_WIDGET(self);
 174 }
 175
 176
 177
 178 static gboolean
 179 on_link_clicked (GtkWidget *widget, const gchar *uri,
 180                                  ModestTnyMsgView *msg_view)
 181 {
 182         ModestTnyMsgViewPrivate *priv;
 183
 184
 185         if (g_str_has_prefix(uri, "attachment:")) {
 186                 priv = MODEST_TNY_MSG_VIEW_GET_PRIVATE(msg_view);
 187                 /* toggle ...SHOW_ATTACHMENTS_INLINE */
 188                 modest_conf_set_bool(priv->conf,
 189                                                          MODEST_CONF_MSG_VIEW_SHOW_ATTACHMENTS_INLINE,
 190                                                          !modest_conf_get_bool(priv->conf,
 191                                                                                                    MODEST_CONF_MSG_VIEW_SHOW_ATTACHMENTS_INLINE,
 192                                                                                                    NULL),
 193                                                          NULL);
 194
 195                 modest_tny_msg_view_set_message(msg_view, priv->msg);
 196                 return TRUE;
 197         }
 198         g_message ("link clicked: %s", uri); /* FIXME */
 199         return FALSE;
 200
 201 }
 202
 203
 204
 205 static TnyMsgMimePartIface *
 206 find_cid_image (TnyMsgIface *msg, const gchar *cid)
 207 {
 208         TnyMsgMimePartIface *part = NULL;
 209         GList *parts;
 210
 211         g_return_val_if_fail (msg, NULL);
 212         g_return_val_if_fail (cid, NULL);
 213
 214         parts  = (GList*) tny_msg_iface_get_parts (msg);
 215         while (parts && !part) {
 216                 const gchar *part_cid;
 217                 part = TNY_MSG_MIME_PART_IFACE(parts->data);
 218                 part_cid = tny_msg_mime_part_iface_get_content_id (part);
 219                 printf("CMP:%s:%s\n", cid, part_cid);
 220                 if (part_cid && strcmp (cid, part_cid) == 0)
 221                         return part; /* we found it! */
 222
 223                 part = NULL;
 224                 parts = parts->next;
 225         }
 226
 227         return part;
 228 }
 229
 230
 231 static TnyMsgMimePartIface *
 232 find_attachment_by_filename (TnyMsgIface *msg, const gchar *fn)
 233 {
 234         TnyMsgMimePartIface *part = NULL;
 235         GList *parts;
 236         gchar *dummy;
 237         gint pos;
 238
 239         g_return_val_if_fail (msg, NULL);
 240         g_return_val_if_fail (fn, NULL);
 241
 242         parts  = (GList*) tny_msg_iface_get_parts (msg);
 243         pos = virtual_filename_get_pos(fn);
 244
 245         g_return_val_if_fail(((pos >= 0) && (pos < g_list_length(parts))), NULL);
 246
 247         part = g_list_nth_data(parts, pos);
 248
 249         dummy = construct_virtual_filename_from_mime_part(part, pos);
 250         if (strcmp(dummy, fn) == 0) {
 251                 g_free(dummy);
 252                 return part;
 253         } else {
 254                 g_free(dummy);
 255                 return NULL;
 256         }
 257 }
 258
 259
 260 static gboolean
 261 on_url_requested (GtkWidget *widget, const gchar *uri,
 262                   GtkHTMLStream *stream,
 263                   ModestTnyMsgView *msg_view)
 264 {
 265
 266         ModestTnyMsgViewPrivate *priv;
 267         priv = MODEST_TNY_MSG_VIEW_GET_PRIVATE (msg_view);
 268
 269         g_message ("url requested: %s", uri);
 270
 271         if (g_str_has_prefix (uri, "cid:")) {
 272                 /* +4 ==> skip "cid:" */
 273
 274                 TnyMsgMimePartIface *part = find_cid_image (priv->msg, uri + 4);
 275                 if (!part) {
 276                         g_message ("%s not found", uri + 4);
 277                         gtk_html_stream_close (stream, GTK_HTML_STREAM_ERROR);
 278                 } else {
 279                         TnyStreamIface *tny_stream =
 280                                 TNY_STREAM_IFACE(modest_tny_stream_gtkhtml_new(stream));
 281                         tny_msg_mime_part_iface_decode_to_stream (part,tny_stream);
 282                         gtk_html_stream_close (stream, GTK_HTML_STREAM_OK);
 283                 }
 284         } else if (g_str_has_prefix (uri, "Attachment:")) {
 285                 TnyMsgMimePartIface *part = find_attachment_by_filename (priv->msg, uri);
 286                 if (!part) {
 287                         g_message ("%s not found", uri);
 288                         gtk_html_stream_close (stream, GTK_HTML_STREAM_ERROR);
 289                 } else {
 290                         TnyStreamIface *tny_stream =
 291                                 TNY_STREAM_IFACE(modest_tny_stream_gtkhtml_new(stream));
 292                         tny_msg_mime_part_iface_decode_to_stream (part,tny_stream);
 293                         gtk_html_stream_close (stream, GTK_HTML_STREAM_OK);
 294                 }
 295         }
 296         return TRUE;
 297 }
 298
 299
 300
 301
 302 typedef struct  {
 303         guint offset;
 304         guint len;
 305         const gchar* prefix;
 306 } url_match_t;
 307
 308
 309
 310 static gchar *
 311 construct_virtual_filename(const gchar *filename, const gint position, const gchar *id, const gboolean active)
 312 {
 313         GString *s;
 314         g_return_val_if_fail((position >= 0), "AttachmentInvalid");
 315
 316         s = g_string_new("");
 317         if (active)
 318                 g_string_append(s, "Attachment:");
 319         else
 320                 g_string_append(s, "attachment:");
 321         g_string_append_printf(s, "%d:", position);
 322         if (id)
 323                 g_string_append(s, id);
 324         g_string_append_c(s, ':');
 325         if (filename)
 326                 g_string_append(s, filename);
 327         g_string_append_c(s, ':');
 328         return g_string_free(s, FALSE);
 329 }
 330
 331
 332 static gchar *
 333 construct_virtual_filename_from_mime_part(TnyMsgMimePartIface *msg, const gint position)
 334 {
 335         const gchar *id, *filename;
 336         const gboolean active = TRUE;
 337
 338         filename = tny_msg_mime_part_iface_get_filename(
 339                                                                         TNY_MSG_MIME_PART_IFACE(msg));
 340         if (!filename)
 341                 filename = "[unknown]";
 342         id = tny_msg_mime_part_iface_get_content_id(
 343                                                                         TNY_MSG_MIME_PART_IFACE(msg));
 344
 345         return construct_virtual_filename(filename, position, id, active);
 346 }
 347
 348 const gchar *
 349 get_next_token(const gchar *s, gint *len)
 350 {
 351         gchar *i1, *i2;
 352         i1 = (char *) s;
 353         i2 = (char *) s;
 354
 355         while (i2[0]) {
 356                 if (i2[0] == ':')
 357                         break;
 358                 i2++;
 359         }
 360         if (!i2[0])
 361                 return NULL;
 362         *len = i2 - i1;
 363         return ++i2;
 364 }
 365
 366 /* maybe I should use libregexp */
 367 gint
 368 virtual_filename_get_pos(const gchar *filename)
 369 {
 370         const gchar *i1, *i2;
 371         gint len, pos;
 372         GString *dummy;
 373
 374         i1 = filename;
 375         i2 = filename;
 376
 377         /* check prefix */
 378         i2 = get_next_token(i2, &len);
 379         if (strncmp(i1, "Attachment", len) != 0)
 380                 return -1;
 381         i1 = i2;
 382
 383         /* get position */
 384         i2 = get_next_token(i2, &len);
 385         if (i2 == NULL)
 386                 return -1;
 387         dummy = g_string_new_len(i1, len);
 388         pos = atoi(dummy->str);
 389         g_string_free(dummy, FALSE);
 390         return pos;
 391 }
 392
 393
 394 static gchar *
 395 attachments_as_html(ModestTnyMsgView *self, TnyMsgIface *msg)
 396 {
 397         ModestTnyMsgViewPrivate *priv;
 398         gboolean attachments_found = FALSE;
 399         GString *appendix;
 400         const GList *attachment_list, *attachment;
 401         const gchar *content_type, *filename, *id;
 402         gchar *virtual_filename;
 403         gboolean show_attachments_inline;
 404
 405         if (!msg)
 406                 return g_malloc0(1);
 407
 408         priv = MODEST_TNY_MSG_VIEW_GET_PRIVATE (self);
 409
 410         /* CLEANUP: starting a new HTML may be unsupported */
 411         appendix = g_string_new("<HTML><BODY>\n<hr><h5>Attachments:</h5>\n");
 412
 413         attachment_list = tny_msg_iface_get_parts(msg);
 414         attachment = attachment_list;
 415         while (attachment) {
 416                 filename = "";
 417                 content_type = tny_msg_mime_part_iface_get_content_type(
 418                                                                                 TNY_MSG_MIME_PART_IFACE(attachment->data));
 419                 g_return_val_if_fail(content_type, NULL);
 420                 if (      tny_msg_mime_part_iface_content_type_is(
 421                                                                                 TNY_MSG_MIME_PART_IFACE(attachment->data),
 422                                                                                 "image/jpeg")
 423                            || tny_msg_mime_part_iface_content_type_is(
 424                                                                                 TNY_MSG_MIME_PART_IFACE(attachment->data),
 425                                                                                 "image/gif")) {
 426                         filename = tny_msg_mime_part_iface_get_filename(
 427                                                                                 TNY_MSG_MIME_PART_IFACE(attachment->data));
 428                         if (!filename)
 429                                 filename = "[unknown]";
 430                         else
 431                                 attachments_found = TRUE;
 432                         id = tny_msg_mime_part_iface_get_content_id(
 433                                                                                 TNY_MSG_MIME_PART_IFACE(attachment->data));
 434                         show_attachments_inline = modest_conf_get_bool(priv->conf, MODEST_CONF_MSG_VIEW_SHOW_ATTACHMENTS_INLINE, NULL);
 435                         virtual_filename = construct_virtual_filename(filename,
 436                                          g_list_position((GList *)attachment_list, (GList *) attachment),
 437                                          id, show_attachments_inline);
 438                         printf("VF:%s\n", virtual_filename);
 439                         if (show_attachments_inline) {
 440                                 g_string_append_printf(appendix, "<IMG src=\"%s\">\n<BR><A href=\"attachment:%s\">%s</A>\n", virtual_filename, filename, filename);
 441                         } else {
 442                                 g_string_append_printf(appendix, "<A href=\"attachment:%s\">%s</A>: %s<BR>\n", filename, filename, content_type);
 443                         }
 444                         g_free(virtual_filename);
 445                 }
 446                 attachment = attachment->next;
 447         }
 448         g_string_append(appendix, "</BODY></HTML>");
 449         if (!attachments_found)
 450                 g_string_assign(appendix, "");
 451         return g_string_free(appendix, FALSE);
 452 }
 453
 454 static void
 455 hyperlinkify_plain_text (GString *txt)
 456 {
 457         GSList *cursor;
 458         GSList *match_list = get_url_matches (txt);
 459
 460         /* we will work backwards, so the offsets stay valid */
 461         for (cursor = match_list; cursor; cursor = cursor->next) {
 462
 463                 url_match_t *match = (url_match_t*) cursor->data;
 464                 gchar *url  = g_strndup (txt->str + match->offset, match->len);
 465                 gchar *repl = NULL; /* replacement  */
 466
 467                 /* the prefix is NULL: use the one that is already there */
 468                 repl = g_strdup_printf ("<a href=\"%s%s\">%s</a>",
 469                                         match->prefix ? match->prefix : "", url, url);
 470
 471                 /* replace the old thing with our hyperlink
 472                  * replacement thing */
 473                 g_string_erase  (txt, match->offset, match->len);
 474                 g_string_insert (txt, match->offset, repl);
 475
 476                 g_free (url);
 477                 g_free (repl);
 478
 479                 g_free (cursor->data);
 480         }
 481
 482         g_slist_free (match_list);
 483 }
 484
 485
 486
 487 static gchar *
 488 convert_to_html (const gchar *data)
 489 {
 490         int              i;
 491         gboolean         first_space = TRUE;
 492         GString         *html;
 493         gsize           len;
 494
 495         if (!data)
 496                 return NULL;
 497
 498         len = strlen (data);
 499         html = g_string_sized_new (len + 100);  /* just a  guess... */
 500
 501         g_string_append_printf (html,
 502                                 "<html>"
 503                                 "<head>"
 504                                 "<meta http-equiv=\"content-type\""
 505                                 " content=\"text/html; charset=utf8\">"
 506                                 "</head>"
 507                                 "<body><tt>");
 508
 509         /* replace with special html chars where needed*/
 510         for (i = 0; i != len; ++i)  {
 511                 char    kar = data[i];
 512                 switch (kar) {
 513
 514                 case 0:  break; /* ignore embedded \0s */
 515                 case '<' : g_string_append   (html, "&lt;"); break;
 516                 case '>' : g_string_append   (html, "&gt;"); break;
 517                 case '&' : g_string_append   (html, "&quot;"); break;
 518                 case '\n': g_string_append   (html, "<br>\n"); break;
 519                 default:
 520                         if (kar == ' ') {
 521                                 g_string_append (html, first_space ? " " : "&nbsp;");
 522                                 first_space = FALSE;
 523                         } else  if (kar == '\t')
 524                                 g_string_append (html, "&nbsp; &nbsp;&nbsp;");
 525                         else {
 526                                 int charnum = 0;
 527                                 first_space = TRUE;
 528                                 /* optimization trick: accumulate 'normal' chars, then copy */
 529                                 do {
 530                                         kar = data [++charnum + i];
 531
 532                                 } while ((i + charnum < len) &&
 533                                          (kar > '>' || (kar != '<' && kar != '>'
 534                                                         && kar != '&' && kar !=  ' '
 535                                                         && kar != '\n' && kar != '\t')));
 536                                 g_string_append_len (html, &data[i], charnum);
 537                                 i += (charnum  - 1);
 538                         }
 539                 }
 540         }
 541
 542         g_string_append (html, "</tt></body></html>");
 543         hyperlinkify_plain_text (html);
 544
 545         return g_string_free (html, FALSE);
 546 }
 547
 548
 549
 550
 551 static gint
 552 cmp_offsets_reverse (const url_match_t *match1, const url_match_t *match2)
 553 {
 554         return match2->offset - match1->offset;
 555 }
 556
 557
 558
 559 /*
 560  * check if the match is inside an existing match... */
 561 static void
 562 chk_partial_match (const url_match_t *match, int* offset)
 563 {
 564         if (*offset >= match->offset && *offset < match->offset + match->len)
 565                 *offset = -1;
 566 }
 567
 568 static GSList*
 569 get_url_matches (GString *txt)
 570 {
 571         regmatch_t rm;
 572         int rv, i, offset = 0;
 573         GSList *match_list = NULL;
 574
 575         static UrlMatchPattern patterns[] = MAIL_VIEWER_URL_MATCH_PATTERNS;
 576         const size_t pattern_num = sizeof(patterns)/sizeof(UrlMatchPattern);
 577
 578         /* initalize the regexps */
 579         for (i = 0; i != pattern_num; ++i) {
 580                 patterns[i].preg = g_new0 (regex_t,1);
 581                 g_assert(regcomp (patterns[i].preg, patterns[i].regex,
 582                                   REG_ICASE|REG_EXTENDED|REG_NEWLINE) == 0);
 583         }
 584         /* find all the matches */
 585         for (i = 0; i != pattern_num; ++i) {
 586                 offset     = 0;
 587                 while (1) {
 588                         int test_offset;
 589                         if ((rv = regexec (patterns[i].preg, txt->str + offset, 1, &rm, 0)) != 0) {
 590                                 g_assert (rv == REG_NOMATCH); /* this should not happen */
 591                                 break; /* try next regexp */
 592                         }
 593                         if (rm.rm_so == -1)
 594                                 break;
 595
 596                         /* FIXME: optimize this */
 597                         /* to avoid partial matches on something that was already found... */
 598                         /* check_partial_match will put -1 in the data ptr if that is the case */
 599                         test_offset = offset + rm.rm_so;
 600                         g_slist_foreach (match_list, (GFunc)chk_partial_match, &test_offset);
 601
 602                         /* make a list of our matches (<offset, len, prefix> tupels)*/
 603                         if (test_offset != -1) {
 604                                 url_match_t *match = g_new (url_match_t,1);
 605                                 match->offset = offset + rm.rm_so;
 606                                 match->len    = rm.rm_eo - rm.rm_so;
 607                                 match->prefix = patterns[i].prefix;
 608                                 match_list = g_slist_prepend (match_list, match);
 609                         }
 610                         offset += rm.rm_eo;
 611                 }
 612         }
 613
 614         for (i = 0; i != pattern_num; ++i) {
 615                 regfree (patterns[i].preg);
 616                 g_free  (patterns[i].preg);
 617         } /* don't free patterns itself -- it's static */
 618
 619         /* now sort the list, so the matches are in reverse order of occurence.
 620          * that way, we can do the replacements starting from the end, so we don't need
 621          * to recalculate the offsets
 622          */
 623         match_list = g_slist_sort (match_list,
 624                                    (GCompareFunc)cmp_offsets_reverse);
 625         return match_list;
 626 }
 627
 628 static gboolean
 629 fill_gtkhtml_with_txt (ModestTnyMsgView *self, GtkHTML* gtkhtml, const gchar* txt, TnyMsgIface *msg)
 630 {
 631         GString *html;
 632         gchar *html_attachments;
 633
 634         g_return_val_if_fail (gtkhtml, FALSE);
 635         g_return_val_if_fail (txt, FALSE);
 636
 637         html = g_string_new(convert_to_html (txt));
 638         html_attachments = attachments_as_html(self, msg);
 639         g_string_append(html, html_attachments);
 640
 641         gtk_html_load_from_string (gtkhtml, html->str, html->len);
 642         g_string_free (html, TRUE);
 643         g_free(html_attachments);
 644
 645         return TRUE;
 646 }
 647
 648
 649
 650 static gboolean
 651 set_html_message (ModestTnyMsgView *self, TnyMsgMimePartIface *tny_body, TnyMsgIface *msg)
 652 {
 653         gchar *html_attachments;
 654         TnyStreamIface *gtkhtml_stream;
 655         ModestTnyMsgViewPrivate *priv;
 656
 657         g_return_val_if_fail (self, FALSE);
 658         g_return_val_if_fail (tny_body, FALSE);
 659
 660         priv = MODEST_TNY_MSG_VIEW_GET_PRIVATE(self);
 661
 662         gtkhtml_stream =
 663                 TNY_STREAM_IFACE(modest_tny_stream_gtkhtml_new
 664                                  (gtk_html_begin(GTK_HTML(priv->gtkhtml))));
 665
 666         tny_stream_iface_reset (gtkhtml_stream);
 667         tny_msg_mime_part_iface_decode_to_stream (tny_body, gtkhtml_stream);
 668         html_attachments = attachments_as_html(self, msg);
 669         /* is this clean? */
 670         gtkhtml_write(gtkhtml_stream, html_attachments, strlen(html_attachments));
 671         tny_stream_iface_reset (gtkhtml_stream);
 672
 673         g_object_unref (G_OBJECT(gtkhtml_stream));
 674         g_free (html_attachments);
 675
 676         return TRUE;
 677 }
 678
 679
 680 /* this is a hack --> we use the tny_text_buffer_stream to
 681  * get the message text, then write to gtkhtml 'by hand' */
 682 static gboolean
 683 set_text_message (ModestTnyMsgView *self, TnyMsgMimePartIface *tny_body, TnyMsgIface *msg)
 684 {
 685         GtkTextBuffer *buf;
 686         GtkTextIter begin, end;
 687         TnyStreamIface* txt_stream;
 688         gchar *txt;
 689         ModestTnyMsgViewPrivate *priv;
 690
 691         g_return_val_if_fail (self, FALSE);
 692         g_return_val_if_fail (tny_body, FALSE);
 693
 694         priv           = MODEST_TNY_MSG_VIEW_GET_PRIVATE(self);
 695
 696         buf            = gtk_text_buffer_new (NULL);
 697         txt_stream     = TNY_STREAM_IFACE(tny_text_buffer_stream_new (buf));
 698
 699         tny_stream_iface_reset (txt_stream);
 700         tny_msg_mime_part_iface_decode_to_stream (tny_body, txt_stream);
 701         tny_stream_iface_reset (txt_stream);
 702
 703         gtk_text_buffer_get_bounds (buf, &begin, &end);
 704         txt = gtk_text_buffer_get_text (buf, &begin, &end, FALSE);
 705
 706         fill_gtkhtml_with_txt (self, GTK_HTML(priv->gtkhtml), txt, msg);
 707
 708         g_object_unref (G_OBJECT(txt_stream));
 709         g_object_unref (G_OBJECT(buf));
 710
 711         g_free (txt);
 712         return TRUE;
 713 }
 714
 715 gchar *
 716 modest_tny_msg_view_get_selected_text (ModestTnyMsgView *self)
 717 {
 718         ModestTnyMsgViewPrivate *priv;
 719         gchar *sel;
 720         GtkWidget *html;
 721         int len;
 722         GtkClipboard *clip;
 723
 724         g_return_val_if_fail (self, NULL);
 725         priv = MODEST_TNY_MSG_VIEW_GET_PRIVATE(self);
 726         html = priv->gtkhtml;
 727
 728         /* I'm sure there is a better way to check for selected text */
 729         sel = gtk_html_get_selection_html(GTK_HTML(html), &len);
 730         if (!sel)
 731                 return NULL;
 732
 733         g_free(sel);
 734
 735         clip = gtk_widget_get_clipboard(html, GDK_SELECTION_PRIMARY);
 736         return gtk_clipboard_wait_for_text(clip);
 737 }
 738
 739 void
 740 modest_tny_msg_view_set_message (ModestTnyMsgView *self, TnyMsgIface *msg)
 741 {
 742         TnyMsgMimePartIface *body;
 743         ModestTnyMsgViewPrivate *priv;
 744
 745         g_return_if_fail (self);
 746
 747         priv = MODEST_TNY_MSG_VIEW_GET_PRIVATE(self);
 748
 749         priv->msg = msg;
 750
 751         fill_gtkhtml_with_txt (self, GTK_HTML(priv->gtkhtml), "", msg);
 752
 753         if (!msg)
 754                 return;
 755
 756         body = modest_tny_msg_actions_find_body_part (msg, "text/html");
 757         if (body) {
 758                 set_html_message (self, body, msg);
 759                 return;
 760         }
 761
 762         body = modest_tny_msg_actions_find_body_part (msg, "text/plain");
 763         if (body) {
 764                 set_text_message (self, body, msg);
 765                 return;
 766         }
 767
 768         /* hmmmmm */
 769         fill_gtkhtml_with_txt (self, GTK_HTML(priv->gtkhtml),
 770                                 _("Unsupported message type"), msg);
 771 }