some tweaks, please see Changelog
[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);
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);
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);
435
436         if (prefs_common.return_receipt
437             && (tmpmsginfo->dispositionnotificationto
438                 || tmpmsginfo->returnreceiptto)
439             && (MSG_IS_UNREAD(msginfo->flags))) {
440                 gint ok;
441                 
442                 if (alertpanel(_("Return Receipt"), _("Send return receipt ?"),
443                                _("Yes"), _("No"), NULL) == G_ALERTDEFAULT) {
444                         ok = disposition_notification_send(tmpmsginfo);
445                         if (ok < 0)
446                                 alertpanel_error(_("Error occurred while sending notification."));
447                 }
448         }
449
450         headerview_show(messageview->headerview, tmpmsginfo);
451         procmsg_msginfo_free(tmpmsginfo);
452
453         if (mimeinfo->mime_type != MIME_TEXT) {
454                 messageview_change_view_type(messageview, MVIEW_MIME);
455                 mimeview_show_message(messageview->mimeview, mimeinfo, file);
456         } else {
457                 messageview_change_view_type(messageview, MVIEW_TEXT);
458                 textview_show_message(messageview->textview, mimeinfo, file);
459                 procmime_mimeinfo_free(mimeinfo);
460         }
461
462         g_free(file);
463 }
464
465 static void messageview_change_view_type(MessageView *messageview,
466                                          MessageType type)
467 {
468         TextView *textview = messageview->textview;
469         ImageView *imageview = messageview->imageview;
470         MimeView *mimeview = messageview->mimeview;
471
472         if (messageview->type == type) return;
473
474         if (type == MVIEW_MIME) {
475                 gtkut_container_remove
476                         (GTK_CONTAINER(GTK_WIDGET_PTR(messageview)),
477                          GTK_WIDGET_PTR(textview));
478                 gtk_box_pack_start(GTK_BOX(messageview->vbox),
479                                    GTK_WIDGET_PTR(mimeview), TRUE, TRUE, 0);
480                 gtk_container_add(GTK_CONTAINER(mimeview->vbox),
481                                   GTK_WIDGET_PTR(textview));
482                 mimeview->type = MIMEVIEW_TEXT;
483         } else if (type == MVIEW_TEXT) {
484                 gtkut_container_remove
485                         (GTK_CONTAINER(GTK_WIDGET_PTR(messageview)),
486                          GTK_WIDGET_PTR(mimeview));
487
488                 if (mimeview->vbox == GTK_WIDGET_PTR(textview)->parent) {
489                         gtkut_container_remove(GTK_CONTAINER(mimeview->vbox),
490                                                GTK_WIDGET_PTR(textview));
491                 } else {
492                         gtkut_container_remove(GTK_CONTAINER(mimeview->vbox),
493                                                GTK_WIDGET_PTR(imageview));
494                 }
495
496                 gtk_box_pack_start(GTK_BOX(messageview->vbox),
497                                    GTK_WIDGET_PTR(textview), TRUE, TRUE, 0);
498         } else
499                 return;
500
501         messageview->type = type;
502 }
503
504 void messageview_clear(MessageView *messageview)
505 {
506         messageview_change_view_type(messageview, MVIEW_TEXT);
507         headerview_clear(messageview->headerview);
508         textview_clear(messageview->textview);
509 }
510
511 void messageview_destroy(MessageView *messageview)
512 {
513         GtkWidget *textview  = GTK_WIDGET_PTR(messageview->textview);
514         GtkWidget *imageview = GTK_WIDGET_PTR(messageview->imageview);
515         GtkWidget *mimeview  = GTK_WIDGET_PTR(messageview->mimeview);
516
517         headerview_destroy(messageview->headerview);
518         textview_destroy(messageview->textview);
519         imageview_destroy(messageview->imageview);
520         mimeview_destroy(messageview->mimeview);
521
522         g_free(messageview);
523
524         gtk_widget_unref(textview);
525         gtk_widget_unref(imageview);
526         gtk_widget_unref(mimeview);
527 }
528
529 void messageview_quote_color_set(void)
530 {
531 }
532
533 void messageview_set_font(MessageView *messageview)
534 {
535         textview_set_font(messageview->textview, NULL);
536 }
537
538 void messageview_copy_clipboard(MessageView *messageview)
539 {
540         switch (messageview->type) {
541         case MVIEW_TEXT:
542                 gtk_editable_copy_clipboard(GTK_EDITABLE(messageview->textview->text));
543                 break;
544         case MVIEW_MIME:
545                 if (messageview->mimeview->type == MIMEVIEW_TEXT)
546                         gtk_editable_copy_clipboard(GTK_EDITABLE(messageview->mimeview->textview->text));
547         default:
548                 break;
549         }
550 }
551
552 void messageview_select_all(MessageView *messageview)
553 {
554         switch (messageview->type) {
555         case MVIEW_TEXT:
556                 gtk_editable_select_region(GTK_EDITABLE(messageview->textview->text), 0, -1);
557                 break;
558         case MVIEW_MIME:
559                 if (messageview->mimeview->type == MIMEVIEW_TEXT)
560                         gtk_editable_select_region(GTK_EDITABLE(messageview->mimeview->textview->text), 0, -1);
561         default:
562                 break;
563         }
564 }
565
566 void messageview_set_position(MessageView *messageview, gint pos)
567 {
568         switch (messageview->type) {
569         case MVIEW_TEXT:
570                 textview_set_position(messageview->textview, pos);
571                 break;
572         case MVIEW_MIME:
573                 if (messageview->mimeview->type == MIMEVIEW_TEXT)
574                         textview_set_position(messageview->mimeview->textview, pos);
575                 break;
576         default:
577                 break;
578         }
579 }
580
581 gboolean messageview_search_string(MessageView *messageview, const gchar *str,
582                                    gboolean case_sens)
583 {
584         switch (messageview->type) {
585         case MVIEW_TEXT:
586                 return textview_search_string(messageview->textview,
587                                         str, case_sens);
588         case MVIEW_MIME:
589                 if (messageview->mimeview->type == MIMEVIEW_TEXT)
590                         return textview_search_string(messageview->mimeview->textview,
591                                                 str, case_sens);
592                 else
593                         return FALSE;
594         default:
595                 return FALSE;
596         }
597                 
598         return FALSE;
599 }
600
601 gboolean messageview_search_string_backward(MessageView *messageview,
602                                             const gchar *str,
603                                             gboolean case_sens)
604 {
605         switch (messageview->type) {
606         case MVIEW_TEXT:
607                 return textview_search_string_backward(messageview->textview,
608                                         str, case_sens);
609         case MVIEW_MIME:
610                 if (messageview->mimeview->type == MIMEVIEW_TEXT)
611                         return textview_search_string_backward(messageview->mimeview->textview,
612                                                 str, case_sens);
613                 else
614                         return FALSE;
615         default:
616                 return FALSE;
617         }
618                 
619         return FALSE;
620
621 }
622
623 GtkWidget *messageview_get_text_widget(MessageView *messageview)
624 {
625         return messageview->textview->text;
626 }
627
628 static void messageview_destroy_cb(GtkWidget *widget, MessageView *messageview)
629 {
630         messageview_destroy(messageview);
631 }
632
633 static void messageview_size_allocate_cb(GtkWidget *widget,
634                                          GtkAllocation *allocation)
635 {
636         g_return_if_fail(allocation != NULL);
637
638         prefs_common.msgwin_width  = allocation->width;
639         prefs_common.msgwin_height = allocation->height;
640 }
641
642 static void key_pressed(GtkWidget *widget, GdkEventKey *event,
643                         MessageView *messageview)
644 {
645         if (event && event->keyval == GDK_Escape && messageview->window)
646                 gtk_widget_destroy(messageview->window);
647 }