changes to the reply, forward, email/news buttons (popup menu now invoked with right...
[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                 gtk_editable_claim_selection(GTK_EDITABLE(textview->text),
476                                              FALSE, GDK_CURRENT_TIME);
477                 gtk_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                 gtk_editable_claim_selection(GTK_EDITABLE(textview->text),
487                                              FALSE, GDK_CURRENT_TIME);
488                 gtk_container_remove
489                         (GTK_CONTAINER(GTK_WIDGET_PTR(messageview)),
490                          GTK_WIDGET_PTR(mimeview));
491
492                 if (mimeview->vbox == GTK_WIDGET_PTR(textview)->parent) {
493                         gtk_container_remove(GTK_CONTAINER(mimeview->vbox),
494                                              GTK_WIDGET_PTR(textview));
495                 } else {
496                         gtk_container_remove(GTK_CONTAINER(mimeview->vbox),
497                                              GTK_WIDGET_PTR(imageview));
498                 }
499
500                 gtk_box_pack_start(GTK_BOX(messageview->vbox),
501                                    GTK_WIDGET_PTR(textview), TRUE, TRUE, 0);
502         } else
503                 return;
504
505         messageview->type = type;
506 }
507
508 void messageview_clear(MessageView *messageview)
509 {
510         messageview_change_view_type(messageview, MVIEW_TEXT);
511         headerview_clear(messageview->headerview);
512         textview_clear(messageview->textview);
513 }
514
515 void messageview_destroy(MessageView *messageview)
516 {
517         GtkWidget *textview  = GTK_WIDGET_PTR(messageview->textview);
518         GtkWidget *imageview = GTK_WIDGET_PTR(messageview->imageview);
519         GtkWidget *mimeview  = GTK_WIDGET_PTR(messageview->mimeview);
520
521         headerview_destroy(messageview->headerview);
522         textview_destroy(messageview->textview);
523         imageview_destroy(messageview->imageview);
524         mimeview_destroy(messageview->mimeview);
525
526         g_free(messageview);
527
528         gtk_widget_unref(textview);
529         gtk_widget_unref(imageview);
530         gtk_widget_unref(mimeview);
531 }
532
533 void messageview_quote_color_set(void)
534 {
535 }
536
537 void messageview_set_font(MessageView *messageview)
538 {
539         textview_set_font(messageview->textview, NULL);
540 }
541
542 void messageview_copy_clipboard(MessageView *messageview)
543 {
544         if (messageview->type == MVIEW_TEXT)
545                 gtk_editable_copy_clipboard
546                         (GTK_EDITABLE(messageview->textview->text));
547 }
548
549 void messageview_select_all(MessageView *messageview)
550 {
551         if (messageview->type == MVIEW_TEXT)
552                 gtk_editable_select_region
553                         (GTK_EDITABLE(messageview->textview->text), 0, -1);
554 }
555
556 void messageview_set_position(MessageView *messageview, gint pos)
557 {
558         if (messageview->type == MVIEW_TEXT)
559                 textview_set_position(messageview->textview, pos);
560 }
561
562 gboolean messageview_search_string(MessageView *messageview, const gchar *str,
563                                    gboolean case_sens)
564 {
565         if (messageview->type == MVIEW_TEXT)
566                 return textview_search_string(messageview->textview,
567                                               str, case_sens);
568         return FALSE;
569 }
570
571 gboolean messageview_search_string_backward(MessageView *messageview,
572                                             const gchar *str,
573                                             gboolean case_sens)
574 {
575         if (messageview->type == MVIEW_TEXT)
576                 return textview_search_string_backward(messageview->textview,
577                                                        str, case_sens);
578         return FALSE;
579 }
580
581 GtkWidget *messageview_get_text_widget(MessageView *messageview)
582 {
583         return messageview->textview->text;
584 }
585
586 static void messageview_destroy_cb(GtkWidget *widget, MessageView *messageview)
587 {
588         messageview_destroy(messageview);
589 }
590
591 static void messageview_size_allocate_cb(GtkWidget *widget,
592                                          GtkAllocation *allocation)
593 {
594         g_return_if_fail(allocation != NULL);
595
596         prefs_common.msgwin_width  = allocation->width;
597         prefs_common.msgwin_height = allocation->height;
598 }
599
600 static void key_pressed(GtkWidget *widget, GdkEventKey *event,
601                         MessageView *messageview)
602 {
603         if (event && event->keyval == GDK_Escape && messageview->window)
604                 gtk_widget_destroy(messageview->window);
605 }