2 * Copyright notice from original mutt:
3 * Copyright (C) 1996-2000 Michael R. Elkins <me@mutt.org>
4 * Copyright (C) 2004 g10 Code GmbH
6 * Parts were written/modified by:
7 * Nico Golde <nico@ngolde.de>
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.
14 #include <lib-lib/lib-lib.h>
16 #include <lib-sys/unix.h>
17 #include <lib-mime/mime.h>
19 #include <lib-ui/lib-ui.h>
20 #include <lib-ui/enter.h>
21 #include <lib-ui/menu.h>
22 #include <lib-mx/mx.h>
27 #include "mutt_idna.h"
29 #include "recvattach.h"
40 mutt_error _("There are no attachments."); \
63 HDR_ATTACH = (HDR_FCC + 5) /* where to start printing the attachments */
65 HDR_ATTACH = (HDR_FCC + 7)
69 #define HDR_XOFFSET 14
70 #define TITLE_FMT "%14s" /* Used for Prompts, which are ASCII */
71 #define W (getmaxx(main_w) - HDR_XOFFSET)
73 static const char *Prompts[] = {
82 "", "", "", "Newsgroups: ", "Followup-To: ", "X-Comment-To: "
86 static void snd_entry (char *b, ssize_t blen, MUTTMENU * menu, int num) {
87 m_strformat(b, blen, getmaxx(main_w), AttachFormat, mutt_attach_fmt,
88 ((ATTACHPTR **)menu->data)[num], M_FORMAT_STAT_FILE);
91 static void redraw_crypt_lines (HEADER * msg)
96 mvwaddstr (main_w, HDR_CRYPT, 0, " Security: ");
97 else if (msg->security & APPLICATION_SMIME)
98 mvwaddstr (main_w, HDR_CRYPT, 0, " S/MIME: ");
99 else if (msg->security & APPLICATION_PGP)
100 mvwaddstr (main_w, HDR_CRYPT, 0, " PGP: ");
102 if ((msg->security & (ENCRYPT | SIGN)) == (ENCRYPT | SIGN))
103 waddstr (main_w, _("Sign, Encrypt"));
104 else if (msg->security & ENCRYPT)
105 waddstr (main_w, _("Encrypt"));
106 else if (msg->security & SIGN)
107 waddstr (main_w, _("Sign"));
109 waddstr (main_w, _("Clear"));
111 if ((msg->security & APPLICATION_PGP)
112 && (msg->security & (ENCRYPT | SIGN))) {
113 if ((msg->security & INLINE))
114 waddstr (main_w, _(" (inline)"));
116 waddstr (main_w, _(" (PGP/MIME)"));
120 wmove (main_w, HDR_CRYPTINFO, 0);
122 if (msg->security & APPLICATION_PGP && msg->security & SIGN)
123 wprintw (main_w, "%s%s", _(" sign as: "),
124 PgpSignAs ? PgpSignAs : _("<default>"));
126 if (msg->security & APPLICATION_SMIME && msg->security & SIGN) {
127 wprintw (main_w, "%s%s", _(" sign as: "),
128 SmimeDefaultKey ? SmimeDefaultKey : _("<default>"));
131 if ((msg->security & APPLICATION_SMIME)
132 && (msg->security & ENCRYPT)
133 && SmimeCryptAlg && *SmimeCryptAlg) {
134 mvwprintw (main_w, HDR_CRYPTINFO, 40, "%s%s", _("Encrypt with: "),
135 NONULL (SmimeCryptAlg));
140 static int check_attachments (ATTACHPTR ** idx, short idxlen)
144 char pretty[_POSIX_PATH_MAX], msg[_POSIX_PATH_MAX + STRING];
146 for (i = 0; i < idxlen; i++) {
147 m_strcpy(pretty, sizeof(pretty), idx[i]->content->filename);
148 if (stat (idx[i]->content->filename, &st) != 0) {
149 mutt_pretty_mailbox (pretty);
150 mutt_error (_("%s [#%d] no longer exists!"), pretty, i + 1);
154 if (idx[i]->content->stamp < st.st_mtime) {
155 mutt_pretty_mailbox (pretty);
156 snprintf (msg, sizeof (msg), _("%s [#%d] modified. Update encoding?"),
159 if ((r = mutt_yesorno (msg, M_YES)) == M_YES)
160 mutt_update_encoding (idx[i]->content);
169 static void draw_envelope_addr (int line, address_t * addr)
174 rfc822_addrcat(buf, sizeof (buf), addr, 1);
175 mvwprintw (main_w, line, 0, TITLE_FMT, Prompts[line - 1]);
176 mutt_paddstr (main_w, W, buf);
179 static void draw_envelope (HEADER * msg, char *fcc)
181 draw_envelope_addr (HDR_FROM, msg->env->from);
183 if (!option (OPTNEWSSEND)) {
185 draw_envelope_addr (HDR_TO, msg->env->to);
186 draw_envelope_addr (HDR_CC, msg->env->cc);
187 draw_envelope_addr (HDR_BCC, msg->env->bcc);
190 mvwprintw (main_w, HDR_TO, 0, TITLE_FMT, Prompts[HDR_NEWSGROUPS - 1]);
191 mutt_paddstr (main_w, W, NONULL (msg->env->newsgroups));
192 mvwprintw (main_w, HDR_CC, 0, TITLE_FMT, Prompts[HDR_FOLLOWUPTO - 1]);
193 mutt_paddstr (main_w, W, NONULL (msg->env->followup_to));
196 mvwprintw (main_w, HDR_SUBJECT, 0, TITLE_FMT, Prompts[HDR_SUBJECT - 1]);
197 mutt_paddstr (main_w, W, NONULL (msg->env->subject));
198 draw_envelope_addr (HDR_REPLYTO, msg->env->reply_to);
199 mvwprintw (main_w, HDR_FCC, 0, TITLE_FMT, Prompts[HDR_FCC - 1]);
200 mutt_paddstr (main_w, W, fcc);
202 redraw_crypt_lines (msg);
204 SETCOLOR(main_w, MT_COLOR_STATUS);
205 mvwaddstr (main_w, HDR_ATTACH - 1, 0, _("-- Attachments"));
206 BKGDSET(main_w, MT_COLOR_STATUS);
209 BKGDSET(main_w, MT_COLOR_NORMAL);
210 SETCOLOR(main_w, MT_COLOR_NORMAL);
213 static int edit_address_list (int line, address_t ** addr)
215 char buf[HUGE_STRING] = ""; /* needs to be large for alias expansion */
218 mutt_addrlist_to_local (*addr);
219 rfc822_addrcat(buf, sizeof (buf), *addr, 0);
220 if (mutt_get_field (Prompts[line - 1], buf, sizeof (buf), M_ALIAS) == 0) {
221 address_list_wipe(addr);
222 *addr = mutt_parse_adrlist (*addr, buf);
223 *addr = mutt_expand_aliases (*addr);
226 if (option (OPTNEEDREDRAW)) {
227 unset_option (OPTNEEDREDRAW);
231 if (mutt_addrlist_to_idna (*addr, &err) != 0) {
232 mutt_error (_("Warning: '%s' is a bad IDN."), err);
237 /* redraw the expanded list so the user can see the result */
239 rfc822_addrcat(buf, sizeof (buf), *addr, 1);
240 wmove (main_w, line, HDR_XOFFSET);
241 mutt_paddstr (main_w, W, buf);
246 static int delete_attachment (MUTTMENU * menu, short *idxlen, int x)
248 ATTACHPTR **idx = (ATTACHPTR **) menu->data;
251 menu->redraw = REDRAW_INDEX | REDRAW_STATUS;
253 if (x == 0 && menu->max == 1) {
254 mutt_error _("You may not delete the only attachment.");
256 idx[x]->content->tagged = 0;
260 for (y = 0; y < *idxlen; y++) {
261 if (idx[y]->content->next == idx[x]->content) {
262 idx[y]->content->next = idx[x]->content->next;
267 idx[x]->content->next = NULL;
268 idx[x]->content->parts = NULL;
269 body_list_wipe(&(idx[x]->content));
270 p_delete(&idx[x]->tree);
272 for (; x < *idxlen - 1; x++)
274 menu->max = --(*idxlen);
279 static void update_idx (MUTTMENU * menu, ATTACHPTR ** idx, short idxlen)
281 idx[idxlen]->level = (idxlen > 0) ? idx[idxlen - 1]->level : 0;
283 idx[idxlen - 1]->content->next = idx[idxlen]->content;
284 idx[idxlen]->content->aptr = idx[idxlen];
285 menu->current = idxlen++;
286 mutt_update_tree (idx, idxlen);
293 * cum_attachs_size: Cumulative Attachments Size
295 * Returns the total number of bytes used by the attachments in the
296 * attachment list _after_ content-transfer-encodings have been
300 static unsigned long cum_attachs_size(MUTTMENU * menu)
304 ATTACHPTR **idx = menu->data;
308 for (i = 0, s = 0; i < menu->max; i++) {
312 b->content = mutt_get_content_info (b->filename, b);
314 if ((info = b->content)) {
315 switch (b->encoding) {
316 case ENCQUOTEDPRINTABLE:
317 s += 3 * (info->lobin + info->hibin) + info->ascii + info->crlf;
320 s += (4 * (info->lobin + info->hibin + info->ascii + info->crlf)) / 3;
323 s += info->lobin + info->hibin + info->ascii + info->crlf;
333 * compose_format_str()
335 * %a = total number of attachments
336 * %h = hostname [option]
337 * %l = approx. length of current message (in bytes)
340 * This function is similar to status_format_str(). Look at that function for
341 * help when modifying this function.
343 static void compose_status_line (char *buf, ssize_t buflen, MUTTMENU * menu,
346 static const char *compose_format_str (char *buf, ssize_t buflen, char op,
347 const char *src, const char *prefix,
350 anytype data, format_flag flags)
352 char fmt[STRING], tmp[STRING];
353 int optional = (flags & M_FORMAT_OPTIONAL);
354 MUTTMENU *menu = data.ptr;
358 case 'a': /* total number of attachments */
359 snprintf (fmt, sizeof (fmt), "%%%sd", prefix);
360 snprintf (buf, buflen, fmt, menu->max);
363 case 'h': /* hostname */
364 snprintf (fmt, sizeof (fmt), "%%%ss", prefix);
365 snprintf (buf, buflen, fmt, NONULL(mod_core.shorthost));
368 case 'l': /* approx length of current message in bytes */
369 snprintf (fmt, sizeof (fmt), "%%%ss", prefix);
370 mutt_pretty_size (tmp, sizeof (tmp), menu ? cum_attachs_size (menu) : 0);
371 snprintf (buf, buflen, fmt, tmp);
375 m_strcpy(buf, buflen, mutt_make_version());
387 if (flags & M_FORMAT_OPTIONAL)
388 compose_status_line(buf, buflen, menu, optional ? ifstr : elstr);
393 static void compose_status_line (char *buf, ssize_t buflen, MUTTMENU * menu,
396 m_strformat(buf, buflen, getmaxx(main_w), p, compose_format_str, menu, 0);
401 * 1 message should be postponed
405 int mutt_compose_menu (HEADER * msg, /* structure for new message */
406 char *fcc, /* where to save a copy of the message */
408 HEADER * cur __attribute__ ((unused)))
409 { /* current message */
410 char buf[LONG_STRING];
411 char fname[_POSIX_PATH_MAX];
413 ATTACHPTR **idx = NULL;
417 int r = -1; /* return value */
420 int fccSet = 0; /* has the user edited the Fcc: field ? */
421 CONTEXT *ctx = NULL, *this = NULL;
423 /* Sort, SortAux could be changed in mutt_index_menu() */
424 int oldSort, oldSortAux;
428 int news = 0; /* is it a news article ? */
430 if (option (OPTNEWSSEND))
434 mutt_attach_init (msg->content);
435 idx = mutt_gen_attach_list (msg->content, -1, idx, &idxlen, &idxmax, 0, 1);
437 menu = mutt_new_menu ();
438 menu->menu = MENU_COMPOSE;
439 menu->offset = HDR_ATTACH;
441 menu->make_entry = snd_entry;
442 menu->tag = mutt_tag_attach;
445 if (option (OPTMBOXPANE))
449 unset_option (OPTNEWS); /* for any case */
451 switch (op = mutt_menuLoop (menu)) {
453 draw_envelope (msg, fcc);
454 menu->offset = HDR_ATTACH;
455 menu->pagelen = LINES - HDR_ATTACH - 2;
457 case OP_COMPOSE_EDIT_FROM:
458 menu->redraw = edit_address_list (HDR_FROM, &msg->env->from);
459 mutt_message_hook (NULL, msg, M_SEND2HOOK);
461 case OP_COMPOSE_EDIT_TO:
465 menu->redraw = edit_address_list (HDR_TO, &msg->env->to);
466 mutt_message_hook (NULL, msg, M_SEND2HOOK);
471 case OP_COMPOSE_EDIT_BCC:
475 menu->redraw = edit_address_list (HDR_BCC, &msg->env->bcc);
476 mutt_message_hook (NULL, msg, M_SEND2HOOK);
481 case OP_COMPOSE_EDIT_CC:
485 menu->redraw = edit_address_list (HDR_CC, &msg->env->cc);
486 mutt_message_hook (NULL, msg, M_SEND2HOOK);
492 case OP_COMPOSE_EDIT_NEWSGROUPS:
494 if (msg->env->newsgroups)
495 m_strcpy(buf, sizeof(buf), msg->env->newsgroups);
498 if (mutt_get_field ("Newsgroups: ", buf, sizeof (buf), 0) == 0
500 p_delete(&msg->env->newsgroups);
502 msg->env->newsgroups = m_strdup(skipspaces(buf));
503 wmove (main_w, HDR_TO, HDR_XOFFSET);
505 if (msg->env->newsgroups)
506 wprintw (main_w, "%-*.*s", W, W, msg->env->newsgroups);
511 case OP_COMPOSE_EDIT_FOLLOWUP_TO:
514 if (msg->env->followup_to)
515 m_strcpy(buf, sizeof(buf), msg->env->followup_to);
516 if (mutt_get_field ("Followup-To: ", buf, sizeof (buf), 0) == 0
518 p_delete(&msg->env->followup_to);
520 msg->env->followup_to = m_strdup(skipspaces(buf));
521 wmove (main_w, HDR_CC, HDR_XOFFSET);
523 if (msg->env->followup_to)
524 wprintw (main_w, "%-*.*s", W, W, msg->env->followup_to);
530 case OP_COMPOSE_EDIT_SUBJECT:
531 if (msg->env->subject)
532 m_strcpy(buf, sizeof(buf), msg->env->subject);
535 if (mutt_get_field ("Subject: ", buf, sizeof (buf), 0) == 0) {
536 m_strreplace(&msg->env->subject, buf);
537 wmove (main_w, HDR_SUBJECT, HDR_XOFFSET);
539 if (msg->env->subject)
540 mutt_paddstr (main_w, W, msg->env->subject);
542 mutt_message_hook (NULL, msg, M_SEND2HOOK);
544 case OP_COMPOSE_EDIT_REPLY_TO:
545 menu->redraw = edit_address_list (HDR_REPLYTO, &msg->env->reply_to);
546 mutt_message_hook (NULL, msg, M_SEND2HOOK);
548 case OP_COMPOSE_EDIT_FCC:
549 m_strcpy(buf, sizeof(buf), fcc);
550 if (mutt_get_field ("Fcc: ", buf, sizeof (buf), M_FILE | M_CLEAR) == 0) {
551 m_strcpy(fcc, _POSIX_PATH_MAX, buf);
552 mutt_pretty_mailbox (fcc);
553 wmove (main_w, HDR_FCC, HDR_XOFFSET);
554 mutt_paddstr (main_w, W, fcc);
557 MAYBE_REDRAW (menu->redraw);
558 mutt_message_hook (NULL, msg, M_SEND2HOOK);
560 case OP_COMPOSE_EDIT_MESSAGE:
561 if (!option (OPTEDITHDRS)) {
562 mutt_edit_file(msg->content->filename);
563 mutt_update_encoding (msg->content);
564 menu->redraw = REDRAW_CURRENT | REDRAW_STATUS;
565 mutt_message_hook (NULL, msg, M_SEND2HOOK);
569 case OP_COMPOSE_EDIT_HEADERS:
570 if ((op == OP_COMPOSE_EDIT_HEADERS ||
571 (op == OP_COMPOSE_EDIT_MESSAGE && option (OPTEDITHDRS)))) {
572 const char *tag = NULL;
575 mutt_env_to_local (msg->env);
576 mutt_edit_headers(msg->content->filename, msg, fcc, fcclen);
577 if (mutt_env_to_idna (msg->env, &tag, &err)) {
578 mutt_error (_("Bad IDN in \"%s\": '%s'"), tag, err);
582 mutt_update_encoding (msg->content);
584 /* attachments may have been added */
585 if (idxlen && idx[idxlen - 1]->content->next) {
586 for (i = 0; i < idxlen; i++)
590 mutt_gen_attach_list (msg->content, -1, idx, &idxlen, &idxmax, 0,
596 menu->redraw = REDRAW_FULL;
597 mutt_message_hook (NULL, msg, M_SEND2HOOK);
600 case OP_COMPOSE_ATTACH_FILE:
607 prompt = _("Attach file");
611 if (_mutt_enter_fname
612 (prompt, fname, sizeof (fname), &menu->redraw, 0, 1, &files,
613 &numfiles) == -1 || *fname == '\0')
616 if (idxlen + numfiles >= idxmax) {
617 p_realloc(&idx, idxmax += 5 + numfiles);
623 mutt_message _("Attaching selected files...");
625 for (i = 0; i < numfiles; i++) {
626 char *att = files[i];
628 idx[idxlen] = p_new(ATTACHPTR, 1);
629 idx[idxlen]->unowned = 1;
630 idx[idxlen]->content = mutt_make_file_attach (att);
631 if (idx[idxlen]->content != NULL)
632 update_idx (menu, idx, idxlen++);
635 mutt_error (_("Unable to attach %s!"), att);
636 p_delete(&idx[idxlen]);
644 menu->redraw |= REDRAW_INDEX | REDRAW_STATUS;
646 mutt_message_hook (NULL, msg, M_SEND2HOOK);
649 case OP_COMPOSE_ATTACH_MESSAGE:
651 case OP_COMPOSE_ATTACH_NEWS_MESSAGE:
658 prompt = _("Open mailbox to attach message from");
661 unset_option (OPTNEWS);
662 if (op == OP_COMPOSE_ATTACH_NEWS_MESSAGE) {
663 if (!(CurrentNewsSrv = mutt_select_newsserver (NewsServer)))
666 prompt = _("Open newsgroup to attach message from");
667 set_option (OPTNEWS);
673 if ((op == OP_COMPOSE_ATTACH_MESSAGE) ^ (Context->magic == M_NNTP))
676 m_strcpy(fname, sizeof(fname), NONULL(Context->path));
677 mutt_pretty_mailbox (fname);
680 if (mutt_enter_fname (prompt, fname, sizeof (fname), &menu->redraw, 1)
685 if (option (OPTNEWS))
686 nntp_expand_path (fname, sizeof (fname),
687 &CurrentNewsSrv->conn->account);
690 mutt_expand_path (fname, sizeof (fname));
691 if (mx_get_magic (fname) != M_IMAP)
692 if (mx_get_magic (fname) != M_POP)
694 if (mx_get_magic (fname) != M_NNTP && !option (OPTNEWS))
696 /* check to make sure the file exists and is readable */
697 if (access (fname, R_OK) == -1) {
702 menu->redraw = REDRAW_FULL;
704 ctx = mx_open_mailbox (fname, M_READONLY, NULL);
710 if (!ctx->msgcount) {
711 mx_close_mailbox (ctx, NULL);
713 mutt_error _("No messages in that folder.");
718 this = Context; /* remember current folder and sort methods */
720 oldSortAux = SortAux;
723 set_option (OPTATTACHMSG);
724 mutt_message _("Tag the messages you want to attach!");
726 closed = mutt_index_menu ();
727 unset_option (OPTATTACHMSG);
730 /* go back to the folder we started from */
732 /* Restore old $sort and $sort_aux */
734 SortAux = oldSortAux;
735 menu->redraw |= REDRAW_INDEX | REDRAW_STATUS;
739 if (idxlen + Context->tagged >= idxmax) {
740 p_realloc(&idx, idxmax += 5 + Context->tagged);
744 for (i = 0; i < Context->msgcount; i++) {
745 h = Context->hdrs[i];
747 idx[idxlen] = p_new(ATTACHPTR, 1);
748 idx[idxlen]->content = mutt_make_message_attach (Context, h, 1);
749 if (idx[idxlen]->content != NULL)
750 update_idx (menu, idx, idxlen++);
752 mutt_error _("Unable to attach!");
754 p_delete(&idx[idxlen]);
758 menu->redraw |= REDRAW_FULL;
760 if (closed == OP_QUIT)
761 mx_close_mailbox (Context, NULL);
763 mx_fastclose_mailbox (Context);
766 /* go back to the folder we started from */
768 /* Restore old $sort and $sort_aux */
770 SortAux = oldSortAux;
772 mutt_message_hook (NULL, msg, M_SEND2HOOK);
777 if (idx[menu->current]->unowned)
778 idx[menu->current]->content->unlink = 0;
779 if (delete_attachment (menu, &idxlen, menu->current) == -1)
781 mutt_update_tree (idx, idxlen);
783 if (menu->current > idxlen - 1)
784 menu->current = idxlen - 1;
789 if (menu->current == 0)
790 msg->content = idx[0]->content;
792 menu->redraw |= REDRAW_STATUS;
793 mutt_message_hook (NULL, msg, M_SEND2HOOK);
796 #define CURRENT idx[menu->current]->content
798 case OP_COMPOSE_TOGGLE_RECODE:
801 if (!mutt_is_text_part (CURRENT)) {
802 mutt_error (_("Recoding only affects text attachments."));
805 CURRENT->noconv = !CURRENT->noconv;
807 mutt_message (_("The current attachment won't be converted."));
809 mutt_message (_("The current attachment will be converted."));
810 menu->redraw = REDRAW_CURRENT;
811 mutt_message_hook (NULL, msg, M_SEND2HOOK);
816 case OP_COMPOSE_EDIT_DESCRIPTION:
818 m_strcpy(buf, sizeof(buf),
819 NONULL(idx[menu->current]->content->description));
820 /* header names should not be translated */
821 if (mutt_get_field ("Description: ", buf, sizeof (buf), 0) == 0) {
822 m_strreplace(&idx[menu->current]->content->description, buf);
823 menu->redraw = REDRAW_CURRENT;
825 mutt_message_hook (NULL, msg, M_SEND2HOOK);
828 case OP_COMPOSE_UPDATE_ENCODING:
830 if (menu->tagprefix) {
833 for (top = msg->content; top; top = top->next) {
835 mutt_update_encoding (top);
837 menu->redraw = REDRAW_FULL;
840 mutt_update_encoding (idx[menu->current]->content);
841 menu->redraw = REDRAW_CURRENT | REDRAW_STATUS;
843 mutt_message_hook (NULL, msg, M_SEND2HOOK);
846 case OP_COMPOSE_TOGGLE_DISPOSITION:
847 /* toggle the content-disposition between inline/attachment */
848 idx[menu->current]->content->disposition =
849 (idx[menu->current]->content->disposition ==
850 DISPINLINE) ? DISPATTACH : DISPINLINE;
851 menu->redraw = REDRAW_CURRENT;
857 mutt_edit_content_type (NULL, idx[menu->current]->content, NULL);
859 /* this may have been a change to text/something */
860 mutt_update_encoding (idx[menu->current]->content);
862 menu->redraw = REDRAW_CURRENT;
864 mutt_message_hook (NULL, msg, M_SEND2HOOK);
867 case OP_COMPOSE_EDIT_ENCODING:
869 m_strcpy(buf, sizeof(buf),
870 ENCODING(idx[menu->current]->content->encoding));
871 if (mutt_get_field ("Content-Transfer-Encoding: ", buf,
872 sizeof (buf), 0) == 0 && buf[0]) {
873 if ((i = mutt_check_encoding (buf)) != ENCOTHER && i != ENCUUENCODED) {
874 idx[menu->current]->content->encoding = i;
875 menu->redraw = REDRAW_CURRENT | REDRAW_STATUS;
879 mutt_error _("Invalid encoding.");
881 mutt_message_hook (NULL, msg, M_SEND2HOOK);
884 case OP_COMPOSE_SEND_MESSAGE:
886 /* Note: We don't invoke send2-hook here, since we want to leave
887 * users an opportunity to change settings from the ":" prompt.
890 if (check_attachments (idx, idxlen) != 0) {
891 menu->redraw = REDRAW_FULL;
895 if (!fccSet && *fcc) {
896 if ((i = query_quadoption (OPT_COPY,
897 _("Save a copy of this message?"))) == -1)
907 case OP_COMPOSE_EDIT_FILE:
909 mutt_edit_file(idx[menu->current]->content->filename);
910 mutt_update_encoding (idx[menu->current]->content);
911 menu->redraw = REDRAW_CURRENT | REDRAW_STATUS;
912 mutt_message_hook (NULL, msg, M_SEND2HOOK);
915 case OP_COMPOSE_TOGGLE_UNLINK:
917 idx[menu->current]->content->unlink =
918 !idx[menu->current]->content->unlink;
920 menu->redraw = REDRAW_INDEX;
921 /* No send2hook since this doesn't change the message. */
924 case OP_COMPOSE_GET_ATTACHMENT:
926 if (menu->tagprefix) {
929 for (top = msg->content; top; top = top->next) {
931 mutt_get_tmp_attachment (top);
933 menu->redraw = REDRAW_FULL;
935 else if (mutt_get_tmp_attachment (idx[menu->current]->content) == 0)
936 menu->redraw = REDRAW_CURRENT;
938 /* No send2hook since this doesn't change the message. */
941 case OP_COMPOSE_RENAME_FILE:
943 m_strcpy(fname, sizeof(fname), idx[menu->current]->content->filename);
944 mutt_pretty_mailbox (fname);
945 if (mutt_get_field (_("Rename to: "), fname, sizeof (fname), M_FILE)
947 if (stat (idx[menu->current]->content->filename, &st) == -1) {
948 mutt_error (_("Can't stat %s: %s"), fname, strerror (errno));
952 mutt_expand_path (fname, sizeof (fname));
953 if (mutt_rename_file (idx[menu->current]->content->filename, fname))
956 m_strreplace(&idx[menu->current]->content->filename, fname);
957 menu->redraw = REDRAW_CURRENT;
959 if (idx[menu->current]->content->stamp >= st.st_mtime)
960 mutt_stamp_attachment (idx[menu->current]->content);
963 mutt_message_hook (NULL, msg, M_SEND2HOOK);
966 case OP_COMPOSE_NEW_MIME:
973 CLEARLINE(main_w, LINES - 1);
975 if (mutt_get_field (_("New file: "), fname, sizeof (fname), M_FILE)
978 mutt_expand_path (fname, sizeof (fname));
980 /* Call to lookup_mime_type () ? maybe later */
982 if (mutt_get_field ("Content-Type: ", type, sizeof (type), 0) != 0
986 if (!(p = strchr (type, '/'))) {
987 mutt_error _("Content-Type is of the form base/sub");
992 if ((itype = mutt_check_mime_type (type)) == TYPEOTHER) {
993 mutt_error (_("Unknown Content-Type %s"), type);
996 if (idxlen == idxmax) {
997 p_realloc(&idx, idxmax += 5);
1001 idx[idxlen] = p_new(ATTACHPTR, 1);
1002 /* Touch the file */
1003 if (!(fp = safe_fopen (fname, "w"))) {
1004 mutt_error (_("Can't create file %s"), fname);
1005 p_delete(&idx[idxlen]);
1010 if ((idx[idxlen]->content = mutt_make_file_attach (fname)) == NULL) {
1012 _("What we have here is a failure to make an attachment");
1015 update_idx (menu, idx, idxlen++);
1017 idx[menu->current]->content->type = itype;
1018 m_strreplace(&idx[menu->current]->content->subtype, p);
1019 idx[menu->current]->content->unlink = 1;
1020 menu->redraw |= REDRAW_INDEX | REDRAW_STATUS;
1022 if (mutt_compose_attachment (idx[menu->current]->content)) {
1023 mutt_update_encoding (idx[menu->current]->content);
1024 menu->redraw = REDRAW_FULL;
1027 mutt_message_hook (NULL, msg, M_SEND2HOOK);
1030 case OP_COMPOSE_EDIT_MIME:
1032 if (mutt_edit_attachment (idx[menu->current]->content)) {
1033 mutt_update_encoding (idx[menu->current]->content);
1034 menu->redraw = REDRAW_FULL;
1036 mutt_message_hook (NULL, msg, M_SEND2HOOK);
1039 case OP_VIEW_ATTACH:
1040 case OP_DISPLAY_HEADERS:
1042 mutt_attach_display_loop (menu, op, NULL, NULL, NULL, &idx, &idxlen,
1044 menu->redraw = REDRAW_FULL;
1045 /* no send2hook, since this doesn't modify the message */
1050 mutt_save_attachment_list (NULL, menu->tagprefix,
1051 menu->tagprefix ? msg->content : idx[menu->
1053 content, NULL, menu);
1054 MAYBE_REDRAW (menu->redraw);
1055 /* no send2hook, since this doesn't modify the message */
1060 mutt_print_attachment_list (NULL, menu->tagprefix,
1061 menu->tagprefix ? msg->content : idx[menu->
1064 /* no send2hook, since this doesn't modify the message */
1070 mutt_pipe_attachment_list (NULL, menu->tagprefix,
1071 menu->tagprefix ? msg->content : idx[menu->
1073 content, op == OP_FILTER);
1074 if (op == OP_FILTER) /* cte might have changed */
1075 menu->redraw = menu->tagprefix ? REDRAW_FULL : REDRAW_CURRENT;
1076 menu->redraw |= REDRAW_STATUS;
1077 mutt_message_hook (NULL, msg, M_SEND2HOOK);
1082 query_quadoption (OPT_POSTPONE,
1083 _("Postpone this message?"))) == M_NO) {
1084 while (idxlen-- > 0) {
1085 /* avoid freeing other attachments */
1086 idx[idxlen]->content->next = NULL;
1087 idx[idxlen]->content->parts = NULL;
1088 if (idx[idxlen]->unowned)
1089 idx[idxlen]->content->unlink = 0;
1090 body_list_wipe(&idx[idxlen]->content);
1091 p_delete(&idx[idxlen]->tree);
1092 p_delete(&idx[idxlen]);
1104 /* fall through to postpone! */
1106 case OP_COMPOSE_POSTPONE_MESSAGE:
1108 if (check_attachments (idx, idxlen) != 0) {
1109 menu->redraw = REDRAW_FULL;
1117 case OP_COMPOSE_WRITE_MESSAGE:
1120 m_strcpy(fname, sizeof(fname), NONULL(Context->path));
1121 mutt_pretty_mailbox (fname);
1124 msg->content = idx[0]->content;
1125 if (mutt_enter_fname
1126 (_("Write message to mailbox"), fname, sizeof (fname),
1127 &menu->redraw, 1) != -1 && fname[0]) {
1128 mutt_message (_("Writing message to %s ..."), fname);
1129 mutt_expand_path (fname, sizeof (fname));
1131 if (msg->content->next)
1132 msg->content = mutt_make_multipart (msg->content);
1134 if (mutt_write_fcc (NONULL (fname), msg, NULL, 1, NULL) < 0)
1135 msg->content = mutt_remove_multipart (msg->content);
1137 mutt_message _("Message written.");
1141 case OP_COMPOSE_PGP_MENU:
1142 if (msg->security & APPLICATION_SMIME) {
1143 if (mutt_yesorno (_("S/MIME already selected. Clear & continue ? "),
1145 mutt_clear_error ();
1150 msg->security = crypt_send_menu (msg, &menu->redraw, 0);
1151 redraw_crypt_lines (msg);
1152 mutt_message_hook (NULL, msg, M_SEND2HOOK);
1155 case OP_COMPOSE_SMIME_MENU:
1156 if (msg->security & APPLICATION_PGP) {
1157 if (mutt_yesorno (_("PGP already selected. Clear & continue ? "),
1159 mutt_clear_error ();
1164 msg->security = crypt_send_menu(msg, &menu->redraw, 1);
1165 redraw_crypt_lines (msg);
1166 mutt_message_hook (NULL, msg, M_SEND2HOOK);
1170 /* Draw formated compose status line */
1171 if (menu->redraw & REDRAW_STATUS) {
1172 compose_status_line (buf, sizeof (buf), menu, NONULL (ComposeFormat));
1173 CLEARLINE(main_w, option (OPTSTATUSONTOP) ? 0 : LINES - 2);
1174 SETCOLOR(main_w, MT_COLOR_STATUS);
1175 wmove (main_w, option (OPTSTATUSONTOP) ? 0 : LINES - 2, 0);
1176 wprintw (main_w, "%-*.*s", getmaxx(main_w), getmaxx(main_w), buf);
1177 SETCOLOR(main_w, MT_COLOR_NORMAL);
1178 menu->redraw &= ~REDRAW_STATUS;
1182 mutt_menuDestroy (&menu);
1185 msg->content = idx[0]->content;
1186 for (i = 0; i < idxlen; i++) {
1187 idx[i]->content->aptr = NULL;
1191 msg->content = NULL;