2 * Copyright (C) 1996-2000 Michael R. Elkins <me@mutt.org>
3 * Copyright (C) 2004 g10 Code GmbH
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.
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.
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, USA.
25 #include "mutt_curses.h"
26 #include "mutt_idna.h"
27 #include "mutt_menu.h"
52 static const char *There_are_no_attachments = N_("There are no attachments.");
54 #define CHECK_COUNT if (idxlen == 0) { mutt_error _(There_are_no_attachments); break; }
81 HDR_ATTACH = (HDR_FCC + 5) /* where to start printing the attachments */
83 HDR_ATTACH = (HDR_FCC + 7)
87 #define HDR_XOFFSET 14
88 #define TITLE_FMT "%14s" /* Used for Prompts, which are ASCII */
89 #define W (COLS - HDR_XOFFSET - SidebarWidth)
91 static char *Prompts[] = {
103 , "", "", "Newsgroups: ", "Followup-To: ", "X-Comment-To: "
107 static struct mapping_t ComposeHelp[] = {
108 {N_("Send"), OP_COMPOSE_SEND_MESSAGE},
109 {N_("Abort"), OP_EXIT},
110 {"To", OP_COMPOSE_EDIT_TO},
111 {"CC", OP_COMPOSE_EDIT_CC},
112 {"Subj", OP_COMPOSE_EDIT_SUBJECT},
113 {N_("Attach file"), OP_COMPOSE_ATTACH_FILE},
114 {N_("Descrip"), OP_COMPOSE_EDIT_DESCRIPTION},
115 {N_("Help"), OP_HELP},
120 static struct mapping_t ComposeNewsHelp[] = {
121 {N_("Send"), OP_COMPOSE_SEND_MESSAGE},
122 {N_("Abort"), OP_EXIT},
123 {"Newsgroups", OP_COMPOSE_EDIT_NEWSGROUPS},
124 {"Subj", OP_COMPOSE_EDIT_SUBJECT},
125 {N_("Attach file"), OP_COMPOSE_ATTACH_FILE},
126 {N_("Descrip"), OP_COMPOSE_EDIT_DESCRIPTION},
127 {N_("Help"), OP_HELP},
132 static void snd_entry (char *b, size_t blen, MUTTMENU * menu, int num)
134 mutt_FormatString (b, blen, NONULL (AttachFormat), mutt_attach_fmt,
135 (unsigned long) (((ATTACHPTR **) menu->data)[num]),
136 M_FORMAT_STAT_FILE | M_FORMAT_ARROWCURSOR);
141 #include "mutt_crypt.h"
143 static void redraw_crypt_lines (HEADER * msg)
147 if ((WithCrypto & APPLICATION_PGP) && (WithCrypto & APPLICATION_SMIME)) {
149 mvaddstr (HDR_CRYPT, SidebarWidth, " Security: ");
150 else if (msg->security & APPLICATION_SMIME)
151 mvaddstr (HDR_CRYPT, SidebarWidth, " S/MIME: ");
152 else if (msg->security & APPLICATION_PGP)
153 mvaddstr (HDR_CRYPT, SidebarWidth, " PGP: ");
155 else if ((WithCrypto & APPLICATION_SMIME))
156 mvaddstr (HDR_CRYPT, SidebarWidth, " S/MIME: ");
157 else if ((WithCrypto & APPLICATION_PGP))
158 mvaddstr (HDR_CRYPT, SidebarWidth, " PGP: ");
162 if ((msg->security & (ENCRYPT | SIGN)) == (ENCRYPT | SIGN))
163 addstr (_("Sign, Encrypt"));
164 else if (msg->security & ENCRYPT)
165 addstr (_("Encrypt"));
166 else if (msg->security & SIGN)
171 if ((WithCrypto & APPLICATION_PGP))
172 if ((msg->security & APPLICATION_PGP)
173 && (msg->security & (ENCRYPT | SIGN))) {
174 if ((msg->security & INLINE))
175 addstr (_(" (inline)"));
177 addstr (_(" (PGP/MIME)"));
181 move (HDR_CRYPTINFO, SidebarWidth);
183 if ((WithCrypto & APPLICATION_PGP)
184 && msg->security & APPLICATION_PGP && msg->security & SIGN)
185 printw ("%s%s", _(" sign as: "),
186 PgpSignAs ? PgpSignAs : _("<default>"));
188 if ((WithCrypto & APPLICATION_SMIME)
189 && msg->security & APPLICATION_SMIME && msg->security & SIGN) {
190 printw ("%s%s", _(" sign as: "),
191 SmimeDefaultKey ? SmimeDefaultKey : _("<default>"));
194 if ((WithCrypto & APPLICATION_SMIME)
195 && (msg->security & APPLICATION_SMIME)
196 && (msg->security & ENCRYPT)
197 && SmimeCryptAlg && *SmimeCryptAlg) {
198 mvprintw (HDR_CRYPTINFO, SidebarWidth + 40, "%s%s", _("Encrypt with: "),
199 NONULL (SmimeCryptAlg));
207 static void redraw_mix_line (LIST * chain)
212 mvaddstr (HDR_MIX, SidebarWidth, " Mix: ");
215 addstr ("<no chain defined>");
220 for (c = 12; chain; chain = chain->next) {
222 if (t && t[0] == '0' && t[1] == '\0')
225 if (c + mutt_strlen (t) + 2 >= COLS - SidebarWidth)
232 c += mutt_strlen (t) + 2;
235 #endif /* MIXMASTER */
237 static int check_attachments (ATTACHPTR ** idx, short idxlen)
241 char pretty[_POSIX_PATH_MAX], msg[_POSIX_PATH_MAX + SHORT_STRING];
243 for (i = 0; i < idxlen; i++) {
244 strfcpy (pretty, idx[i]->content->filename, sizeof (pretty));
245 if (stat (idx[i]->content->filename, &st) != 0) {
246 mutt_pretty_mailbox (pretty);
247 mutt_error (_("%s [#%d] no longer exists!"), pretty, i + 1);
251 if (idx[i]->content->stamp < st.st_mtime) {
252 mutt_pretty_mailbox (pretty);
253 snprintf (msg, sizeof (msg), _("%s [#%d] modified. Update encoding?"),
256 if ((r = mutt_yesorno (msg, M_YES)) == M_YES)
257 mutt_update_encoding (idx[i]->content);
266 static void draw_envelope_addr (int line, ADDRESS * addr)
271 rfc822_write_address (buf, sizeof (buf), addr, 1);
272 mvprintw (line, SidebarWidth, TITLE_FMT, Prompts[line - 1]);
273 mutt_paddstr (W, buf);
276 static void draw_envelope (HEADER * msg, char *fcc)
278 draw_envelope_addr (HDR_FROM, msg->env->from);
280 if (!option (OPTNEWSSEND)) {
282 draw_envelope_addr (HDR_TO, msg->env->to);
283 draw_envelope_addr (HDR_CC, msg->env->cc);
284 draw_envelope_addr (HDR_BCC, msg->env->bcc);
288 mvprintw (HDR_TO, SidebarWidth, TITLE_FMT, Prompts[HDR_NEWSGROUPS - 1]);
289 mutt_paddstr (W, NONULL (msg->env->newsgroups));
290 mvprintw (HDR_CC, SidebarWidth, TITLE_FMT, Prompts[HDR_FOLLOWUPTO - 1]);
291 mutt_paddstr (W, NONULL (msg->env->followup_to));
292 if (option (OPTXCOMMENTTO)) {
293 mvprintw (HDR_BCC, 0, TITLE_FMT, Prompts[HDR_XCOMMENTTO - 1]);
294 mutt_paddstr (W, NONULL (msg->env->x_comment_to));
298 mvprintw (HDR_SUBJECT, SidebarWidth, TITLE_FMT, Prompts[HDR_SUBJECT - 1]);
299 mutt_paddstr (W, NONULL (msg->env->subject));
300 draw_envelope_addr (HDR_REPLYTO, msg->env->reply_to);
301 mvprintw (HDR_FCC, SidebarWidth, TITLE_FMT, Prompts[HDR_FCC - 1]);
302 mutt_paddstr (W, fcc);
305 redraw_crypt_lines (msg);
308 redraw_mix_line (msg->chain);
311 SETCOLOR (MT_COLOR_STATUS);
312 mvaddstr (HDR_ATTACH - 1, SidebarWidth, _("-- Attachments"));
313 BKGDSET (MT_COLOR_STATUS);
316 BKGDSET (MT_COLOR_NORMAL);
317 SETCOLOR (MT_COLOR_NORMAL);
320 static int edit_address_list (int line, ADDRESS ** addr)
322 char buf[HUGE_STRING] = ""; /* needs to be large for alias expansion */
325 mutt_addrlist_to_local (*addr);
326 rfc822_write_address (buf, sizeof (buf), *addr, 0);
327 if (mutt_get_field (Prompts[line - 1], buf, sizeof (buf), M_ALIAS) == 0) {
328 rfc822_free_address (addr);
329 *addr = mutt_parse_adrlist (*addr, buf);
330 *addr = mutt_expand_aliases (*addr);
333 if (option (OPTNEEDREDRAW)) {
334 unset_option (OPTNEEDREDRAW);
335 return (REDRAW_FULL);
338 if (mutt_addrlist_to_idna (*addr, &err) != 0) {
339 mutt_error (_("Warning: '%s' is a bad IDN."), err);
344 /* redraw the expanded list so the user can see the result */
346 rfc822_write_address (buf, sizeof (buf), *addr, 1);
347 move (line, HDR_XOFFSET + SidebarWidth);
348 mutt_paddstr (W, buf);
353 static int delete_attachment (MUTTMENU * menu, short *idxlen, int x)
355 ATTACHPTR **idx = (ATTACHPTR **) menu->data;
358 menu->redraw = REDRAW_INDEX | REDRAW_STATUS;
360 if (x == 0 && menu->max == 1) {
361 mutt_error _("You may not delete the only attachment.");
363 idx[x]->content->tagged = 0;
367 for (y = 0; y < *idxlen; y++) {
368 if (idx[y]->content->next == idx[x]->content) {
369 idx[y]->content->next = idx[x]->content->next;
374 idx[x]->content->next = NULL;
375 idx[x]->content->parts = NULL;
376 mutt_free_body (&(idx[x]->content));
377 FREE (&idx[x]->tree);
379 for (; x < *idxlen - 1; x++)
381 menu->max = --(*idxlen);
386 static void update_idx (MUTTMENU * menu, ATTACHPTR ** idx, short idxlen)
388 idx[idxlen]->level = (idxlen > 0) ? idx[idxlen - 1]->level : 0;
390 idx[idxlen - 1]->content->next = idx[idxlen]->content;
391 idx[idxlen]->content->aptr = idx[idxlen];
392 menu->current = idxlen++;
393 mutt_update_tree (idx, idxlen);
400 * cum_attachs_size: Cumulative Attachments Size
402 * Returns the total number of bytes used by the attachments in the
403 * attachment list _after_ content-transfer-encodings have been
408 static unsigned long cum_attachs_size (MUTTMENU * menu)
412 ATTACHPTR **idx = menu->data;
416 for (i = 0, s = 0; i < menu->max; i++) {
420 b->content = mutt_get_content_info (b->filename, b);
422 if ((info = b->content)) {
423 switch (b->encoding) {
424 case ENCQUOTEDPRINTABLE:
425 s += 3 * (info->lobin + info->hibin) + info->ascii + info->crlf;
428 s += (4 * (info->lobin + info->hibin + info->ascii + info->crlf)) / 3;
431 s += info->lobin + info->hibin + info->ascii + info->crlf;
440 /* prototype for use below */
441 static void compose_status_line (char *buf, size_t buflen, MUTTMENU * menu,
445 * compose_format_str()
447 * %a = total number of attachments
448 * %h = hostname [option]
449 * %l = approx. length of current message (in bytes)
452 * This function is similar to status_format_str(). Look at that function for
453 * help when modifying this function.
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)
462 char fmt[SHORT_STRING], tmp[SHORT_STRING];
463 int optional = (flags & M_FORMAT_OPTIONAL);
464 MUTTMENU *menu = (MUTTMENU *) data;
468 case 'a': /* total number of attachments */
469 snprintf (fmt, sizeof (fmt), "%%%sd", prefix);
470 snprintf (buf, buflen, fmt, menu->max);
473 case 'h': /* hostname */
474 snprintf (fmt, sizeof (fmt), "%%%ss", prefix);
475 snprintf (buf, buflen, fmt, NONULL (Hostname));
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);
485 snprintf (fmt, sizeof (fmt), "Mutt-ng %%s");
486 snprintf (buf, buflen, fmt, MUTT_VERSION);
494 snprintf (buf, buflen, "%%%s%c", prefix, op);
499 compose_status_line (buf, buflen, menu, ifstring);
500 else if (flags & M_FORMAT_OPTIONAL)
501 compose_status_line (buf, buflen, menu, elsestring);
506 static void compose_status_line (char *buf, size_t buflen, MUTTMENU * menu,
509 mutt_FormatString (buf, buflen, p, compose_format_str,
510 (unsigned long) menu, 0);
516 * 1 message should be postponed
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];
528 ATTACHPTR **idx = NULL;
532 int r = -1; /* return value */
535 int fccSet = 0; /* has the user edited the Fcc: field ? */
536 CONTEXT *ctx = NULL, *this = NULL;
538 /* Sort, SortAux could be changed in mutt_index_menu() */
539 int oldSort, oldSortAux;
543 int news = 0; /* is it a news article ? */
545 if (option (OPTNEWSSEND))
549 mutt_attach_init (msg->content);
550 idx = mutt_gen_attach_list (msg->content, -1, idx, &idxlen, &idxmax, 0, 1);
552 menu = mutt_new_menu ();
553 menu->menu = MENU_COMPOSE;
554 menu->offset = HDR_ATTACH;
556 menu->make_entry = snd_entry;
557 menu->tag = mutt_tag_attach;
562 mutt_compile_help (helpstr, sizeof (helpstr), MENU_COMPOSE,
567 mutt_compile_help (helpstr, sizeof (helpstr), MENU_COMPOSE,
570 if (option (OPTMBOXPANE))
571 mutt_buffy_check (1);
574 unset_option (OPTNEWS); /* for any case */
576 switch (op = mutt_menuLoop (menu)) {
578 draw_envelope (msg, fcc);
579 menu->offset = HDR_ATTACH;
580 menu->pagelen = LINES - HDR_ATTACH - 2;
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);
586 case OP_COMPOSE_EDIT_TO:
590 menu->redraw = edit_address_list (HDR_TO, &msg->env->to);
591 mutt_message_hook (NULL, msg, M_SEND2HOOK);
596 case OP_COMPOSE_EDIT_BCC:
600 menu->redraw = edit_address_list (HDR_BCC, &msg->env->bcc);
601 mutt_message_hook (NULL, msg, M_SEND2HOOK);
606 case OP_COMPOSE_EDIT_CC:
610 menu->redraw = edit_address_list (HDR_CC, &msg->env->cc);
611 mutt_message_hook (NULL, msg, M_SEND2HOOK);
617 case OP_COMPOSE_EDIT_NEWSGROUPS:
619 if (msg->env->newsgroups)
620 strfcpy (buf, msg->env->newsgroups, sizeof (buf));
623 if (mutt_get_field ("Newsgroups: ", buf, sizeof (buf), 0) == 0
625 FREE (&msg->env->newsgroups);
626 mutt_remove_trailing_ws (buf);
627 msg->env->newsgroups = safe_strdup (mutt_skip_whitespace (buf));
628 move (HDR_TO, HDR_XOFFSET);
630 if (msg->env->newsgroups)
631 printw ("%-*.*s", W, W, msg->env->newsgroups);
636 case OP_COMPOSE_EDIT_FOLLOWUP_TO:
639 if (msg->env->followup_to)
640 strfcpy (buf, msg->env->followup_to, sizeof (buf));
641 if (mutt_get_field ("Followup-To: ", buf, sizeof (buf), 0) == 0
643 FREE (&msg->env->followup_to);
644 mutt_remove_trailing_ws (buf);
645 msg->env->followup_to = safe_strdup (mutt_skip_whitespace (buf));
646 move (HDR_CC, HDR_XOFFSET);
648 if (msg->env->followup_to)
649 printw ("%-*.*s", W, W, msg->env->followup_to);
654 case OP_COMPOSE_EDIT_X_COMMENT_TO:
655 if (news && option (OPTXCOMMENTTO)) {
657 if (msg->env->x_comment_to)
658 strfcpy (buf, msg->env->x_comment_to, sizeof (buf));
659 if (mutt_get_field ("X-Comment-To: ", buf, sizeof (buf), 0) == 0
661 FREE (&msg->env->x_comment_to);
662 msg->env->x_comment_to = safe_strdup (buf);
663 move (HDR_BCC, HDR_XOFFSET);
665 if (msg->env->x_comment_to)
666 printw ("%-*.*s", W, W, msg->env->x_comment_to);
671 case OP_COMPOSE_EDIT_SUBJECT:
672 if (msg->env->subject)
673 strfcpy (buf, msg->env->subject, sizeof (buf));
676 if (mutt_get_field ("Subject: ", buf, sizeof (buf), 0) == 0) {
677 mutt_str_replace (&msg->env->subject, buf);
678 move (HDR_SUBJECT, HDR_XOFFSET + SidebarWidth);
680 if (msg->env->subject)
681 mutt_paddstr (W, msg->env->subject);
683 mutt_message_hook (NULL, msg, M_SEND2HOOK);
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);
689 case OP_COMPOSE_EDIT_FCC:
690 strfcpy (buf, fcc, sizeof (buf));
691 if (mutt_get_field ("Fcc: ", buf, sizeof (buf), M_FILE | M_CLEAR) == 0) {
692 strfcpy (fcc, buf, _POSIX_PATH_MAX);
693 mutt_pretty_mailbox (fcc);
694 move (HDR_FCC, HDR_XOFFSET + SidebarWidth);
695 mutt_paddstr (W, fcc);
698 MAYBE_REDRAW (menu->redraw);
699 mutt_message_hook (NULL, msg, M_SEND2HOOK);
701 case OP_COMPOSE_EDIT_MESSAGE:
702 if (Editor && (mutt_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);
711 case OP_COMPOSE_EDIT_HEADERS:
712 if (mutt_strcmp ("builtin", Editor) != 0 &&
713 (op == OP_COMPOSE_EDIT_HEADERS ||
714 (op == OP_COMPOSE_EDIT_MESSAGE && option (OPTEDITHDRS)))) {
715 char *tag = NULL, *err = NULL;
717 mutt_env_to_local (msg->env);
718 mutt_edit_headers (NONULL (Editor), msg->content->filename, msg,
720 if (mutt_env_to_idna (msg->env, &tag, &err)) {
721 mutt_error (_("Bad IDN in \"%s\": '%s'"), tag, err);
726 /* this is grouped with OP_COMPOSE_EDIT_HEADERS because the
727 attachment list could change if the user invokes ~v to edit
728 the message with headers, in which we need to execute the
729 code below to regenerate the index array */
730 mutt_builtin_editor (msg->content->filename, msg, cur);
732 mutt_update_encoding (msg->content);
734 /* attachments may have been added */
735 if (idxlen && idx[idxlen - 1]->content->next) {
736 for (i = 0; i < idxlen; i++)
740 mutt_gen_attach_list (msg->content, -1, idx, &idxlen, &idxmax, 0,
746 menu->redraw = REDRAW_FULL;
747 mutt_message_hook (NULL, msg, M_SEND2HOOK);
752 case OP_COMPOSE_ATTACH_KEY:
753 if (!(WithCrypto & APPLICATION_PGP))
755 if (idxlen == idxmax) {
756 safe_realloc (&idx, sizeof (ATTACHPTR *) * (idxmax += 5));
760 idx[idxlen] = (ATTACHPTR *) safe_calloc (1, sizeof (ATTACHPTR));
761 if ((idx[idxlen]->content =
762 crypt_pgp_make_key_attachment (NULL)) != NULL) {
763 update_idx (menu, idx, idxlen++);
764 menu->redraw |= REDRAW_INDEX;
769 menu->redraw |= REDRAW_STATUS;
771 if (option (OPTNEEDREDRAW)) {
772 menu->redraw = REDRAW_FULL;
773 unset_option (OPTNEEDREDRAW);
776 mutt_message_hook (NULL, msg, M_SEND2HOOK);
780 case OP_COMPOSE_ATTACH_FILE:
782 char *prompt, **files;
786 prompt = _("Attach file");
790 if (_mutt_enter_fname
791 (prompt, fname, sizeof (fname), &menu->redraw, 0, 1, &files,
792 &numfiles) == -1 || *fname == '\0')
795 if (idxlen + numfiles >= idxmax) {
797 sizeof (ATTACHPTR *) * (idxmax += 5 + numfiles));
803 mutt_message _("Attaching selected files...");
805 for (i = 0; i < numfiles; i++) {
806 char *att = files[i];
808 idx[idxlen] = (ATTACHPTR *) safe_calloc (1, sizeof (ATTACHPTR));
809 idx[idxlen]->content = mutt_make_file_attach (att);
810 if (idx[idxlen]->content != NULL)
811 update_idx (menu, idx, idxlen++);
814 mutt_error (_("Unable to attach %s!"), att);
823 menu->redraw |= REDRAW_INDEX | REDRAW_STATUS;
825 mutt_message_hook (NULL, msg, M_SEND2HOOK);
828 case OP_COMPOSE_ATTACH_MESSAGE:
830 case OP_COMPOSE_ATTACH_NEWS_MESSAGE:
837 prompt = _("Open mailbox to attach message from");
840 unset_option (OPTNEWS);
841 if (op == OP_COMPOSE_ATTACH_NEWS_MESSAGE) {
842 if (!(CurrentNewsSrv = mutt_select_newsserver (NewsServer)))
845 prompt = _("Open newsgroup to attach message from");
846 set_option (OPTNEWS);
852 if ((op == OP_COMPOSE_ATTACH_MESSAGE) ^ (Context->magic == M_NNTP))
855 strfcpy (fname, NONULL (Context->path), sizeof (fname));
856 mutt_pretty_mailbox (fname);
859 if (mutt_enter_fname (prompt, fname, sizeof (fname), &menu->redraw, 1)
864 if (option (OPTNEWS))
865 nntp_expand_path (fname, sizeof (fname),
866 &CurrentNewsSrv->conn->account);
869 mutt_expand_path (fname, sizeof (fname));
871 if (!mx_is_imap (fname))
874 if (!mx_is_pop (fname))
877 if (!mx_is_nntp (fname) && !option (OPTNEWS))
879 /* check to make sure the file exists and is readable */
880 if (access (fname, R_OK) == -1) {
885 menu->redraw = REDRAW_FULL;
887 ctx = mx_open_mailbox (fname, M_READONLY, NULL);
893 if (!ctx->msgcount) {
894 mx_close_mailbox (ctx, NULL);
896 mutt_error _("No messages in that folder.");
901 this = Context; /* remember current folder and sort methods */
903 oldSortAux = SortAux;
906 set_option (OPTATTACHMSG);
907 mutt_message _("Tag the messages you want to attach!");
909 close = mutt_index_menu ();
910 unset_option (OPTATTACHMSG);
913 /* go back to the folder we started from */
915 /* Restore old $sort and $sort_aux */
917 SortAux = oldSortAux;
918 menu->redraw |= REDRAW_INDEX | REDRAW_STATUS;
922 if (idxlen + Context->tagged >= idxmax) {
924 sizeof (ATTACHPTR *) * (idxmax +=
925 5 + Context->tagged));
929 for (i = 0; i < Context->msgcount; i++) {
930 h = Context->hdrs[i];
932 idx[idxlen] = (ATTACHPTR *) safe_calloc (1, sizeof (ATTACHPTR));
933 idx[idxlen]->content = mutt_make_message_attach (Context, h, 1);
934 if (idx[idxlen]->content != NULL)
935 update_idx (menu, idx, idxlen++);
937 mutt_error _("Unable to attach!");
943 menu->redraw |= REDRAW_FULL;
945 if (close == OP_QUIT)
946 mx_close_mailbox (Context, NULL);
948 mx_fastclose_mailbox (Context);
951 /* go back to the folder we started from */
953 /* Restore old $sort and $sort_aux */
955 SortAux = oldSortAux;
957 mutt_message_hook (NULL, msg, M_SEND2HOOK);
962 if (delete_attachment (menu, &idxlen, menu->current) == -1)
964 mutt_update_tree (idx, idxlen);
966 if (menu->current > idxlen - 1)
967 menu->current = idxlen - 1;
972 if (menu->current == 0)
973 msg->content = idx[0]->content;
975 menu->redraw |= REDRAW_STATUS;
976 mutt_message_hook (NULL, msg, M_SEND2HOOK);
979 #define CURRENT idx[menu->current]->content
981 case OP_COMPOSE_TOGGLE_RECODE:
984 if (!mutt_is_text_part (CURRENT)) {
985 mutt_error (_("Recoding only affects text attachments."));
988 CURRENT->noconv = !CURRENT->noconv;
990 mutt_message (_("The current attachment won't be converted."));
992 mutt_message (_("The current attachment will be converted."));
993 menu->redraw = REDRAW_CURRENT;
994 mutt_message_hook (NULL, msg, M_SEND2HOOK);
999 case OP_COMPOSE_EDIT_DESCRIPTION:
1002 idx[menu->current]->content->description ?
1003 idx[menu->current]->content->description : "", sizeof (buf));
1004 /* header names should not be translated */
1005 if (mutt_get_field ("Description: ", buf, sizeof (buf), 0) == 0) {
1006 mutt_str_replace (&idx[menu->current]->content->description, buf);
1007 menu->redraw = REDRAW_CURRENT;
1009 mutt_message_hook (NULL, msg, M_SEND2HOOK);
1012 case OP_COMPOSE_UPDATE_ENCODING:
1014 if (menu->tagprefix) {
1017 for (top = msg->content; top; top = top->next) {
1019 mutt_update_encoding (top);
1021 menu->redraw = REDRAW_FULL;
1024 mutt_update_encoding (idx[menu->current]->content);
1025 menu->redraw = REDRAW_CURRENT | REDRAW_STATUS;
1027 mutt_message_hook (NULL, msg, M_SEND2HOOK);
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;
1041 mutt_edit_content_type (NULL, idx[menu->current]->content, NULL);
1043 /* this may have been a change to text/something */
1044 mutt_update_encoding (idx[menu->current]->content);
1046 menu->redraw = REDRAW_CURRENT;
1048 mutt_message_hook (NULL, msg, M_SEND2HOOK);
1051 case OP_COMPOSE_EDIT_ENCODING:
1053 strfcpy (buf, 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 ();
1063 mutt_error _("Invalid encoding.");
1065 mutt_message_hook (NULL, msg, M_SEND2HOOK);
1068 case OP_COMPOSE_SEND_MESSAGE:
1070 /* Note: We don't invoke send2-hook here, since we want to leave
1071 * users an opportunity to change settings from the ":" prompt.
1074 if (check_attachments (idx, idxlen) != 0) {
1075 menu->redraw = REDRAW_FULL;
1081 if (msg->chain && mix_check_message (msg) != 0)
1085 if (!fccSet && *fcc) {
1086 if ((i = query_quadoption (OPT_COPY,
1087 _("Save a copy of this message?"))) == -1)
1097 case OP_COMPOSE_EDIT_FILE:
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);
1105 case OP_COMPOSE_TOGGLE_UNLINK:
1107 idx[menu->current]->content->unlink =
1108 !idx[menu->current]->content->unlink;
1111 /* OPTRESOLVE is otherwise ignored on this menu.
1115 if (option (OPTRESOLVE) && menu->current + 1 < menu->max)
1118 menu->redraw = REDRAW_INDEX;
1119 /* No send2hook since this doesn't change the message. */
1122 case OP_COMPOSE_GET_ATTACHMENT:
1124 if (menu->tagprefix) {
1127 for (top = msg->content; top; top = top->next) {
1129 mutt_get_tmp_attachment (top);
1131 menu->redraw = REDRAW_FULL;
1133 else if (mutt_get_tmp_attachment (idx[menu->current]->content) == 0)
1134 menu->redraw = REDRAW_CURRENT;
1136 /* No send2hook since this doesn't change the message. */
1139 case OP_COMPOSE_RENAME_FILE:
1141 strfcpy (fname, idx[menu->current]->content->filename, sizeof (fname));
1142 mutt_pretty_mailbox (fname);
1143 if (mutt_get_field (_("Rename to: "), fname, sizeof (fname), M_FILE)
1145 if (stat (idx[menu->current]->content->filename, &st) == -1) {
1146 mutt_error (_("Can't stat %s: %s"), fname, strerror (errno));
1150 mutt_expand_path (fname, sizeof (fname));
1151 if (mutt_rename_file (idx[menu->current]->content->filename, fname))
1154 mutt_str_replace (&idx[menu->current]->content->filename, fname);
1155 menu->redraw = REDRAW_CURRENT;
1157 if (idx[menu->current]->content->stamp >= st.st_mtime)
1158 mutt_stamp_attachment (idx[menu->current]->content);
1161 mutt_message_hook (NULL, msg, M_SEND2HOOK);
1164 case OP_COMPOSE_NEW_MIME:
1171 CLEARLINE (LINES - 1);
1173 if (mutt_get_field (_("New file: "), fname, sizeof (fname), M_FILE)
1176 mutt_expand_path (fname, sizeof (fname));
1178 /* Call to lookup_mime_type () ? maybe later */
1180 if (mutt_get_field ("Content-Type: ", type, sizeof (type), 0) != 0
1184 if (!(p = strchr (type, '/'))) {
1185 mutt_error _("Content-Type is of the form base/sub");
1190 if ((itype = mutt_check_mime_type (type)) == TYPEOTHER) {
1191 mutt_error (_("Unknown Content-Type %s"), type);
1194 if (idxlen == idxmax) {
1195 safe_realloc (&idx, sizeof (ATTACHPTR *) * (idxmax += 5));
1199 idx[idxlen] = (ATTACHPTR *) safe_calloc (1, sizeof (ATTACHPTR));
1200 /* Touch the file */
1201 if (!(fp = safe_fopen (fname, "w"))) {
1202 mutt_error (_("Can't create file %s"), fname);
1203 FREE (&idx[idxlen]);
1208 if ((idx[idxlen]->content = mutt_make_file_attach (fname)) == NULL) {
1210 _("What we have here is a failure to make an attachment");
1213 update_idx (menu, idx, idxlen++);
1215 idx[menu->current]->content->type = itype;
1216 mutt_str_replace (&idx[menu->current]->content->subtype, p);
1217 idx[menu->current]->content->unlink = 1;
1218 menu->redraw |= REDRAW_INDEX | REDRAW_STATUS;
1220 if (mutt_compose_attachment (idx[menu->current]->content)) {
1221 mutt_update_encoding (idx[menu->current]->content);
1222 menu->redraw = REDRAW_FULL;
1225 mutt_message_hook (NULL, msg, M_SEND2HOOK);
1228 case OP_COMPOSE_EDIT_MIME:
1230 if (mutt_edit_attachment (idx[menu->current]->content)) {
1231 mutt_update_encoding (idx[menu->current]->content);
1232 menu->redraw = REDRAW_FULL;
1234 mutt_message_hook (NULL, msg, M_SEND2HOOK);
1237 case OP_VIEW_ATTACH:
1238 case OP_DISPLAY_HEADERS:
1240 mutt_attach_display_loop (menu, op, NULL, NULL, NULL, &idx, &idxlen,
1242 menu->redraw = REDRAW_FULL;
1243 /* no send2hook, since this doesn't modify the message */
1248 mutt_save_attachment_list (NULL, menu->tagprefix,
1249 menu->tagprefix ? msg->content : idx[menu->
1251 content, NULL, menu);
1252 MAYBE_REDRAW (menu->redraw);
1253 /* no send2hook, since this doesn't modify the message */
1258 mutt_print_attachment_list (NULL, menu->tagprefix,
1259 menu->tagprefix ? msg->content : idx[menu->
1262 /* no send2hook, since this doesn't modify the message */
1268 mutt_pipe_attachment_list (NULL, menu->tagprefix,
1269 menu->tagprefix ? msg->content : idx[menu->
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);
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 mutt_free_body (&idx[idxlen]->content);
1287 FREE (&idx[idxlen]->tree);
1288 FREE (&idx[idxlen]);
1300 /* fall through to postpone! */
1302 case OP_COMPOSE_POSTPONE_MESSAGE:
1304 if (check_attachments (idx, idxlen) != 0) {
1305 menu->redraw = REDRAW_FULL;
1313 case OP_COMPOSE_ISPELL:
1315 snprintf (buf, sizeof (buf), "%s -x %s", NONULL (Ispell),
1316 msg->content->filename);
1317 if (mutt_system (buf) == -1)
1318 mutt_error (_("Error running \"%s\"!"), buf);
1320 mutt_update_encoding (msg->content);
1321 menu->redraw |= REDRAW_STATUS;
1325 case OP_COMPOSE_WRITE_MESSAGE:
1329 strfcpy (fname, NONULL (Context->path), sizeof (fname));
1330 mutt_pretty_mailbox (fname);
1333 msg->content = idx[0]->content;
1334 if (mutt_enter_fname
1335 (_("Write message to mailbox"), fname, sizeof (fname),
1336 &menu->redraw, 1) != -1 && fname[0]) {
1337 mutt_message (_("Writing message to %s ..."), fname);
1338 mutt_expand_path (fname, sizeof (fname));
1340 if (msg->content->next)
1341 msg->content = mutt_make_multipart (msg->content);
1343 if (mutt_write_fcc (NONULL (fname), msg, NULL, 1, NULL) < 0)
1344 msg->content = mutt_remove_multipart (msg->content);
1346 mutt_message _("Message written.");
1352 case OP_COMPOSE_PGP_MENU:
1353 if (!(WithCrypto & APPLICATION_PGP))
1355 if ((WithCrypto & APPLICATION_SMIME)
1356 && msg->security & APPLICATION_SMIME) {
1357 if (mutt_yesorno (_("S/MIME already selected. Clear & continue ? "),
1359 mutt_clear_error ();
1364 msg->security = crypt_pgp_send_menu (msg, &menu->redraw);
1365 redraw_crypt_lines (msg);
1366 mutt_message_hook (NULL, msg, M_SEND2HOOK);
1370 case OP_FORGET_PASSPHRASE:
1371 crypt_forget_passphrase ();
1375 case OP_COMPOSE_SMIME_MENU:
1376 if (!(WithCrypto & APPLICATION_SMIME))
1379 if ((WithCrypto & APPLICATION_PGP)
1380 && msg->security & APPLICATION_PGP) {
1381 if (mutt_yesorno (_("PGP already selected. Clear & continue ? "),
1383 mutt_clear_error ();
1388 msg->security = crypt_smime_send_menu (msg, &menu->redraw);
1389 redraw_crypt_lines (msg);
1390 mutt_message_hook (NULL, msg, M_SEND2HOOK);
1395 case OP_COMPOSE_MIX:
1397 mix_make_chain (&msg->chain, &menu->redraw);
1398 mutt_message_hook (NULL, msg, M_SEND2HOOK);
1404 /* Draw formated compose status line */
1405 if (menu->redraw & REDRAW_STATUS) {
1406 compose_status_line (buf, sizeof (buf), menu, NONULL (ComposeFormat));
1407 CLEARLINE (option (OPTSTATUSONTOP) ? 0 : LINES - 2);
1408 SETCOLOR (MT_COLOR_STATUS);
1409 printw ("%-*.*s", COLS, COLS, buf);
1410 SETCOLOR (MT_COLOR_NORMAL);
1411 menu->redraw &= ~REDRAW_STATUS;
1415 mutt_menuDestroy (&menu);
1418 msg->content = idx[0]->content;
1419 for (i = 0; i < idxlen; i++) {
1420 idx[i]->content->aptr = NULL;
1425 msg->content = NULL;