Improved subject simplification by regexp.
[claws.git] / src / messageview.c
1 /*
2  * Sylpheed -- a GTK+ based, lightweight, and fast e-mail client
3  * Copyright (C) 1999-2001 Hiroyuki Yamamoto
4  *
5  * This program is free software; you can redistribute it and/or modify
6  * it under the terms of the GNU General Public License as published by
7  * the Free Software Foundation; either version 2 of the License, or
8  * (at your option) any later version.
9  *
10  * This program is distributed in the hope that it will be useful,
11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13  * GNU General Public License for more details.
14  *
15  * You should have received a copy of the GNU General Public License
16  * along with this program; if not, write to the Free Software
17  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
18  */
19
20 #include "defs.h"
21
22 #include <glib.h>
23 #include <gdk/gdkkeysyms.h>
24 #include <gtk/gtkvbox.h>
25 #include <gtk/gtkcontainer.h>
26 #include <gtk/gtkeditable.h>
27 #include <gtk/gtkwindow.h>
28 #include <gtk/gtktext.h>
29 #include <stdio.h>
30 #include <ctype.h>
31 #include <string.h>
32
33 #include "intl.h"
34 #include "main.h"
35 #include "messageview.h"
36 #include "headerview.h"
37 #include "textview.h"
38 #include "imageview.h"
39 #include "mimeview.h"
40 #include "procmsg.h"
41 #include "procheader.h"
42 #include "procmime.h"
43 #include "prefs_common.h"
44 #include "gtkutils.h"
45 #include "utils.h"
46 #include "rfc2015.h"
47 #include "account.h"
48 #include "alertpanel.h"
49 #include "send.h"
50 #include "pgptext.h"
51
52 static void messageview_change_view_type(MessageView    *messageview,
53                                          MessageType     type);
54 static void messageview_destroy_cb      (GtkWidget      *widget,
55                                          MessageView    *messageview);
56 static void messageview_size_allocate_cb(GtkWidget      *widget,
57                                          GtkAllocation  *allocation);
58 static void key_pressed                 (GtkWidget      *widget,
59                                          GdkEventKey    *event,
60                                          MessageView    *messageview);
61
62 MessageView *messageview_create(void)
63 {
64         MessageView *messageview;
65         GtkWidget *vbox;
66         HeaderView *headerview;
67         TextView *textview;
68         ImageView *imageview;
69         MimeView *mimeview;
70
71         debug_print(_("Creating message view...\n"));
72         messageview = g_new0(MessageView, 1);
73
74         messageview->type = MVIEW_TEXT;
75
76         headerview = headerview_create();
77
78         textview = textview_create();
79         textview->messageview = messageview;
80
81         imageview = imageview_create();
82         imageview->messageview = messageview;
83
84         mimeview = mimeview_create();
85         mimeview->textview = textview;
86         mimeview->imageview = imageview;
87         mimeview->messageview = messageview;
88
89         vbox = gtk_vbox_new(FALSE, 0);
90         gtk_box_pack_start(GTK_BOX(vbox), GTK_WIDGET_PTR(headerview),
91                            FALSE, FALSE, 0);
92         gtk_box_pack_start(GTK_BOX(vbox), GTK_WIDGET_PTR(textview),
93                            TRUE, TRUE, 0);
94
95         /* to remove without destroyed */
96         gtk_widget_ref(GTK_WIDGET_PTR(textview));
97         gtk_widget_ref(GTK_WIDGET_PTR(imageview));
98         gtk_widget_ref(GTK_WIDGET_PTR(mimeview));
99
100         messageview->vbox       = vbox;
101         messageview->new_window = FALSE;
102         messageview->window     = NULL;
103         messageview->headerview = headerview;
104         messageview->textview   = textview;
105         messageview->imageview  = imageview;
106         messageview->mimeview   = mimeview;
107
108         return messageview;
109 }
110
111 MessageView *messageview_create_with_new_window(void)
112 {
113         GtkWidget *window;
114         MessageView *msgview;
115
116         window = gtk_window_new(GTK_WINDOW_TOPLEVEL);
117         gtk_window_set_title(GTK_WINDOW(window), "Message");
118         gtk_window_set_policy(GTK_WINDOW(window), TRUE, TRUE, FALSE);
119         gtk_widget_set_usize(window, prefs_common.msgwin_width,
120                              prefs_common.msgwin_height);
121
122         msgview = messageview_create();
123
124         gtk_signal_connect(GTK_OBJECT(window), "size_allocate",
125                            GTK_SIGNAL_FUNC(messageview_size_allocate_cb),
126                            msgview);
127         gtk_signal_connect(GTK_OBJECT(window), "destroy",
128                            GTK_SIGNAL_FUNC(messageview_destroy_cb), msgview);
129         gtk_signal_connect(GTK_OBJECT(window), "key_press_event",
130                            GTK_SIGNAL_FUNC(key_pressed), msgview);
131
132         gtk_container_add(GTK_CONTAINER(window), GTK_WIDGET_PTR(msgview));
133         gtk_widget_grab_focus(msgview->textview->text);
134         gtk_widget_show_all(window);
135
136         msgview->new_window = TRUE;
137         msgview->window = window;
138
139         messageview_init(msgview);
140
141         return msgview;
142 }
143
144 void messageview_init(MessageView *messageview)
145 {
146         headerview_init(messageview->headerview);
147         textview_init(messageview->textview);
148         imageview_init(messageview->imageview);
149         mimeview_init(messageview->mimeview);
150         /*messageview_set_font(messageview);*/
151 }
152
153 static void notification_convert_header(gchar *dest, gint len, gchar *src,
154                                         gint header_len)
155 {
156         g_return_if_fail(src != NULL);
157         g_return_if_fail(dest != NULL);
158
159         if (len < 1) return;
160
161         remove_return(src);
162
163         if (is_ascii_str(src)) {
164                 strncpy2(dest, src, len);
165                 dest[len - 1] = '\0';
166                 return;
167         } else
168                 conv_encode_header(dest, len, src, header_len);
169 }
170
171 static gint disposition_notification_queue(PrefsAccount * account,
172                                            gchar * to, const gchar *file)
173 {
174         FolderItem *queue;
175         gchar *tmp, *queue_path;
176         FILE *fp, *src_fp;
177         GSList *cur;
178         gchar buf[BUFFSIZE];
179         gint num;
180
181         debug_print(_("queueing message...\n"));
182         g_return_val_if_fail(account != NULL, -1);
183
184         tmp = g_strdup_printf("%s%cqueue.%d", g_get_tmp_dir(),
185                               G_DIR_SEPARATOR, (gint)file);
186         if ((fp = fopen(tmp, "w")) == NULL) {
187                 FILE_OP_ERROR(tmp, "fopen");
188                 g_free(tmp);
189                 return -1;
190         }
191         if ((src_fp = fopen(file, "r")) == NULL) {
192                 FILE_OP_ERROR(file, "fopen");
193                 fclose(fp);
194                 unlink(tmp);
195                 g_free(tmp);
196                 return -1;
197         }
198         if (change_file_mode_rw(fp, tmp) < 0) {
199                 FILE_OP_ERROR(tmp, "chmod");
200                 g_warning(_("can't change file mode\n"));
201         }
202
203         /* queueing variables */
204         fprintf(fp, "AF:\n");
205         fprintf(fp, "NF:0\n");
206         fprintf(fp, "PS:10\n");
207         fprintf(fp, "SRH:1\n");
208         fprintf(fp, "SFN:\n");
209         fprintf(fp, "DSR:\n");
210         fprintf(fp, "MID:\n");
211         fprintf(fp, "CFG:\n");
212         fprintf(fp, "PT:0\n");
213         fprintf(fp, "S:%s\n", account->address);
214         fprintf(fp, "RQ:\n");
215         if (account->smtp_server)
216                 fprintf(fp, "SSV:%s\n", account->smtp_server);
217         else
218                 fprintf(fp, "SSV:\n");
219         if (account->nntp_server)
220                 fprintf(fp, "NSV:%s\n", account->nntp_server);
221         else
222                 fprintf(fp, "NSV:\n");
223         fprintf(fp, "SSH:\n");
224         fprintf(fp, "R:<%s>", to);
225         fprintf(fp, "\n");
226         fprintf(fp, "\n");
227
228         while (fgets(buf, sizeof(buf), src_fp) != NULL) {
229                 if (fputs(buf, fp) == EOF) {
230                         FILE_OP_ERROR(tmp, "fputs");
231                         fclose(fp);
232                         fclose(src_fp);
233                         unlink(tmp);
234                         g_free(tmp);
235                         return -1;
236                 }
237         }
238
239         fclose(src_fp);
240         if (fclose(fp) == EOF) {
241                 FILE_OP_ERROR(tmp, "fclose");
242                 unlink(tmp);
243                 g_free(tmp);
244                 return -1;
245         }
246
247         queue = folder_get_default_queue();
248         folder_item_scan(queue);
249         queue_path = folder_item_get_path(queue);
250         if (!is_dir_exist(queue_path))
251                 make_dir_hier(queue_path);
252         if ((num = folder_item_add_msg(queue, tmp, TRUE)) < 0) {
253                 g_warning(_("can't queue the message\n"));
254                 unlink(tmp);
255                 g_free(tmp);
256                 g_free(queue_path);
257                 return -1;
258         }
259         g_free(tmp);
260
261         if ((fp = procmsg_open_mark_file(queue_path, TRUE)) == NULL)
262                 g_warning(_("can't open mark file\n"));
263         else {
264                 MsgInfo newmsginfo;
265
266                 newmsginfo.msgnum = num;
267                 newmsginfo.flags.perm_flags = newmsginfo.flags.tmp_flags = 0;
268                 procmsg_write_flags(&newmsginfo, fp);
269                 fclose(fp);
270         }
271         g_free(queue_path);
272
273         folder_item_scan(queue);
274         folderview_update_item(queue, TRUE);
275
276         return 0;
277 }
278
279 static gint disposition_notification_send(MsgInfo * msginfo)
280 {
281         gchar buf[BUFFSIZE];
282         gchar tmp[MAXPATHLEN + 1];
283         FILE *fp;
284         GSList * to_list;
285         gint ok;
286         gchar * to;
287
288         if ((!msginfo->returnreceiptto) && 
289             (!msginfo->dispositionnotificationto))
290                 return -1;
291
292         /* write to temporary file */
293         g_snprintf(tmp, sizeof(tmp), "%s%ctmpmsg%d",
294                    get_rc_dir(), G_DIR_SEPARATOR, (gint)msginfo);
295
296         if ((fp = fopen(tmp, "w")) == NULL) {
297                 FILE_OP_ERROR(tmp, "fopen");
298                 return -1;
299         }
300
301         /* chmod for security */
302         if (change_file_mode_rw(fp, tmp) < 0) {
303                 FILE_OP_ERROR(tmp, "chmod");
304                 g_warning(_("can't change file mode\n"));
305         }
306
307         /* Date */
308         get_rfc822_date(buf, sizeof(buf));
309         fprintf(fp, "Date: %s\n", buf);
310
311         /* From */
312         if (cur_account->name && *cur_account->name) {
313                 notification_convert_header
314                         (buf, sizeof(buf), cur_account->name,
315                          strlen("From: "));
316                 fprintf(fp, "From: %s <%s>\n", buf, cur_account->address);
317         } else
318                 fprintf(fp, "From: %s\n", cur_account->address);
319
320         /* To */
321         if (msginfo->dispositionnotificationto)
322                 to = msginfo->dispositionnotificationto;
323         else
324                 to = msginfo->returnreceiptto;
325         fprintf(fp, "To: %s\n", to);
326
327         /* Subject */
328         notification_convert_header(buf, sizeof(buf), msginfo->subject,
329                                     strlen("Subject: "));
330         fprintf(fp, "Subject: Disposition notification: %s\n", buf);
331
332         if (fclose(fp) == EOF) {
333                 FILE_OP_ERROR(tmp, "fclose");
334                 unlink(tmp);
335                 return -1;
336         }
337
338         to_list = address_list_append(NULL, msginfo->dispositionnotificationto);
339         ok = send_message(tmp, cur_account, to_list);
340         
341         if (ok < 0) {
342                 if (prefs_common.queue_msg) {
343                         AlertValue val;
344                         
345                         val = alertpanel
346                                 (_("Queueing"),
347                                  _("Error occurred while sending the notification.\n"
348                                    "Put this notification into queue folder?"),
349                                  _("OK"), _("Cancel"), NULL);
350                         if (G_ALERTDEFAULT == val) {
351                                 ok = disposition_notification_queue(cur_account, to, tmp);
352                                 if (ok < 0)
353                                         alertpanel_error(_("Can't queue the notification."));
354                         }
355                 } else
356                         alertpanel_error(_("Error occurred while sending the notification."));
357         }
358
359         if (unlink(tmp) < 0) FILE_OP_ERROR(tmp, "unlink");
360
361         return ok;
362 }
363
364 void messageview_show(MessageView *messageview, MsgInfo *msginfo)
365 {
366         FILE *fp;
367         gchar *file;
368         MimeInfo *mimeinfo;
369         MsgInfo *tmpmsginfo;
370
371         g_return_if_fail(msginfo != NULL);
372
373 #if USE_GPGME
374         for (;;) {
375                 if ((fp = procmsg_open_message(msginfo)) == NULL) return;
376                 mimeinfo = procmime_scan_mime_header(fp, MIME_TEXT);
377                 if (!mimeinfo) break;
378
379                 if (!MSG_IS_ENCRYPTED(msginfo->flags) &&
380                     rfc2015_is_encrypted(mimeinfo)) {
381                         MSG_SET_TMP_FLAGS(msginfo->flags, MSG_ENCRYPTED);
382                 }
383                 if (!MSG_IS_ENCRYPTED(msginfo->flags) &&
384                     pgptext_is_encrypted(mimeinfo, msginfo)) {
385                         MSG_SET_TMP_FLAGS(msginfo->flags, MSG_ENCRYPTED);
386                         /* To avoid trouble with the rfc2015 stuff we go for encryption 
387                          * right here. */
388                         if (MSG_IS_ENCRYPTED(msginfo->flags) &&
389                             !msginfo->plaintext_file  &&
390                             !msginfo->decryption_failed) {
391                                 /* This is an encrypted message but it has not yet
392                                  * been decrypted and there was no unsuccessful
393                                  * decryption attempt */
394                                 pgptext_decrypt_message(msginfo, mimeinfo, fp);
395                                 if (msginfo->plaintext_file &&
396                                     !msginfo->decryption_failed) {
397                                         fclose(fp);
398                                         continue;
399                                 }
400                         }
401                 }
402                 
403                 if (MSG_IS_ENCRYPTED(msginfo->flags) &&
404                     !msginfo->plaintext_file  &&
405                     !msginfo->decryption_failed) {
406                         /* This is an encrypted message but it has not yet
407                          * been decrypted and there was no unsuccessful
408                          * decryption attempt */
409                         rfc2015_decrypt_message(msginfo, mimeinfo, fp);
410                         if (msginfo->plaintext_file &&
411                             !msginfo->decryption_failed) {
412                                 fclose(fp);
413                                 continue;
414                         }
415                 }
416
417                 break;
418         }
419 #else /* !USE_GPGME */
420         if ((fp = procmsg_open_message(msginfo)) == NULL) return;
421         mimeinfo = procmime_scan_mime_header(fp, MIME_TEXT);
422 #endif /* USE_GPGME */
423         fclose(fp);
424         if (!mimeinfo) return;
425
426         file = procmsg_get_message_file_path(msginfo);
427         g_return_if_fail(file != NULL);
428
429         /* FIXME - doesn't tmpmsginfo->flags have the value
430          * of msginfo->flags after procheader_parse()???
431          * in any case, checking tmpmsginfo->flags for MSG_UNREAD
432          * fixes the return-receipt-request bug */
433
434         tmpmsginfo = procheader_parse(file, msginfo->flags, TRUE, TRUE);
435         if (MSG_IS_MIME(tmpmsginfo->flags))
436                 MSG_SET_TMP_FLAGS(msginfo->flags, MSG_MIME);
437
438         if (prefs_common.return_receipt
439             && (tmpmsginfo->dispositionnotificationto
440                 || tmpmsginfo->returnreceiptto)
441             && (MSG_IS_UNREAD(msginfo->flags))) {
442                 gint ok;
443                 
444                 if (alertpanel(_("Return Receipt"), _("Send return receipt ?"),
445                                _("Yes"), _("No"), NULL) == G_ALERTDEFAULT) {
446                         ok = disposition_notification_send(tmpmsginfo);
447                         if (ok < 0)
448                                 alertpanel_error(_("Error occurred while sending notification."));
449                 }
450         }
451
452         headerview_show(messageview->headerview, tmpmsginfo);
453         procmsg_msginfo_free(tmpmsginfo);
454
455         if (mimeinfo->mime_type != MIME_TEXT) {
456                 messageview_change_view_type(messageview, MVIEW_MIME);
457                 mimeview_show_message(messageview->mimeview, mimeinfo, file);
458         } else {
459                 messageview_change_view_type(messageview, MVIEW_TEXT);
460                 textview_show_message(messageview->textview, mimeinfo, file);
461                 procmime_mimeinfo_free(mimeinfo);
462         }
463
464         g_free(file);
465 }
466
467 static void messageview_change_view_type(MessageView *messageview,
468                                          MessageType type)
469 {
470         TextView *textview = messageview->textview;
471         ImageView *imageview = messageview->imageview;
472         MimeView *mimeview = messageview->mimeview;
473
474         if (messageview->type == type) return;
475
476         if (type == MVIEW_MIME) {
477                 gtkut_container_remove
478                         (GTK_CONTAINER(GTK_WIDGET_PTR(messageview)),
479                          GTK_WIDGET_PTR(textview));
480                 gtk_box_pack_start(GTK_BOX(messageview->vbox),
481                                    GTK_WIDGET_PTR(mimeview), TRUE, TRUE, 0);
482                 gtk_container_add(GTK_CONTAINER(mimeview->vbox),
483                                   GTK_WIDGET_PTR(textview));
484                 mimeview->type = MIMEVIEW_TEXT;
485         } else if (type == MVIEW_TEXT) {
486                 gtkut_container_remove
487                         (GTK_CONTAINER(GTK_WIDGET_PTR(messageview)),
488                          GTK_WIDGET_PTR(mimeview));
489
490                 if (mimeview->vbox == GTK_WIDGET_PTR(textview)->parent) {
491                         gtkut_container_remove(GTK_CONTAINER(mimeview->vbox),
492                                                GTK_WIDGET_PTR(textview));
493                 } else {
494                         gtkut_container_remove(GTK_CONTAINER(mimeview->vbox),
495                                                GTK_WIDGET_PTR(imageview));
496                 }
497
498                 gtk_box_pack_start(GTK_BOX(messageview->vbox),
499                                    GTK_WIDGET_PTR(textview), TRUE, TRUE, 0);
500         } else
501                 return;
502
503         messageview->type = type;
504 }
505
506 void messageview_clear(MessageView *messageview)
507 {
508         messageview_change_view_type(messageview, MVIEW_TEXT);
509         headerview_clear(messageview->headerview);
510         textview_clear(messageview->textview);
511 }
512
513 void messageview_destroy(MessageView *messageview)
514 {
515         GtkWidget *textview  = GTK_WIDGET_PTR(messageview->textview);
516         GtkWidget *imageview = GTK_WIDGET_PTR(messageview->imageview);
517         GtkWidget *mimeview  = GTK_WIDGET_PTR(messageview->mimeview);
518
519         headerview_destroy(messageview->headerview);
520         textview_destroy(messageview->textview);
521         imageview_destroy(messageview->imageview);
522         mimeview_destroy(messageview->mimeview);
523
524         g_free(messageview);
525
526         gtk_widget_unref(textview);
527         gtk_widget_unref(imageview);
528         gtk_widget_unref(mimeview);
529 }
530
531 void messageview_quote_color_set(void)
532 {
533 }
534
535 void messageview_set_font(MessageView *messageview)
536 {
537         textview_set_font(messageview->textview, NULL);
538 }
539
540 void messageview_copy_clipboard(MessageView *messageview)
541 {
542         switch (messageview->type) {
543         case MVIEW_TEXT:
544                 gtk_editable_copy_clipboard(GTK_EDITABLE(messageview->textview->text));
545                 break;
546         case MVIEW_MIME:
547                 if (messageview->mimeview->type == MIMEVIEW_TEXT)
548                         gtk_editable_copy_clipboard(GTK_EDITABLE(messageview->mimeview->textview->text));
549         default:
550                 break;
551         }
552 }
553
554 void messageview_select_all(MessageView *messageview)
555 {
556         switch (messageview->type) {
557         case MVIEW_TEXT:
558                 gtk_editable_select_region(GTK_EDITABLE(messageview->textview->text), 0, -1);
559                 break;
560         case MVIEW_MIME:
561                 if (messageview->mimeview->type == MIMEVIEW_TEXT)
562                         gtk_editable_select_region(GTK_EDITABLE(messageview->mimeview->textview->text), 0, -1);
563         default:
564                 break;
565         }
566 }
567
568 void messageview_set_position(MessageView *messageview, gint pos)
569 {
570         switch (messageview->type) {
571         case MVIEW_TEXT:
572                 textview_set_position(messageview->textview, pos);
573                 break;
574         case MVIEW_MIME:
575                 if (messageview->mimeview->type == MIMEVIEW_TEXT)
576                         textview_set_position(messageview->mimeview->textview, pos);
577                 break;
578         default:
579                 break;
580         }
581 }
582
583 gboolean messageview_search_string(MessageView *messageview, const gchar *str,
584                                    gboolean case_sens)
585 {
586         switch (messageview->type) {
587         case MVIEW_TEXT:
588                 return textview_search_string(messageview->textview,
589                                         str, case_sens);
590         case MVIEW_MIME:
591                 if (messageview->mimeview->type == MIMEVIEW_TEXT)
592                         return textview_search_string(messageview->mimeview->textview,
593                                                 str, case_sens);
594                 else
595                         return FALSE;
596         default:
597                 return FALSE;
598         }
599                 
600         return FALSE;
601 }
602
603 gboolean messageview_search_string_backward(MessageView *messageview,
604                                             const gchar *str,
605                                             gboolean case_sens)
606 {
607         switch (messageview->type) {
608         case MVIEW_TEXT:
609                 return textview_search_string_backward(messageview->textview,
610                                         str, case_sens);
611         case MVIEW_MIME:
612                 if (messageview->mimeview->type == MIMEVIEW_TEXT)
613                         return textview_search_string_backward(messageview->mimeview->textview,
614                                                 str, case_sens);
615                 else
616                         return FALSE;
617         default:
618                 return FALSE;
619         }
620                 
621         return FALSE;
622
623 }
624
625 GtkWidget *messageview_get_text_widget(MessageView *messageview)
626 {
627         return messageview->textview->text;
628 }
629
630 static void messageview_destroy_cb(GtkWidget *widget, MessageView *messageview)
631 {
632         messageview_destroy(messageview);
633 }
634
635 static void messageview_size_allocate_cb(GtkWidget *widget,
636                                          GtkAllocation *allocation)
637 {
638         g_return_if_fail(allocation != NULL);
639
640         prefs_common.msgwin_width  = allocation->width;
641         prefs_common.msgwin_height = allocation->height;
642 }
643
644 static void key_pressed(GtkWidget *widget, GdkEventKey *event,
645                         MessageView *messageview)
646 {
647         if (event && event->keyval == GDK_Escape && messageview->window)
648                 gtk_widget_destroy(messageview->window);
649 }