09acea2a04042bd732e64b3bcaf9120b34c990b3
[apps/madmutt.git] / compose.c
1 /*
2  * Copyright notice from original mutt:
3  * Copyright (C) 1996-2000 Michael R. Elkins <me@mutt.org>
4  * Copyright (C) 2004 g10 Code GmbH
5  *
6  * Parts were written/modified by:
7  * Nico Golde <nico@ngolde.de>
8  *
9  * This file is part of mutt-ng, see http://www.muttng.org/.
10  * It's licensed under the GNU General Public License,
11  * please see the file GPL in the top level source directory.
12  */
13
14 #if HAVE_CONFIG_H
15 # include "config.h"
16 #endif
17
18 #include <lib-lib/mem.h>
19 #include <lib-lib/str.h>
20 #include <lib-lib/macros.h>
21 #include <lib-lib/file.h>
22 #include <lib-lib/mapping.h>
23
24 #include <lib-mime/mime.h>
25
26 #include "mutt.h"
27 #include "enter.h"
28 #include "mutt_curses.h"
29 #include "mutt_idna.h"
30 #include "mutt_menu.h"
31 #include "rfc1524.h"
32 #include "attach.h"
33 #include "recvattach.h"
34 #include "sort.h"
35 #include "charset.h"
36 #include "mx.h"
37 #include "buffy.h"
38 #include "compose.h"
39
40 #ifdef MIXMASTER
41 #include "remailer.h"
42 #endif
43
44 #ifdef USE_NNTP
45 #include "nntp.h"
46 #endif
47
48
49 #include <errno.h>
50 #include <string.h>
51 #include <sys/stat.h>
52 #include <sys/wait.h>
53 #include <unistd.h>
54 #include <stdlib.h>
55
56 static const char *There_are_no_attachments = N_("There are no attachments.");
57
58 #define CHECK_COUNT if (idxlen == 0) { mutt_error _(There_are_no_attachments); break; }
59
60
61
62 enum {
63   HDR_FROM = 1,
64   HDR_TO,
65   HDR_CC,
66   HDR_BCC,
67   HDR_SUBJECT,
68   HDR_REPLYTO,
69   HDR_FCC,
70
71 #ifdef MIXMASTER
72   HDR_MIX,
73 #endif
74
75   HDR_CRYPT,
76   HDR_CRYPTINFO,
77
78 #ifdef USE_NNTP
79   HDR_NEWSGROUPS,
80   HDR_FOLLOWUPTO,
81   HDR_XCOMMENTTO,
82 #endif
83
84 #ifndef USE_NNTP
85   HDR_ATTACH = (HDR_FCC + 5)    /* where to start printing the attachments */
86 #else
87   HDR_ATTACH = (HDR_FCC + 7)
88 #endif
89 };
90
91 #define HDR_XOFFSET     14
92 #define TITLE_FMT       "%14s"        /* Used for Prompts, which are ASCII */
93 #define SW              (option(OPTMBOXPANE)?SidebarWidth:0)
94 #define W               (COLS - HDR_XOFFSET - SW)
95
96 static const char *Prompts[] = {
97   "From: ",
98   "To: ",
99   "Cc: ",
100   "Bcc: ",
101   "Subject: ",
102   "Reply-To: ",
103   "Fcc: "
104 #ifdef USE_NNTP
105 #ifdef MIXMASTER
106     , ""
107 #endif
108     , "", "", "Newsgroups: ", "Followup-To: ", "X-Comment-To: "
109 #endif
110 };
111
112 static struct mapping_t ComposeHelp[] = {
113   {N_("Send"), OP_COMPOSE_SEND_MESSAGE},
114   {N_("Abort"), OP_EXIT},
115   {"To", OP_COMPOSE_EDIT_TO},
116   {"CC", OP_COMPOSE_EDIT_CC},
117   {"Subj", OP_COMPOSE_EDIT_SUBJECT},
118   {N_("Attach file"), OP_COMPOSE_ATTACH_FILE},
119   {N_("Descrip"), OP_COMPOSE_EDIT_DESCRIPTION},
120   {N_("Help"), OP_HELP},
121   {NULL, OP_NULL}
122 };
123
124 #ifdef USE_NNTP
125 static struct mapping_t ComposeNewsHelp[] = {
126   {N_("Send"), OP_COMPOSE_SEND_MESSAGE},
127   {N_("Abort"), OP_EXIT},
128   {"Newsgroups", OP_COMPOSE_EDIT_NEWSGROUPS},
129   {"Subj", OP_COMPOSE_EDIT_SUBJECT},
130   {N_("Attach file"), OP_COMPOSE_ATTACH_FILE},
131   {N_("Descrip"), OP_COMPOSE_EDIT_DESCRIPTION},
132   {N_("Help"), OP_HELP},
133   {NULL, OP_NULL}
134 };
135 #endif
136
137
138 static void snd_entry (char *b, ssize_t blen, MUTTMENU * menu, int num) {
139   int w=(COLS-SW)>blen?blen:COLS-SW;
140   mutt_FormatString (b, w, NONULL (AttachFormat), mutt_attach_fmt,
141                      (unsigned long) (((ATTACHPTR **) menu->data)[num]),
142                      M_FORMAT_STAT_FILE | M_FORMAT_ARROWCURSOR);
143 }
144
145 #include "mutt_crypt.h"
146
147 static void redraw_crypt_lines (HEADER * msg)
148 {
149   int off = 0;
150
151   if ((WithCrypto & APPLICATION_PGP) && (WithCrypto & APPLICATION_SMIME)) {
152     if (!msg->security)
153       mvaddstr (HDR_CRYPT, SW, "    Security: ");
154     else if (msg->security & APPLICATION_SMIME)
155       mvaddstr (HDR_CRYPT, SW, "      S/MIME: ");
156     else if (msg->security & APPLICATION_PGP)
157       mvaddstr (HDR_CRYPT, SW, "         PGP: ");
158   }
159   else if ((WithCrypto & APPLICATION_SMIME))
160     mvaddstr (HDR_CRYPT, SW, "      S/MIME: ");
161   else if ((WithCrypto & APPLICATION_PGP))
162     mvaddstr (HDR_CRYPT, SW, "         PGP: ");
163   else
164     return;
165
166   if ((msg->security & (ENCRYPT | SIGN)) == (ENCRYPT | SIGN))
167     addstr (_("Sign, Encrypt"));
168   else if (msg->security & ENCRYPT)
169     addstr (_("Encrypt"));
170   else if (msg->security & SIGN)
171     addstr (_("Sign"));
172   else
173     addstr (_("Clear"));
174
175   if ((WithCrypto & APPLICATION_PGP))
176     if ((msg->security & APPLICATION_PGP)
177         && (msg->security & (ENCRYPT | SIGN))) {
178       if ((msg->security & INLINE))
179         addstr (_(" (inline)"));
180       else
181         addstr (_(" (PGP/MIME)"));
182     }
183   clrtoeol ();
184
185   move (HDR_CRYPTINFO, SW);
186   clrtoeol ();
187   if ((WithCrypto & APPLICATION_PGP)
188       && msg->security & APPLICATION_PGP && msg->security & SIGN)
189     printw ("%s%s", _("     sign as: "),
190             PgpSignAs ? PgpSignAs : _("<default>"));
191
192   if ((WithCrypto & APPLICATION_SMIME)
193       && msg->security & APPLICATION_SMIME && msg->security & SIGN) {
194     printw ("%s%s", _("     sign as: "),
195             SmimeDefaultKey ? SmimeDefaultKey : _("<default>"));
196   }
197
198   if ((WithCrypto & APPLICATION_SMIME)
199       && (msg->security & APPLICATION_SMIME)
200       && (msg->security & ENCRYPT)
201       && SmimeCryptAlg && *SmimeCryptAlg) {
202     mvprintw (HDR_CRYPTINFO, SW + 40, "%s%s", _("Encrypt with: "),
203               NONULL (SmimeCryptAlg));
204     off = 20;
205   }
206 }
207
208
209 #ifdef MIXMASTER
210
211 static void redraw_mix_line (LIST * chain)
212 {
213   int c;
214   const char *t;
215
216   mvaddstr (HDR_MIX, SW, "         Mix: ");
217
218   if (!chain) {
219     addstr ("<no chain defined>");
220     clrtoeol ();
221     return;
222   }
223
224   for (c = 12; chain; chain = chain->next) {
225     t = chain->data;
226     if (t && t[0] == '0' && t[1] == '\0')
227       t = "<random>";
228
229     if (c + m_strlen(t) + 2 >= COLS - SW)
230       break;
231
232     addstr (NONULL (t));
233     if (chain->next)
234       addstr (", ");
235
236     c += m_strlen(t) + 2;
237   }
238 }
239 #endif /* MIXMASTER */
240
241 static int check_attachments (ATTACHPTR ** idx, short idxlen)
242 {
243   int i, r;
244   struct stat st;
245   char pretty[_POSIX_PATH_MAX], msg[_POSIX_PATH_MAX + SHORT_STRING];
246
247   for (i = 0; i < idxlen; i++) {
248     m_strcpy(pretty, sizeof(pretty), idx[i]->content->filename);
249     if (stat (idx[i]->content->filename, &st) != 0) {
250       mutt_pretty_mailbox (pretty);
251       mutt_error (_("%s [#%d] no longer exists!"), pretty, i + 1);
252       return -1;
253     }
254
255     if (idx[i]->content->stamp < st.st_mtime) {
256       mutt_pretty_mailbox (pretty);
257       snprintf (msg, sizeof (msg), _("%s [#%d] modified. Update encoding?"),
258                 pretty, i + 1);
259
260       if ((r = mutt_yesorno (msg, M_YES)) == M_YES)
261         mutt_update_encoding (idx[i]->content);
262       else if (r == -1)
263         return -1;
264     }
265   }
266
267   return 0;
268 }
269
270 static void draw_envelope_addr (int line, address_t * addr)
271 {
272   char buf[STRING];
273
274   buf[0] = 0;
275   rfc822_write_address (buf, sizeof (buf), addr, 1);
276   mvprintw (line, SW, TITLE_FMT, Prompts[line - 1]);
277   mutt_paddstr (W, buf);
278 }
279
280 static void draw_envelope (HEADER * msg, char *fcc)
281 {
282   draw_envelope_addr (HDR_FROM, msg->env->from);
283 #ifdef USE_NNTP
284   if (!option (OPTNEWSSEND)) {
285 #endif
286     draw_envelope_addr (HDR_TO, msg->env->to);
287     draw_envelope_addr (HDR_CC, msg->env->cc);
288     draw_envelope_addr (HDR_BCC, msg->env->bcc);
289 #ifdef USE_NNTP
290   }
291   else {
292     mvprintw (HDR_TO, SW, TITLE_FMT, Prompts[HDR_NEWSGROUPS - 1]);
293     mutt_paddstr (W, NONULL (msg->env->newsgroups));
294     mvprintw (HDR_CC, SW, TITLE_FMT, Prompts[HDR_FOLLOWUPTO - 1]);
295     mutt_paddstr (W, NONULL (msg->env->followup_to));
296     if (option (OPTXCOMMENTTO)) {
297       mvprintw (HDR_BCC, 0, TITLE_FMT, Prompts[HDR_XCOMMENTTO - 1]);
298       mutt_paddstr (W, NONULL (msg->env->x_comment_to));
299     }
300   }
301 #endif
302   mvprintw (HDR_SUBJECT, SW, TITLE_FMT, Prompts[HDR_SUBJECT - 1]);
303   mutt_paddstr (W, NONULL (msg->env->subject));
304   draw_envelope_addr (HDR_REPLYTO, msg->env->reply_to);
305   mvprintw (HDR_FCC, SW, TITLE_FMT, Prompts[HDR_FCC - 1]);
306   mutt_paddstr (W, fcc);
307
308   if (WithCrypto)
309     redraw_crypt_lines (msg);
310
311 #ifdef MIXMASTER
312   redraw_mix_line (msg->chain);
313 #endif
314
315   SETCOLOR (MT_COLOR_STATUS);
316   mvaddstr (HDR_ATTACH - 1, SW, _("-- Attachments"));
317   BKGDSET (MT_COLOR_STATUS);
318   clrtoeol ();
319
320   BKGDSET (MT_COLOR_NORMAL);
321   SETCOLOR (MT_COLOR_NORMAL);
322 }
323
324 static int edit_address_list (int line, address_t ** addr)
325 {
326   char buf[HUGE_STRING] = "";   /* needs to be large for alias expansion */
327   char *err = NULL;
328
329   mutt_addrlist_to_local (*addr);
330   rfc822_write_address (buf, sizeof (buf), *addr, 0);
331   if (mutt_get_field (Prompts[line - 1], buf, sizeof (buf), M_ALIAS) == 0) {
332     address_delete (addr);
333     *addr = mutt_parse_adrlist (*addr, buf);
334     *addr = mutt_expand_aliases (*addr);
335   }
336
337   if (option (OPTNEEDREDRAW)) {
338     unset_option (OPTNEEDREDRAW);
339     return (REDRAW_FULL);
340   }
341
342   if (mutt_addrlist_to_idna (*addr, &err) != 0) {
343     mutt_error (_("Warning: '%s' is a bad IDN."), err);
344     mutt_refresh ();
345     p_delete(&err);
346   }
347
348   /* redraw the expanded list so the user can see the result */
349   buf[0] = 0;
350   rfc822_write_address (buf, sizeof (buf), *addr, 1);
351   move (line, HDR_XOFFSET + SW);
352   mutt_paddstr (W, buf);
353
354   return 0;
355 }
356
357 static int delete_attachment (MUTTMENU * menu, short *idxlen, int x)
358 {
359   ATTACHPTR **idx = (ATTACHPTR **) menu->data;
360   int y;
361
362   menu->redraw = REDRAW_INDEX | REDRAW_STATUS;
363
364   if (x == 0 && menu->max == 1) {
365     mutt_error _("You may not delete the only attachment.");
366
367     idx[x]->content->tagged = 0;
368     return (-1);
369   }
370
371   for (y = 0; y < *idxlen; y++) {
372     if (idx[y]->content->next == idx[x]->content) {
373       idx[y]->content->next = idx[x]->content->next;
374       break;
375     }
376   }
377
378   idx[x]->content->next = NULL;
379   idx[x]->content->parts = NULL;
380   mutt_free_body (&(idx[x]->content));
381   p_delete(&idx[x]->tree);
382   p_delete(&idx[x]);
383   for (; x < *idxlen - 1; x++)
384     idx[x] = idx[x + 1];
385   menu->max = --(*idxlen);
386
387   return (0);
388 }
389
390 static void update_idx (MUTTMENU * menu, ATTACHPTR ** idx, short idxlen)
391 {
392   idx[idxlen]->level = (idxlen > 0) ? idx[idxlen - 1]->level : 0;
393   if (idxlen)
394     idx[idxlen - 1]->content->next = idx[idxlen]->content;
395   idx[idxlen]->content->aptr = idx[idxlen];
396   menu->current = idxlen++;
397   mutt_update_tree (idx, idxlen);
398   menu->max = idxlen;
399   return;
400 }
401
402
403 /* 
404  * cum_attachs_size: Cumulative Attachments Size
405  *
406  * Returns the total number of bytes used by the attachments in the
407  * attachment list _after_ content-transfer-encodings have been
408  * applied.
409  * 
410  */
411
412 static unsigned long cum_attachs_size (MUTTMENU * menu)
413 {
414   size_t s;
415   unsigned short i;
416   ATTACHPTR **idx = menu->data;
417   CONTENT *info;
418   BODY *b;
419
420   for (i = 0, s = 0; i < menu->max; i++) {
421     b = idx[i]->content;
422
423     if (!b->content)
424       b->content = mutt_get_content_info (b->filename, b);
425
426     if ((info = b->content)) {
427       switch (b->encoding) {
428       case ENCQUOTEDPRINTABLE:
429         s += 3 * (info->lobin + info->hibin) + info->ascii + info->crlf;
430         break;
431       case ENCBASE64:
432         s += (4 * (info->lobin + info->hibin + info->ascii + info->crlf)) / 3;
433         break;
434       default:
435         s += info->lobin + info->hibin + info->ascii + info->crlf;
436         break;
437       }
438     }
439   }
440
441   return s;
442 }
443
444 /*
445  * compose_format_str()
446  *
447  * %a = total number of attachments 
448  * %h = hostname  [option]
449  * %l = approx. length of current message (in bytes) 
450  * %v = Mutt version 
451  *
452  * This function is similar to status_format_str().  Look at that function for
453  * help when modifying this function.
454  */
455
456 static const char *compose_format_str (char *buf, size_t buflen, char op,
457                                        const char *src, const char *prefix,
458                                        const char *ifstring,
459                                        const char *elsestring,
460                                        unsigned long data, format_flag flags)
461 {
462   char fmt[SHORT_STRING], tmp[SHORT_STRING];
463   int optional = (flags & M_FORMAT_OPTIONAL);
464   MUTTMENU *menu = (MUTTMENU *) data;
465
466   *buf = 0;
467   switch (op) {
468   case 'a':                    /* total number of attachments */
469     snprintf (fmt, sizeof (fmt), "%%%sd", prefix);
470     snprintf (buf, buflen, fmt, menu->max);
471     break;
472
473   case 'h':                    /* hostname */
474     snprintf (fmt, sizeof (fmt), "%%%ss", prefix);
475     snprintf (buf, buflen, fmt, NONULL (Hostname));
476     break;
477
478   case 'l':                    /* approx length of current message in bytes */
479     snprintf (fmt, sizeof (fmt), "%%%ss", prefix);
480     mutt_pretty_size (tmp, sizeof (tmp), menu ? cum_attachs_size (menu) : 0);
481     snprintf (buf, buflen, fmt, tmp);
482     break;
483
484   case 'v':
485     m_strcpy(buf, buflen, mutt_make_version (0));
486     break;
487
488   case 0:
489     *buf = 0;
490     return (src);
491
492   default:
493     snprintf (buf, buflen, "%%%s%c", prefix, op);
494     break;
495   }
496
497   if (optional)
498     compose_status_line (buf, buflen, menu, ifstring);
499   else if (flags & M_FORMAT_OPTIONAL)
500     compose_status_line (buf, buflen, menu, elsestring);
501
502   return (src);
503 }
504
505 static void compose_status_line (char *buf, ssize_t buflen, MUTTMENU * menu,
506                                  const char *p)
507 {
508   int w=(COLS-SW)>buflen?buflen:(COLS-SW);
509   mutt_FormatString (buf, w, p, compose_format_str,
510                      (unsigned long) menu, 0);
511 }
512
513
514 /* return values:
515  *
516  * 1    message should be postponed
517  * 0    normal exit
518  * -1   abort message
519  */
520 int mutt_compose_menu (HEADER * msg,    /* structure for new message */
521                        char *fcc,       /* where to save a copy of the message */
522                        size_t fcclen, HEADER * cur)
523 {                               /* current message */
524   char helpstr[SHORT_STRING];
525   char buf[LONG_STRING];
526   char fname[_POSIX_PATH_MAX];
527   MUTTMENU *menu;
528   ATTACHPTR **idx = NULL;
529   short idxlen = 0;
530   short idxmax = 0;
531   int i, closed = 0;
532   int r = -1;                   /* return value */
533   int op = 0;
534   int loop = 1;
535   int fccSet = 0;               /* has the user edited the Fcc: field ? */
536   CONTEXT *ctx = NULL, *this = NULL;
537
538   /* Sort, SortAux could be changed in mutt_index_menu() */
539   int oldSort, oldSortAux;
540   struct stat st;
541
542 #ifdef USE_NNTP
543   int news = 0;                 /* is it a news article ? */
544
545   if (option (OPTNEWSSEND))
546     news++;
547 #endif
548
549   mutt_attach_init (msg->content);
550   idx = mutt_gen_attach_list (msg->content, -1, idx, &idxlen, &idxmax, 0, 1);
551
552   menu = mutt_new_menu ();
553   menu->menu = MENU_COMPOSE;
554   menu->offset = HDR_ATTACH;
555   menu->max = idxlen;
556   menu->make_entry = snd_entry;
557   menu->tag = mutt_tag_attach;
558   menu->data = idx;
559 #ifdef USE_NNTP
560   if (news)
561     menu->help =
562       mutt_compile_help (helpstr, sizeof (helpstr), MENU_COMPOSE,
563                          ComposeNewsHelp);
564   else
565 #endif
566     menu->help =
567       mutt_compile_help (helpstr, sizeof (helpstr), MENU_COMPOSE,
568                          ComposeHelp);
569
570   if (option (OPTMBOXPANE))
571     buffy_check (0);
572   while (loop) {
573 #ifdef USE_NNTP
574     unset_option (OPTNEWS);     /* for any case */
575 #endif
576     switch (op = mutt_menuLoop (menu)) {
577     case OP_REDRAW:
578       draw_envelope (msg, fcc);
579       menu->offset = HDR_ATTACH;
580       menu->pagelen = LINES - HDR_ATTACH - 2;
581       break;
582     case OP_COMPOSE_EDIT_FROM:
583       menu->redraw = edit_address_list (HDR_FROM, &msg->env->from);
584       mutt_message_hook (NULL, msg, M_SEND2HOOK);
585       break;
586     case OP_COMPOSE_EDIT_TO:
587 #ifdef USE_NNTP
588       if (!news) {
589 #endif
590         menu->redraw = edit_address_list (HDR_TO, &msg->env->to);
591         mutt_message_hook (NULL, msg, M_SEND2HOOK);
592 #ifdef USE_NNTP
593       }
594 #endif
595       break;
596     case OP_COMPOSE_EDIT_BCC:
597 #ifdef USE_NNTP
598       if (!news) {
599 #endif
600         menu->redraw = edit_address_list (HDR_BCC, &msg->env->bcc);
601         mutt_message_hook (NULL, msg, M_SEND2HOOK);
602 #ifdef USE_NNTP
603       }
604 #endif
605       break;
606     case OP_COMPOSE_EDIT_CC:
607 #ifdef USE_NNTP
608       if (!news) {
609 #endif
610         menu->redraw = edit_address_list (HDR_CC, &msg->env->cc);
611         mutt_message_hook (NULL, msg, M_SEND2HOOK);
612 #ifdef USE_NNTP
613       }
614 #endif
615       break;
616 #ifdef USE_NNTP
617     case OP_COMPOSE_EDIT_NEWSGROUPS:
618       if (news) {
619         if (msg->env->newsgroups)
620           m_strcpy(buf, sizeof(buf), msg->env->newsgroups);
621         else
622           buf[0] = 0;
623         if (mutt_get_field ("Newsgroups: ", buf, sizeof (buf), 0) == 0
624             && buf[0]) {
625           p_delete(&msg->env->newsgroups);
626           m_strrtrim(buf);
627           msg->env->newsgroups = m_strdup(skipspaces(buf));
628           move (HDR_TO, HDR_XOFFSET);
629           clrtoeol ();
630           if (msg->env->newsgroups)
631             printw ("%-*.*s", W, W, msg->env->newsgroups);
632         }
633       }
634       break;
635
636     case OP_COMPOSE_EDIT_FOLLOWUP_TO:
637       if (news) {
638         buf[0] = 0;
639         if (msg->env->followup_to)
640           m_strcpy(buf, sizeof(buf), msg->env->followup_to);
641         if (mutt_get_field ("Followup-To: ", buf, sizeof (buf), 0) == 0
642             && buf[0]) {
643           p_delete(&msg->env->followup_to);
644           m_strrtrim(buf);
645           msg->env->followup_to = m_strdup(skipspaces(buf));
646           move (HDR_CC, HDR_XOFFSET);
647           clrtoeol ();
648           if (msg->env->followup_to)
649             printw ("%-*.*s", W, W, msg->env->followup_to);
650         }
651       }
652       break;
653
654     case OP_COMPOSE_EDIT_X_COMMENT_TO:
655       if (news && option (OPTXCOMMENTTO)) {
656         buf[0] = 0;
657         if (msg->env->x_comment_to)
658           m_strcpy(buf, sizeof(buf), msg->env->x_comment_to);
659         if (mutt_get_field ("X-Comment-To: ", buf, sizeof (buf), 0) == 0
660             && buf[0]) {
661           p_delete(&msg->env->x_comment_to);
662           msg->env->x_comment_to = m_strdup(buf);
663           move (HDR_BCC, HDR_XOFFSET);
664           clrtoeol ();
665           if (msg->env->x_comment_to)
666             printw ("%-*.*s", W, W, msg->env->x_comment_to);
667         }
668       }
669       break;
670 #endif
671     case OP_COMPOSE_EDIT_SUBJECT:
672       if (msg->env->subject)
673         m_strcpy(buf, sizeof(buf), msg->env->subject);
674       else
675         buf[0] = 0;
676       if (mutt_get_field ("Subject: ", buf, sizeof (buf), 0) == 0) {
677         m_strreplace(&msg->env->subject, buf);
678         move (HDR_SUBJECT, HDR_XOFFSET + SW);
679         clrtoeol ();
680         if (msg->env->subject)
681           mutt_paddstr (W, msg->env->subject);
682       }
683       mutt_message_hook (NULL, msg, M_SEND2HOOK);
684       break;
685     case OP_COMPOSE_EDIT_REPLY_TO:
686       menu->redraw = edit_address_list (HDR_REPLYTO, &msg->env->reply_to);
687       mutt_message_hook (NULL, msg, M_SEND2HOOK);
688       break;
689     case OP_COMPOSE_EDIT_FCC:
690       m_strcpy(buf, sizeof(buf), fcc);
691       if (mutt_get_field ("Fcc: ", buf, sizeof (buf), M_FILE | M_CLEAR) == 0) {
692         m_strcpy(fcc, _POSIX_PATH_MAX, buf);
693         mutt_pretty_mailbox (fcc);
694         move (HDR_FCC, HDR_XOFFSET + SW);
695         mutt_paddstr (W, fcc);
696         fccSet = 1;
697       }
698       MAYBE_REDRAW (menu->redraw);
699       mutt_message_hook (NULL, msg, M_SEND2HOOK);
700       break;
701     case OP_COMPOSE_EDIT_MESSAGE:
702       if (Editor && (m_strcmp("builtin", Editor) != 0)
703           && !option (OPTEDITHDRS)) {
704         mutt_edit_file (Editor, msg->content->filename);
705         mutt_update_encoding (msg->content);
706         menu->redraw = REDRAW_CURRENT | REDRAW_STATUS;
707         mutt_message_hook (NULL, msg, M_SEND2HOOK);
708         break;
709       }
710       /* fall through */
711     case OP_COMPOSE_EDIT_HEADERS:
712       if (m_strcmp("builtin", Editor) != 0 &&
713           (op == OP_COMPOSE_EDIT_HEADERS ||
714            (op == OP_COMPOSE_EDIT_MESSAGE && option (OPTEDITHDRS)))) {
715         const char *tag = NULL;
716         const char *err = NULL;
717
718         mutt_env_to_local (msg->env);
719         mutt_edit_headers (NONULL (Editor), msg->content->filename, msg,
720                            fcc, fcclen);
721         if (mutt_env_to_idna (msg->env, &tag, &err)) {
722           mutt_error (_("Bad IDN in \"%s\": '%s'"), tag, err);
723           p_delete(&err);
724         }
725       }
726       else {
727         /* this is grouped with OP_COMPOSE_EDIT_HEADERS because the
728            attachment list could change if the user invokes ~v to edit
729            the message with headers, in which we need to execute the
730            code below to regenerate the index array */
731         mutt_builtin_editor (msg->content->filename, msg, cur);
732       }
733       mutt_update_encoding (msg->content);
734
735       /* attachments may have been added */
736       if (idxlen && idx[idxlen - 1]->content->next) {
737         for (i = 0; i < idxlen; i++)
738           p_delete(&idx[i]);
739         idxlen = 0;
740         idx =
741           mutt_gen_attach_list (msg->content, -1, idx, &idxlen, &idxmax, 0,
742                                 1);
743         menu->data = idx;
744         menu->max = idxlen;
745       }
746
747       menu->redraw = REDRAW_FULL;
748       mutt_message_hook (NULL, msg, M_SEND2HOOK);
749       break;
750
751
752
753     case OP_COMPOSE_ATTACH_KEY:
754       if (!(WithCrypto & APPLICATION_PGP))
755         break;
756       if (idxlen == idxmax) {
757         p_realloc(&idx, idxmax += 5);
758         menu->data = idx;
759       }
760
761       idx[idxlen] = p_new(ATTACHPTR, 1);
762       if ((idx[idxlen]->content =
763            crypt_pgp_make_key_attachment (NULL)) != NULL) {
764         update_idx (menu, idx, idxlen++);
765         menu->redraw |= REDRAW_INDEX;
766       }
767       else
768         p_delete(&idx[idxlen]);
769
770       menu->redraw |= REDRAW_STATUS;
771
772       if (option (OPTNEEDREDRAW)) {
773         menu->redraw = REDRAW_FULL;
774         unset_option (OPTNEEDREDRAW);
775       }
776
777       mutt_message_hook (NULL, msg, M_SEND2HOOK);
778       break;
779
780
781     case OP_COMPOSE_ATTACH_FILE:
782       {
783         char *prompt, **files;
784         int error, numfiles;
785
786         fname[0] = 0;
787         prompt = _("Attach file");
788         numfiles = 0;
789         files = NULL;
790
791         if (_mutt_enter_fname
792             (prompt, fname, sizeof (fname), &menu->redraw, 0, 1, &files,
793              &numfiles) == -1 || *fname == '\0')
794           break;
795
796         if (idxlen + numfiles >= idxmax) {
797           p_realloc(&idx, idxmax += 5 + numfiles);
798           menu->data = idx;
799         }
800
801         error = 0;
802         if (numfiles > 1)
803           mutt_message _("Attaching selected files...");
804
805         for (i = 0; i < numfiles; i++) {
806           char *att = files[i];
807
808           idx[idxlen] = p_new(ATTACHPTR, 1);
809           idx[idxlen]->unowned = 1;
810           idx[idxlen]->content = mutt_make_file_attach (att);
811           if (idx[idxlen]->content != NULL)
812             update_idx (menu, idx, idxlen++);
813           else {
814             error = 1;
815             mutt_error (_("Unable to attach %s!"), att);
816             p_delete(&idx[idxlen]);
817           }
818         }
819
820         p_delete(&files);
821         if (!error)
822           mutt_clear_error ();
823
824         menu->redraw |= REDRAW_INDEX | REDRAW_STATUS;
825       }
826       mutt_message_hook (NULL, msg, M_SEND2HOOK);
827       break;
828
829     case OP_COMPOSE_ATTACH_MESSAGE:
830 #ifdef USE_NNTP
831     case OP_COMPOSE_ATTACH_NEWS_MESSAGE:
832 #endif
833       {
834         char *prompt;
835         HEADER *h;
836
837         fname[0] = 0;
838         prompt = _("Open mailbox to attach message from");
839
840 #ifdef USE_NNTP
841         unset_option (OPTNEWS);
842         if (op == OP_COMPOSE_ATTACH_NEWS_MESSAGE) {
843           if (!(CurrentNewsSrv = mutt_select_newsserver (NewsServer)))
844             break;
845
846           prompt = _("Open newsgroup to attach message from");
847           set_option (OPTNEWS);
848         }
849 #endif
850
851         if (Context)
852 #ifdef USE_NNTP
853           if ((op == OP_COMPOSE_ATTACH_MESSAGE) ^ (Context->magic == M_NNTP))
854 #endif
855           {
856             m_strcpy(fname, sizeof(fname), NONULL(Context->path));
857             mutt_pretty_mailbox (fname);
858           }
859
860         if (mutt_enter_fname (prompt, fname, sizeof (fname), &menu->redraw, 1)
861             == -1 || !fname[0])
862           break;
863
864 #ifdef USE_NNTP
865         if (option (OPTNEWS))
866           nntp_expand_path (fname, sizeof (fname),
867                             &CurrentNewsSrv->conn->account);
868         else
869 #endif
870           mutt_expand_path (fname, sizeof (fname));
871 #ifdef USE_IMAP
872         if (mx_get_magic (fname) != M_IMAP)
873 #endif
874 #ifdef USE_POP
875           if (mx_get_magic (fname) != M_POP)
876 #endif
877 #ifdef USE_NNTP
878             if (mx_get_magic (fname) != M_NNTP && !option (OPTNEWS))
879 #endif
880               /* check to make sure the file exists and is readable */
881               if (access (fname, R_OK) == -1) {
882                 mutt_perror (fname);
883                 break;
884               }
885
886         menu->redraw = REDRAW_FULL;
887
888         ctx = mx_open_mailbox (fname, M_READONLY, NULL);
889         if (ctx == NULL) {
890           mutt_perror (fname);
891           break;
892         }
893
894         if (!ctx->msgcount) {
895           mx_close_mailbox (ctx, NULL);
896           p_delete(&ctx);
897           mutt_error _("No messages in that folder.");
898
899           break;
900         }
901
902         this = Context;         /* remember current folder and sort methods */
903         oldSort = Sort;
904         oldSortAux = SortAux;
905
906         Context = ctx;
907         set_option (OPTATTACHMSG);
908         mutt_message _("Tag the messages you want to attach!");
909
910         closed = mutt_index_menu ();
911         unset_option (OPTATTACHMSG);
912
913         if (!Context) {
914           /* go back to the folder we started from */
915           Context = this;
916           /* Restore old $sort and $sort_aux */
917           Sort = oldSort;
918           SortAux = oldSortAux;
919           menu->redraw |= REDRAW_INDEX | REDRAW_STATUS;
920           break;
921         }
922
923         if (idxlen + Context->tagged >= idxmax) {
924           p_realloc(&idx, idxmax += 5 + Context->tagged);
925           menu->data = idx;
926         }
927
928         for (i = 0; i < Context->msgcount; i++) {
929           h = Context->hdrs[i];
930           if (h->tagged) {
931             idx[idxlen] = p_new(ATTACHPTR, 1);
932             idx[idxlen]->content = mutt_make_message_attach (Context, h, 1);
933             if (idx[idxlen]->content != NULL)
934               update_idx (menu, idx, idxlen++);
935             else {
936               mutt_error _("Unable to attach!");
937
938               p_delete(&idx[idxlen]);
939             }
940           }
941         }
942         menu->redraw |= REDRAW_FULL;
943
944         if (closed == OP_QUIT)
945           mx_close_mailbox (Context, NULL);
946         else
947           mx_fastclose_mailbox (Context);
948         p_delete(&Context);
949
950         /* go back to the folder we started from */
951         Context = this;
952         /* Restore old $sort and $sort_aux */
953         Sort = oldSort;
954         SortAux = oldSortAux;
955       }
956       mutt_message_hook (NULL, msg, M_SEND2HOOK);
957       break;
958
959     case OP_DELETE:
960       CHECK_COUNT;
961       if (idx[menu->current]->unowned)
962         idx[menu->current]->content->unlink = 0;
963       if (delete_attachment (menu, &idxlen, menu->current) == -1)
964         break;
965       mutt_update_tree (idx, idxlen);
966       if (idxlen) {
967         if (menu->current > idxlen - 1)
968           menu->current = idxlen - 1;
969       }
970       else
971         menu->current = 0;
972
973       if (menu->current == 0)
974         msg->content = idx[0]->content;
975
976       menu->redraw |= REDRAW_STATUS;
977       mutt_message_hook (NULL, msg, M_SEND2HOOK);
978       break;
979
980 #define CURRENT idx[menu->current]->content
981
982     case OP_COMPOSE_TOGGLE_RECODE:
983       {
984         CHECK_COUNT;
985         if (!mutt_is_text_part (CURRENT)) {
986           mutt_error (_("Recoding only affects text attachments."));
987           break;
988         }
989         CURRENT->noconv = !CURRENT->noconv;
990         if (CURRENT->noconv)
991           mutt_message (_("The current attachment won't be converted."));
992         else
993           mutt_message (_("The current attachment will be converted."));
994         menu->redraw = REDRAW_CURRENT;
995         mutt_message_hook (NULL, msg, M_SEND2HOOK);
996         break;
997       }
998 #undef CURRENT
999
1000     case OP_COMPOSE_EDIT_DESCRIPTION:
1001       CHECK_COUNT;
1002       m_strcpy(buf, sizeof(buf),
1003                NONULL(idx[menu->current]->content->description));
1004       /* header names should not be translated */
1005       if (mutt_get_field ("Description: ", buf, sizeof (buf), 0) == 0) {
1006         m_strreplace(&idx[menu->current]->content->description, buf);
1007         menu->redraw = REDRAW_CURRENT;
1008       }
1009       mutt_message_hook (NULL, msg, M_SEND2HOOK);
1010       break;
1011
1012     case OP_COMPOSE_UPDATE_ENCODING:
1013       CHECK_COUNT;
1014       if (menu->tagprefix) {
1015         BODY *top;
1016
1017         for (top = msg->content; top; top = top->next) {
1018           if (top->tagged)
1019             mutt_update_encoding (top);
1020         }
1021         menu->redraw = REDRAW_FULL;
1022       }
1023       else {
1024         mutt_update_encoding (idx[menu->current]->content);
1025         menu->redraw = REDRAW_CURRENT | REDRAW_STATUS;
1026       }
1027       mutt_message_hook (NULL, msg, M_SEND2HOOK);
1028       break;
1029
1030     case OP_COMPOSE_TOGGLE_DISPOSITION:
1031       /* toggle the content-disposition between inline/attachment */
1032       idx[menu->current]->content->disposition =
1033         (idx[menu->current]->content->disposition ==
1034          DISPINLINE) ? DISPATTACH : DISPINLINE;
1035       menu->redraw = REDRAW_CURRENT;
1036       break;
1037
1038     case OP_EDIT_TYPE:
1039       CHECK_COUNT;
1040       {
1041         mutt_edit_content_type (NULL, idx[menu->current]->content, NULL);
1042
1043         /* this may have been a change to text/something */
1044         mutt_update_encoding (idx[menu->current]->content);
1045
1046         menu->redraw = REDRAW_CURRENT;
1047       }
1048       mutt_message_hook (NULL, msg, M_SEND2HOOK);
1049       break;
1050
1051     case OP_COMPOSE_EDIT_ENCODING:
1052       CHECK_COUNT;
1053       m_strcpy(buf, sizeof(buf),
1054                ENCODING(idx[menu->current]->content->encoding));
1055       if (mutt_get_field ("Content-Transfer-Encoding: ", buf,
1056                           sizeof (buf), 0) == 0 && buf[0]) {
1057         if ((i = mutt_check_encoding (buf)) != ENCOTHER && i != ENCUUENCODED) {
1058           idx[menu->current]->content->encoding = i;
1059           menu->redraw = REDRAW_CURRENT | REDRAW_STATUS;
1060           mutt_clear_error ();
1061         }
1062         else
1063           mutt_error _("Invalid encoding.");
1064       }
1065       mutt_message_hook (NULL, msg, M_SEND2HOOK);
1066       break;
1067
1068     case OP_COMPOSE_SEND_MESSAGE:
1069
1070       /* Note: We don't invoke send2-hook here, since we want to leave
1071        * users an opportunity to change settings from the ":" prompt.
1072        */
1073
1074       if (check_attachments (idx, idxlen) != 0) {
1075         menu->redraw = REDRAW_FULL;
1076         break;
1077       }
1078
1079
1080 #ifdef MIXMASTER
1081       if (msg->chain && mix_check_message (msg) != 0)
1082         break;
1083 #endif
1084
1085       if (!fccSet && *fcc) {
1086         if ((i = query_quadoption (OPT_COPY,
1087                                    _("Save a copy of this message?"))) == -1)
1088           break;
1089         else if (i == M_NO)
1090           *fcc = 0;
1091       }
1092
1093       loop = 0;
1094       r = 0;
1095       break;
1096
1097     case OP_COMPOSE_EDIT_FILE:
1098       CHECK_COUNT;
1099       mutt_edit_file (NONULL (Editor), idx[menu->current]->content->filename);
1100       mutt_update_encoding (idx[menu->current]->content);
1101       menu->redraw = REDRAW_CURRENT | REDRAW_STATUS;
1102       mutt_message_hook (NULL, msg, M_SEND2HOOK);
1103       break;
1104
1105     case OP_COMPOSE_TOGGLE_UNLINK:
1106       CHECK_COUNT;
1107       idx[menu->current]->content->unlink =
1108         !idx[menu->current]->content->unlink;
1109
1110 #if 0
1111       /* OPTRESOLVE is otherwise ignored on this menu.
1112        * Where's the bug?
1113        */
1114
1115       if (option (OPTRESOLVE) && menu->current + 1 < menu->max)
1116         menu->current++;
1117 # endif
1118       menu->redraw = REDRAW_INDEX;
1119       /* No send2hook since this doesn't change the message. */
1120       break;
1121
1122     case OP_COMPOSE_GET_ATTACHMENT:
1123       CHECK_COUNT;
1124       if (menu->tagprefix) {
1125         BODY *top;
1126
1127         for (top = msg->content; top; top = top->next) {
1128           if (top->tagged)
1129             mutt_get_tmp_attachment (top);
1130         }
1131         menu->redraw = REDRAW_FULL;
1132       }
1133       else if (mutt_get_tmp_attachment (idx[menu->current]->content) == 0)
1134         menu->redraw = REDRAW_CURRENT;
1135
1136       /* No send2hook since this doesn't change the message. */
1137       break;
1138
1139     case OP_COMPOSE_RENAME_FILE:
1140       CHECK_COUNT;
1141       m_strcpy(fname, sizeof(fname), idx[menu->current]->content->filename);
1142       mutt_pretty_mailbox (fname);
1143       if (mutt_get_field (_("Rename to: "), fname, sizeof (fname), M_FILE)
1144           == 0 && fname[0]) {
1145         if (stat (idx[menu->current]->content->filename, &st) == -1) {
1146           mutt_error (_("Can't stat %s: %s"), fname, strerror (errno));
1147           break;
1148         }
1149
1150         mutt_expand_path (fname, sizeof (fname));
1151         if (mutt_rename_file (idx[menu->current]->content->filename, fname))
1152           break;
1153
1154         m_strreplace(&idx[menu->current]->content->filename, fname);
1155         menu->redraw = REDRAW_CURRENT;
1156
1157         if (idx[menu->current]->content->stamp >= st.st_mtime)
1158           mutt_stamp_attachment (idx[menu->current]->content);
1159
1160       }
1161       mutt_message_hook (NULL, msg, M_SEND2HOOK);
1162       break;
1163
1164     case OP_COMPOSE_NEW_MIME:
1165       {
1166         char type[STRING];
1167         char *p;
1168         int itype;
1169         FILE *fp;
1170
1171         CLEARLINE (LINES - 1);
1172         fname[0] = 0;
1173         if (mutt_get_field (_("New file: "), fname, sizeof (fname), M_FILE)
1174             != 0 || !fname[0])
1175           continue;
1176         mutt_expand_path (fname, sizeof (fname));
1177
1178         /* Call to lookup_mime_type () ?  maybe later */
1179         type[0] = 0;
1180         if (mutt_get_field ("Content-Type: ", type, sizeof (type), 0) != 0
1181             || !type[0])
1182           continue;
1183
1184         if (!(p = strchr (type, '/'))) {
1185           mutt_error _("Content-Type is of the form base/sub");
1186
1187           continue;
1188         }
1189         *p++ = 0;
1190         if ((itype = mutt_check_mime_type (type)) == TYPEOTHER) {
1191           mutt_error (_("Unknown Content-Type %s"), type);
1192           continue;
1193         }
1194         if (idxlen == idxmax) {
1195           p_realloc(&idx, idxmax += 5);
1196           menu->data = idx;
1197         }
1198
1199         idx[idxlen] = p_new(ATTACHPTR, 1);
1200         /* Touch the file */
1201         if (!(fp = safe_fopen (fname, "w"))) {
1202           mutt_error (_("Can't create file %s"), fname);
1203           p_delete(&idx[idxlen]);
1204           continue;
1205         }
1206         fclose (fp);
1207
1208         if ((idx[idxlen]->content = mutt_make_file_attach (fname)) == NULL) {
1209           mutt_error
1210             _("What we have here is a failure to make an attachment");
1211           continue;
1212         }
1213         update_idx (menu, idx, idxlen++);
1214
1215         idx[menu->current]->content->type = itype;
1216         m_strreplace(&idx[menu->current]->content->subtype, p);
1217         idx[menu->current]->content->unlink = 1;
1218         menu->redraw |= REDRAW_INDEX | REDRAW_STATUS;
1219
1220         if (mutt_compose_attachment (idx[menu->current]->content)) {
1221           mutt_update_encoding (idx[menu->current]->content);
1222           menu->redraw = REDRAW_FULL;
1223         }
1224       }
1225       mutt_message_hook (NULL, msg, M_SEND2HOOK);
1226       break;
1227
1228     case OP_COMPOSE_EDIT_MIME:
1229       CHECK_COUNT;
1230       if (mutt_edit_attachment (idx[menu->current]->content)) {
1231         mutt_update_encoding (idx[menu->current]->content);
1232         menu->redraw = REDRAW_FULL;
1233       }
1234       mutt_message_hook (NULL, msg, M_SEND2HOOK);
1235       break;
1236
1237     case OP_VIEW_ATTACH:
1238     case OP_DISPLAY_HEADERS:
1239       CHECK_COUNT;
1240       mutt_attach_display_loop (menu, op, NULL, NULL, NULL, &idx, &idxlen,
1241                                 NULL, 0);
1242       menu->redraw = REDRAW_FULL;
1243       /* no send2hook, since this doesn't modify the message */
1244       break;
1245
1246     case OP_SAVE:
1247       CHECK_COUNT;
1248       mutt_save_attachment_list (NULL, menu->tagprefix,
1249                                  menu->tagprefix ? msg->content : idx[menu->
1250                                                                       current]->
1251                                  content, NULL, menu);
1252       MAYBE_REDRAW (menu->redraw);
1253       /* no send2hook, since this doesn't modify the message */
1254       break;
1255
1256     case OP_PRINT:
1257       CHECK_COUNT;
1258       mutt_print_attachment_list (NULL, menu->tagprefix,
1259                                   menu->tagprefix ? msg->content : idx[menu->
1260                                                                        current]->
1261                                   content);
1262       /* no send2hook, since this doesn't modify the message */
1263       break;
1264
1265     case OP_PIPE:
1266     case OP_FILTER:
1267       CHECK_COUNT;
1268       mutt_pipe_attachment_list (NULL, menu->tagprefix,
1269                                  menu->tagprefix ? msg->content : idx[menu->
1270                                                                       current]->
1271                                  content, op == OP_FILTER);
1272       if (op == OP_FILTER)      /* cte might have changed */
1273         menu->redraw = menu->tagprefix ? REDRAW_FULL : REDRAW_CURRENT;
1274       menu->redraw |= REDRAW_STATUS;
1275       mutt_message_hook (NULL, msg, M_SEND2HOOK);
1276       break;
1277
1278     case OP_EXIT:
1279       if ((i =
1280            query_quadoption (OPT_POSTPONE,
1281                              _("Postpone this message?"))) == M_NO) {
1282         while (idxlen-- > 0) {
1283           /* avoid freeing other attachments */
1284           idx[idxlen]->content->next = NULL;
1285           idx[idxlen]->content->parts = NULL;
1286           if (idx[idxlen]->unowned)
1287             idx[idxlen]->content->unlink = 0;
1288           mutt_free_body (&idx[idxlen]->content);
1289           p_delete(&idx[idxlen]->tree);
1290           p_delete(&idx[idxlen]);
1291         }
1292         p_delete(&idx);
1293         idxlen = 0;
1294         idxmax = 0;
1295         r = -1;
1296         loop = 0;
1297         break;
1298       }
1299       else if (i == -1)
1300         break;                  /* abort */
1301
1302       /* fall through to postpone! */
1303
1304     case OP_COMPOSE_POSTPONE_MESSAGE:
1305
1306       if (check_attachments (idx, idxlen) != 0) {
1307         menu->redraw = REDRAW_FULL;
1308         break;
1309       }
1310
1311       loop = 0;
1312       r = 1;
1313       break;
1314
1315     case OP_COMPOSE_ISPELL:
1316       endwin ();
1317       snprintf (buf, sizeof (buf), "%s -x %s", NONULL (Ispell),
1318                 msg->content->filename);
1319       if (mutt_system (buf) == -1)
1320         mutt_error (_("Error running \"%s\"!"), buf);
1321       else {
1322         mutt_update_encoding (msg->content);
1323         menu->redraw |= REDRAW_STATUS;
1324       }
1325       break;
1326
1327     case OP_COMPOSE_WRITE_MESSAGE:
1328
1329       fname[0] = '\0';
1330       if (Context) {
1331         m_strcpy(fname, sizeof(fname), NONULL(Context->path));
1332         mutt_pretty_mailbox (fname);
1333       }
1334       if (idxlen)
1335         msg->content = idx[0]->content;
1336       if (mutt_enter_fname
1337           (_("Write message to mailbox"), fname, sizeof (fname),
1338            &menu->redraw, 1) != -1 && fname[0]) {
1339         mutt_message (_("Writing message to %s ..."), fname);
1340         mutt_expand_path (fname, sizeof (fname));
1341
1342         if (msg->content->next)
1343           msg->content = mutt_make_multipart (msg->content);
1344
1345         if (mutt_write_fcc (NONULL (fname), msg, NULL, 1, NULL) < 0)
1346           msg->content = mutt_remove_multipart (msg->content);
1347         else
1348           mutt_message _("Message written.");
1349       }
1350       break;
1351
1352
1353
1354     case OP_COMPOSE_PGP_MENU:
1355       if (!(WithCrypto & APPLICATION_PGP))
1356         break;
1357       if ((WithCrypto & APPLICATION_SMIME)
1358           && msg->security & APPLICATION_SMIME) {
1359         if (mutt_yesorno (_("S/MIME already selected. Clear & continue ? "),
1360                           M_YES) != M_YES) {
1361           mutt_clear_error ();
1362           break;
1363         }
1364         msg->security = 0;
1365       }
1366       msg->security = crypt_pgp_send_menu (msg, &menu->redraw);
1367       redraw_crypt_lines (msg);
1368       mutt_message_hook (NULL, msg, M_SEND2HOOK);
1369       break;
1370
1371
1372     case OP_FORGET_PASSPHRASE:
1373       crypt_forget_passphrase ();
1374       break;
1375
1376
1377     case OP_COMPOSE_SMIME_MENU:
1378       if (!(WithCrypto & APPLICATION_SMIME))
1379         break;
1380
1381       if ((WithCrypto & APPLICATION_PGP)
1382           && msg->security & APPLICATION_PGP) {
1383         if (mutt_yesorno (_("PGP already selected. Clear & continue ? "),
1384                           M_YES) != M_YES) {
1385           mutt_clear_error ();
1386           break;
1387         }
1388         msg->security = 0;
1389       }
1390       msg->security = crypt_smime_send_menu (msg, &menu->redraw);
1391       redraw_crypt_lines (msg);
1392       mutt_message_hook (NULL, msg, M_SEND2HOOK);
1393       break;
1394
1395
1396 #ifdef MIXMASTER
1397     case OP_COMPOSE_MIX:
1398
1399       mix_make_chain (&msg->chain, &menu->redraw);
1400       mutt_message_hook (NULL, msg, M_SEND2HOOK);
1401       break;
1402 #endif
1403
1404     }
1405
1406     /* Draw formated compose status line */
1407     if (menu->redraw & REDRAW_STATUS) {
1408       compose_status_line (buf, sizeof (buf), menu, NONULL (ComposeFormat));
1409       CLEARLINE (option (OPTSTATUSONTOP) ? 0 : LINES - 2);
1410       SETCOLOR (MT_COLOR_STATUS);
1411       move (option (OPTSTATUSONTOP) ? 0 : LINES - 2, SW);
1412       printw ("%-*.*s", COLS-SW, COLS-SW, buf);
1413       SETCOLOR (MT_COLOR_NORMAL);
1414       menu->redraw &= ~REDRAW_STATUS;
1415     }
1416   }
1417
1418   mutt_menuDestroy (&menu);
1419
1420   if (idxlen) {
1421     msg->content = idx[0]->content;
1422     for (i = 0; i < idxlen; i++) {
1423       idx[i]->content->aptr = NULL;
1424       p_delete(&idx[i]);
1425     }
1426   }
1427   else
1428     msg->content = NULL;
1429
1430   p_delete(&idx);
1431
1432   return (r);
1433 }