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; }
82 HDR_ATTACH = (HDR_FCC + 5) /* where to start printing the attachments */
84 HDR_ATTACH = (HDR_FCC + 7)
88 #define HDR_XOFFSET 14
89 #define TITLE_FMT "%14s" /* Used for Prompts, which are ASCII */
90 #define W (COLS - HDR_XOFFSET - SidebarWidth)
92 static char *Prompts[] =
113 static struct mapping_t ComposeHelp[] = {
114 { N_("Send"), OP_COMPOSE_SEND_MESSAGE },
115 { N_("Abort"), OP_EXIT },
116 { "To", OP_COMPOSE_EDIT_TO },
117 { "CC", OP_COMPOSE_EDIT_CC },
118 { "Subj", OP_COMPOSE_EDIT_SUBJECT },
119 { N_("Attach file"), OP_COMPOSE_ATTACH_FILE },
120 { N_("Descrip"), OP_COMPOSE_EDIT_DESCRIPTION },
121 { N_("Help"), OP_HELP },
126 static struct mapping_t ComposeNewsHelp[] = {
127 { N_("Send"), OP_COMPOSE_SEND_MESSAGE },
128 { N_("Abort"), OP_EXIT },
129 { "Newsgroups", OP_COMPOSE_EDIT_NEWSGROUPS },
130 { "Subj", OP_COMPOSE_EDIT_SUBJECT },
131 { N_("Attach file"), OP_COMPOSE_ATTACH_FILE },
132 { N_("Descrip"), OP_COMPOSE_EDIT_DESCRIPTION },
133 { N_("Help"), OP_HELP },
138 static void snd_entry (char *b, size_t blen, MUTTMENU *menu, int num)
140 mutt_FormatString (b, blen, NONULL (AttachFormat), mutt_attach_fmt,
141 (unsigned long)(((ATTACHPTR **) menu->data)[num]),
142 M_FORMAT_STAT_FILE | M_FORMAT_ARROWCURSOR);
147 #include "mutt_crypt.h"
149 static void redraw_crypt_lines (HEADER *msg)
153 if ((WithCrypto & APPLICATION_PGP) && (WithCrypto & APPLICATION_SMIME))
156 mvaddstr (HDR_CRYPT, SidebarWidth, " Security: ");
157 else if (msg->security & APPLICATION_SMIME)
158 mvaddstr (HDR_CRYPT, SidebarWidth, " S/MIME: ");
159 else if (msg->security & APPLICATION_PGP)
160 mvaddstr (HDR_CRYPT, SidebarWidth, " PGP: ");
162 else if ((WithCrypto & APPLICATION_SMIME))
163 mvaddstr (HDR_CRYPT, SidebarWidth, " S/MIME: ");
164 else if ((WithCrypto & APPLICATION_PGP))
165 mvaddstr (HDR_CRYPT, SidebarWidth, " PGP: ");
169 if ((msg->security & (ENCRYPT | SIGN)) == (ENCRYPT | SIGN))
170 addstr (_("Sign, Encrypt"));
171 else if (msg->security & ENCRYPT)
172 addstr (_("Encrypt"));
173 else if (msg->security & SIGN)
178 if ((WithCrypto & APPLICATION_PGP))
179 if ((msg->security & APPLICATION_PGP)
180 && (msg->security & (ENCRYPT | SIGN)))
182 if ((msg->security & INLINE))
183 addstr (_(" (inline)"));
185 addstr (_(" (PGP/MIME)"));
189 move (HDR_CRYPTINFO, SidebarWidth);
191 if ((WithCrypto & APPLICATION_PGP)
192 && msg->security & APPLICATION_PGP && msg->security & SIGN)
193 printw ("%s%s", _(" sign as: "), PgpSignAs ? PgpSignAs : _("<default>"));
195 if ((WithCrypto & APPLICATION_SMIME)
196 && msg->security & APPLICATION_SMIME && msg->security & SIGN) {
197 printw ("%s%s", _(" sign as: "), SmimeDefaultKey ? SmimeDefaultKey : _("<default>"));
200 if ((WithCrypto & APPLICATION_SMIME)
201 && (msg->security & APPLICATION_SMIME)
202 && (msg->security & ENCRYPT)
205 mvprintw (HDR_CRYPTINFO, SidebarWidth + 40, "%s%s", _("Encrypt with: "),
206 NONULL(SmimeCryptAlg));
214 static void redraw_mix_line (LIST *chain)
219 mvaddstr (HDR_MIX, SidebarWidth, " Mix: ");
223 addstr ("<no chain defined>");
228 for (c = 12; chain; chain = chain->next)
231 if (t && t[0] == '0' && t[1] == '\0')
234 if (c + mutt_strlen (t) + 2 >= COLS - SidebarWidth)
241 c += mutt_strlen (t) + 2;
244 #endif /* MIXMASTER */
247 check_attachments(ATTACHPTR **idx, short idxlen)
251 char pretty[_POSIX_PATH_MAX], msg[_POSIX_PATH_MAX + SHORT_STRING];
253 for (i = 0; i < idxlen; i++)
255 strfcpy(pretty, idx[i]->content->filename, sizeof(pretty));
256 if(stat(idx[i]->content->filename, &st) != 0)
258 mutt_pretty_mailbox(pretty);
259 mutt_error(_("%s [#%d] no longer exists!"),
264 if(idx[i]->content->stamp < st.st_mtime)
266 mutt_pretty_mailbox(pretty);
267 snprintf(msg, sizeof(msg), _("%s [#%d] modified. Update encoding?"),
270 if((r = mutt_yesorno(msg, M_YES)) == M_YES)
271 mutt_update_encoding(idx[i]->content);
280 static void draw_envelope_addr (int line, ADDRESS *addr)
285 rfc822_write_address (buf, sizeof (buf), addr, 1);
286 mvprintw (line, SidebarWidth, TITLE_FMT, Prompts[line - 1]);
287 mutt_paddstr (W, buf);
290 static void draw_envelope (HEADER *msg, char *fcc)
292 draw_envelope_addr (HDR_FROM, msg->env->from);
294 if (!option (OPTNEWSSEND))
297 draw_envelope_addr (HDR_TO, msg->env->to);
298 draw_envelope_addr (HDR_CC, msg->env->cc);
299 draw_envelope_addr (HDR_BCC, msg->env->bcc);
304 mvprintw (HDR_TO, SidebarWidth, TITLE_FMT , Prompts[HDR_NEWSGROUPS - 1]);
305 mutt_paddstr (W, NONULL (msg->env->newsgroups));
306 mvprintw (HDR_CC, SidebarWidth, TITLE_FMT , Prompts[HDR_FOLLOWUPTO - 1]);
307 mutt_paddstr (W, NONULL (msg->env->followup_to));
308 if (option (OPTXCOMMENTTO))
310 mvprintw (HDR_BCC, 0, TITLE_FMT , Prompts[HDR_XCOMMENTTO - 1]);
311 mutt_paddstr (W, NONULL (msg->env->x_comment_to));
315 mvprintw (HDR_SUBJECT, SidebarWidth, TITLE_FMT, Prompts[HDR_SUBJECT - 1]);
316 mutt_paddstr (W, NONULL (msg->env->subject));
317 draw_envelope_addr (HDR_REPLYTO, msg->env->reply_to);
318 mvprintw (HDR_FCC, SidebarWidth, TITLE_FMT, Prompts[HDR_FCC - 1]);
319 mutt_paddstr (W, fcc);
322 redraw_crypt_lines (msg);
325 redraw_mix_line (msg->chain);
328 SETCOLOR (MT_COLOR_STATUS);
329 mvaddstr (HDR_ATTACH - 1, SidebarWidth, _("-- Attachments"));
330 BKGDSET (MT_COLOR_STATUS);
333 BKGDSET (MT_COLOR_NORMAL);
334 SETCOLOR (MT_COLOR_NORMAL);
337 static int edit_address_list (int line, ADDRESS **addr)
339 char buf[HUGE_STRING] = ""; /* needs to be large for alias expansion */
342 mutt_addrlist_to_local (*addr);
343 rfc822_write_address (buf, sizeof (buf), *addr, 0);
344 if (mutt_get_field (Prompts[line - 1], buf, sizeof (buf), M_ALIAS) == 0)
346 rfc822_free_address (addr);
347 *addr = mutt_parse_adrlist (*addr, buf);
348 *addr = mutt_expand_aliases (*addr);
351 if (option (OPTNEEDREDRAW))
353 unset_option (OPTNEEDREDRAW);
354 return (REDRAW_FULL);
357 if (mutt_addrlist_to_idna (*addr, &err) != 0)
359 mutt_error (_("Warning: '%s' is a bad IDN."), err);
364 /* redraw the expanded list so the user can see the result */
366 rfc822_write_address (buf, sizeof (buf), *addr, 1);
367 move (line, HDR_XOFFSET+SidebarWidth);
368 mutt_paddstr (W, buf);
373 static int delete_attachment (MUTTMENU *menu, short *idxlen, int x)
375 ATTACHPTR **idx = (ATTACHPTR **) menu->data;
378 menu->redraw = REDRAW_INDEX | REDRAW_STATUS;
380 if (x == 0 && menu->max == 1)
382 mutt_error _("You may not delete the only attachment.");
383 idx[x]->content->tagged = 0;
387 for (y = 0; y < *idxlen; y++)
389 if (idx[y]->content->next == idx[x]->content)
391 idx[y]->content->next = idx[x]->content->next;
396 idx[x]->content->next = NULL;
397 idx[x]->content->parts = NULL;
398 mutt_free_body (&(idx[x]->content));
399 FREE (&idx[x]->tree);
401 for (; x < *idxlen - 1; x++)
403 menu->max = --(*idxlen);
408 static void update_idx (MUTTMENU *menu, ATTACHPTR **idx, short idxlen)
410 idx[idxlen]->level = (idxlen > 0) ? idx[idxlen-1]->level : 0;
412 idx[idxlen - 1]->content->next = idx[idxlen]->content;
413 idx[idxlen]->content->aptr = idx[idxlen];
414 menu->current = idxlen++;
415 mutt_update_tree (idx, idxlen);
422 * cum_attachs_size: Cumulative Attachments Size
424 * Returns the total number of bytes used by the attachments in the
425 * attachment list _after_ content-transfer-encodings have been
430 static unsigned long cum_attachs_size (MUTTMENU *menu)
434 ATTACHPTR **idx = menu->data;
438 for (i = 0, s = 0; i < menu->max; i++)
443 b->content = mutt_get_content_info (b->filename, b);
445 if ((info = b->content))
449 case ENCQUOTEDPRINTABLE:
450 s += 3 * (info->lobin + info->hibin) + info->ascii + info->crlf;
453 s += (4 * (info->lobin + info->hibin + info->ascii + info->crlf)) / 3;
456 s += info->lobin + info->hibin + info->ascii + info->crlf;
465 /* prototype for use below */
466 static void compose_status_line (char *buf, size_t buflen, MUTTMENU *menu,
470 * compose_format_str()
472 * %a = total number of attachments
473 * %h = hostname [option]
474 * %l = approx. length of current message (in bytes)
477 * This function is similar to status_format_str(). Look at that function for
478 * help when modifying this function.
482 compose_format_str (char *buf, size_t buflen, char op, const char *src,
483 const char *prefix, const char *ifstring,
484 const char *elsestring,
485 unsigned long data, format_flag flags)
487 char fmt[SHORT_STRING], tmp[SHORT_STRING];
488 int optional = (flags & M_FORMAT_OPTIONAL);
489 MUTTMENU *menu = (MUTTMENU *) data;
494 case 'a': /* total number of attachments */
495 snprintf (fmt, sizeof (fmt), "%%%sd", prefix);
496 snprintf (buf, buflen, fmt, menu->max);
499 case 'h': /* hostname */
500 snprintf (fmt, sizeof (fmt), "%%%ss", prefix);
501 snprintf (buf, buflen, fmt, NONULL(Hostname));
504 case 'l': /* approx length of current message in bytes */
505 snprintf (fmt, sizeof (fmt), "%%%ss", prefix);
506 mutt_pretty_size (tmp, sizeof (tmp), menu ? cum_attachs_size(menu) : 0);
507 snprintf (buf, buflen, fmt, tmp);
511 snprintf (fmt, sizeof (fmt), "Mutt-ng %%s");
512 snprintf (buf, buflen, fmt, MUTT_VERSION);
520 snprintf (buf, buflen, "%%%s%c", prefix, op);
525 compose_status_line (buf, buflen, menu, ifstring);
526 else if (flags & M_FORMAT_OPTIONAL)
527 compose_status_line (buf, buflen, menu, elsestring);
532 static void compose_status_line (char *buf, size_t buflen, MUTTMENU *menu,
535 mutt_FormatString (buf, buflen, p, compose_format_str,
536 (unsigned long) menu, 0);
542 * 1 message should be postponed
546 int mutt_compose_menu (HEADER *msg, /* structure for new message */
547 char *fcc, /* where to save a copy of the message */
549 HEADER *cur) /* current message */
551 char helpstr[SHORT_STRING];
552 char buf[LONG_STRING];
553 char fname[_POSIX_PATH_MAX];
555 ATTACHPTR **idx = NULL;
559 int r = -1; /* return value */
562 int fccSet = 0; /* has the user edited the Fcc: field ? */
563 CONTEXT *ctx = NULL, *this = NULL;
564 /* Sort, SortAux could be changed in mutt_index_menu() */
565 int oldSort, oldSortAux;
568 int news = 0; /* is it a news article ? */
570 if (option (OPTNEWSSEND))
574 mutt_attach_init (msg->content);
575 idx = mutt_gen_attach_list (msg->content, -1, idx, &idxlen, &idxmax, 0, 1);
577 menu = mutt_new_menu ();
578 menu->menu = MENU_COMPOSE;
579 menu->offset = HDR_ATTACH;
581 menu->make_entry = snd_entry;
582 menu->tag = mutt_tag_attach;
586 menu->help = mutt_compile_help (helpstr, sizeof (helpstr), MENU_COMPOSE, ComposeNewsHelp);
589 menu->help = mutt_compile_help (helpstr, sizeof (helpstr), MENU_COMPOSE, ComposeHelp);
591 if (option (OPTSTATUSONTOP))
596 unset_option (OPTNEWS); /* for any case */
598 switch (op = mutt_menuLoop (menu))
601 draw_envelope (msg, fcc);
602 menu->offset = HDR_ATTACH;
603 menu->pagelen = LINES - HDR_ATTACH - 2;
605 case OP_COMPOSE_EDIT_FROM:
606 menu->redraw = edit_address_list (HDR_FROM, &msg->env->from);
607 mutt_message_hook (NULL, msg, M_SEND2HOOK);
609 case OP_COMPOSE_EDIT_TO:
613 menu->redraw = edit_address_list (HDR_TO, &msg->env->to);
614 mutt_message_hook (NULL, msg, M_SEND2HOOK);
619 case OP_COMPOSE_EDIT_BCC:
623 menu->redraw = edit_address_list (HDR_BCC, &msg->env->bcc);
624 mutt_message_hook (NULL, msg, M_SEND2HOOK);
629 case OP_COMPOSE_EDIT_CC:
633 menu->redraw = edit_address_list (HDR_CC, &msg->env->cc);
634 mutt_message_hook (NULL, msg, M_SEND2HOOK);
640 case OP_COMPOSE_EDIT_NEWSGROUPS:
643 if (msg->env->newsgroups)
644 strfcpy (buf, msg->env->newsgroups, sizeof (buf));
647 if (mutt_get_field ("Newsgroups: ", buf, sizeof (buf), 0) == 0 && buf[0])
649 FREE (&msg->env->newsgroups);
650 mutt_remove_trailing_ws (buf);
651 msg->env->newsgroups = safe_strdup (mutt_skip_whitespace (buf));
652 move (HDR_TO, HDR_XOFFSET);
654 if (msg->env->newsgroups)
655 printw ("%-*.*s", W, W, msg->env->newsgroups);
660 case OP_COMPOSE_EDIT_FOLLOWUP_TO:
664 if (msg->env->followup_to)
665 strfcpy (buf, msg->env->followup_to, sizeof (buf));
666 if (mutt_get_field ("Followup-To: ", buf, sizeof (buf), 0) == 0 && buf[0])
668 FREE (&msg->env->followup_to);
669 mutt_remove_trailing_ws (buf);
670 msg->env->followup_to = safe_strdup (mutt_skip_whitespace (buf));
671 move (HDR_CC, HDR_XOFFSET);
673 if (msg->env->followup_to)
674 printw ("%-*.*s", W, W, msg->env->followup_to);
679 case OP_COMPOSE_EDIT_X_COMMENT_TO:
680 if (news && option (OPTXCOMMENTTO))
683 if (msg->env->x_comment_to)
684 strfcpy (buf, msg->env->x_comment_to, sizeof (buf));
685 if (mutt_get_field ("X-Comment-To: ", buf, sizeof (buf), 0) == 0 && buf[0])
687 FREE (&msg->env->x_comment_to);
688 msg->env->x_comment_to = safe_strdup (buf);
689 move (HDR_BCC, HDR_XOFFSET);
691 if (msg->env->x_comment_to)
692 printw ("%-*.*s", W, W, msg->env->x_comment_to);
697 case OP_COMPOSE_EDIT_SUBJECT:
698 if (msg->env->subject)
699 strfcpy (buf, msg->env->subject, sizeof (buf));
702 if (mutt_get_field ("Subject: ", buf, sizeof (buf), 0) == 0)
704 mutt_str_replace (&msg->env->subject, buf);
705 move (HDR_SUBJECT, HDR_XOFFSET + SidebarWidth);
707 if (msg->env->subject)
708 mutt_paddstr (W, msg->env->subject);
710 mutt_message_hook (NULL, msg, M_SEND2HOOK);
712 case OP_COMPOSE_EDIT_REPLY_TO:
713 menu->redraw = edit_address_list (HDR_REPLYTO, &msg->env->reply_to);
714 mutt_message_hook (NULL, msg, M_SEND2HOOK);
716 case OP_COMPOSE_EDIT_FCC:
717 strfcpy (buf, fcc, sizeof (buf));
718 if (mutt_get_field ("Fcc: ", buf, sizeof (buf), M_FILE | M_CLEAR) == 0)
720 strfcpy (fcc, buf, _POSIX_PATH_MAX);
721 mutt_pretty_mailbox (fcc);
722 move (HDR_FCC, HDR_XOFFSET + SidebarWidth);
723 mutt_paddstr (W, fcc);
726 MAYBE_REDRAW (menu->redraw);
727 mutt_message_hook (NULL, msg, M_SEND2HOOK);
729 case OP_COMPOSE_EDIT_MESSAGE:
730 if (Editor && (mutt_strcmp ("builtin", Editor) != 0) && !option (OPTEDITHDRS))
732 mutt_edit_file (Editor, msg->content->filename);
733 mutt_update_encoding (msg->content);
734 menu->redraw = REDRAW_CURRENT | REDRAW_STATUS;
735 mutt_message_hook (NULL, msg, M_SEND2HOOK);
739 case OP_COMPOSE_EDIT_HEADERS:
740 if (mutt_strcmp ("builtin", Editor) != 0 &&
741 (op == OP_COMPOSE_EDIT_HEADERS ||
742 (op == OP_COMPOSE_EDIT_MESSAGE && option (OPTEDITHDRS))))
744 char *tag = NULL, *err = NULL;
745 mutt_env_to_local (msg->env);
746 mutt_edit_headers (NONULL (Editor), msg->content->filename, msg,
748 if (mutt_env_to_idna (msg->env, &tag, &err))
750 mutt_error (_("Bad IDN in \"%s\": '%s'"), tag, err);
756 /* this is grouped with OP_COMPOSE_EDIT_HEADERS because the
757 attachment list could change if the user invokes ~v to edit
758 the message with headers, in which we need to execute the
759 code below to regenerate the index array */
760 mutt_builtin_editor (msg->content->filename, msg, cur);
762 mutt_update_encoding (msg->content);
764 /* attachments may have been added */
765 if (idxlen && idx[idxlen - 1]->content->next)
767 for (i = 0; i < idxlen; i++)
770 idx = mutt_gen_attach_list (msg->content, -1, idx, &idxlen, &idxmax, 0, 1);
775 menu->redraw = REDRAW_FULL;
776 mutt_message_hook (NULL, msg, M_SEND2HOOK);
781 case OP_COMPOSE_ATTACH_KEY:
782 if (!(WithCrypto & APPLICATION_PGP))
784 if (idxlen == idxmax)
786 safe_realloc (&idx, sizeof (ATTACHPTR *) * (idxmax += 5));
790 idx[idxlen] = (ATTACHPTR *) safe_calloc (1, sizeof (ATTACHPTR));
791 if ((idx[idxlen]->content = crypt_pgp_make_key_attachment(NULL)) != NULL)
793 update_idx (menu, idx, idxlen++);
794 menu->redraw |= REDRAW_INDEX;
799 menu->redraw |= REDRAW_STATUS;
801 if (option(OPTNEEDREDRAW))
803 menu->redraw = REDRAW_FULL;
804 unset_option(OPTNEEDREDRAW);
807 mutt_message_hook (NULL, msg, M_SEND2HOOK);
811 case OP_COMPOSE_ATTACH_FILE:
813 char *prompt, **files;
817 prompt = _("Attach file");
821 if (_mutt_enter_fname (prompt, fname, sizeof (fname), &menu->redraw, 0, 1, &files, &numfiles) == -1 ||
825 if (idxlen + numfiles >= idxmax)
827 safe_realloc (&idx, sizeof (ATTACHPTR *) * (idxmax += 5 + numfiles));
833 mutt_message _("Attaching selected files...");
834 for (i = 0; i < numfiles; i++)
836 char *att = files[i];
837 idx[idxlen] = (ATTACHPTR *) safe_calloc (1, sizeof (ATTACHPTR));
838 idx[idxlen]->content = mutt_make_file_attach (att);
839 if (idx[idxlen]->content != NULL)
840 update_idx (menu, idx, idxlen++);
844 mutt_error (_("Unable to attach %s!"), att);
850 if (!error) mutt_clear_error ();
852 menu->redraw |= REDRAW_INDEX | REDRAW_STATUS;
854 mutt_message_hook (NULL, msg, M_SEND2HOOK);
857 case OP_COMPOSE_ATTACH_MESSAGE:
859 case OP_COMPOSE_ATTACH_NEWS_MESSAGE:
866 prompt = _("Open mailbox to attach message from");
869 unset_option (OPTNEWS);
870 if (op == OP_COMPOSE_ATTACH_NEWS_MESSAGE)
872 if (!(CurrentNewsSrv = mutt_select_newsserver (NewsServer)))
875 prompt = _("Open newsgroup to attach message from");
876 set_option (OPTNEWS);
882 if ((op == OP_COMPOSE_ATTACH_MESSAGE) ^ (Context->magic == M_NNTP))
885 strfcpy (fname, NONULL (Context->path), sizeof (fname));
886 mutt_pretty_mailbox (fname);
889 if (mutt_enter_fname (prompt, fname, sizeof (fname), &menu->redraw, 1) == -1 || !fname[0])
893 if (option (OPTNEWS))
894 nntp_expand_path (fname, sizeof (fname), &CurrentNewsSrv->conn->account);
897 mutt_expand_path (fname, sizeof (fname));
899 if (!mx_is_imap (fname))
902 if (!mx_is_pop (fname))
905 if (!mx_is_nntp (fname) && !option (OPTNEWS))
907 /* check to make sure the file exists and is readable */
908 if (access (fname, R_OK) == -1)
914 menu->redraw = REDRAW_FULL;
916 ctx = mx_open_mailbox (fname, M_READONLY, NULL);
925 mx_close_mailbox (ctx, NULL);
927 mutt_error _("No messages in that folder.");
931 this = Context; /* remember current folder and sort methods*/
932 oldSort = Sort; oldSortAux = SortAux;
935 set_option(OPTATTACHMSG);
936 mutt_message _("Tag the messages you want to attach!");
937 close = mutt_index_menu ();
938 unset_option(OPTATTACHMSG);
942 /* go back to the folder we started from */
944 /* Restore old $sort and $sort_aux */
946 SortAux = oldSortAux;
947 menu->redraw |= REDRAW_INDEX | REDRAW_STATUS;
951 if (idxlen + Context->tagged >= idxmax)
953 safe_realloc (&idx, sizeof (ATTACHPTR *) * (idxmax += 5 + Context->tagged));
957 for (i = 0; i < Context->msgcount; i++)
959 h = Context->hdrs[i];
962 idx[idxlen] = (ATTACHPTR *) safe_calloc (1, sizeof (ATTACHPTR));
963 idx[idxlen]->content = mutt_make_message_attach (Context, h, 1);
964 if (idx[idxlen]->content != NULL)
965 update_idx (menu, idx, idxlen++);
968 mutt_error _("Unable to attach!");
973 menu->redraw |= REDRAW_FULL;
975 if (close == OP_QUIT)
976 mx_close_mailbox (Context, NULL);
978 mx_fastclose_mailbox (Context);
981 /* go back to the folder we started from */
983 /* Restore old $sort and $sort_aux */
985 SortAux = oldSortAux;
987 mutt_message_hook (NULL, msg, M_SEND2HOOK);
992 if (delete_attachment (menu, &idxlen, menu->current) == -1)
994 mutt_update_tree (idx, idxlen);
997 if (menu->current > idxlen - 1)
998 menu->current = idxlen - 1;
1003 if (menu->current == 0)
1004 msg->content = idx[0]->content;
1006 menu->redraw |= REDRAW_STATUS;
1007 mutt_message_hook (NULL, msg, M_SEND2HOOK);
1010 #define CURRENT idx[menu->current]->content
1012 case OP_COMPOSE_TOGGLE_RECODE:
1015 if (!mutt_is_text_part (CURRENT))
1017 mutt_error (_("Recoding only affects text attachments."));
1020 CURRENT->noconv = !CURRENT->noconv;
1021 if (CURRENT->noconv)
1022 mutt_message (_("The current attachment won't be converted."));
1024 mutt_message (_("The current attachment will be converted."));
1025 menu->redraw = REDRAW_CURRENT;
1026 mutt_message_hook (NULL, msg, M_SEND2HOOK);
1031 case OP_COMPOSE_EDIT_DESCRIPTION:
1034 idx[menu->current]->content->description ?
1035 idx[menu->current]->content->description : "",
1037 /* header names should not be translated */
1038 if (mutt_get_field ("Description: ", buf, sizeof (buf), 0) == 0)
1040 mutt_str_replace (&idx[menu->current]->content->description, buf);
1041 menu->redraw = REDRAW_CURRENT;
1043 mutt_message_hook (NULL, msg, M_SEND2HOOK);
1046 case OP_COMPOSE_UPDATE_ENCODING:
1048 if (menu->tagprefix)
1051 for (top = msg->content; top; top = top->next)
1054 mutt_update_encoding (top);
1056 menu->redraw = REDRAW_FULL;
1060 mutt_update_encoding(idx[menu->current]->content);
1061 menu->redraw = REDRAW_CURRENT | REDRAW_STATUS;
1063 mutt_message_hook (NULL, msg, M_SEND2HOOK);
1066 case OP_COMPOSE_TOGGLE_DISPOSITION:
1067 /* toggle the content-disposition between inline/attachment */
1068 idx[menu->current]->content->disposition = (idx[menu->current]->content->disposition == DISPINLINE) ? DISPATTACH : DISPINLINE;
1069 menu->redraw = REDRAW_CURRENT;
1075 mutt_edit_content_type (NULL, idx[menu->current]->content, NULL);
1077 /* this may have been a change to text/something */
1078 mutt_update_encoding (idx[menu->current]->content);
1080 menu->redraw = REDRAW_CURRENT;
1082 mutt_message_hook (NULL, msg, M_SEND2HOOK);
1085 case OP_COMPOSE_EDIT_ENCODING:
1087 strfcpy (buf, ENCODING (idx[menu->current]->content->encoding),
1089 if (mutt_get_field ("Content-Transfer-Encoding: ", buf,
1090 sizeof (buf), 0) == 0 && buf[0])
1092 if ((i = mutt_check_encoding (buf)) != ENCOTHER && i != ENCUUENCODED)
1094 idx[menu->current]->content->encoding = i;
1095 menu->redraw = REDRAW_CURRENT | REDRAW_STATUS;
1099 mutt_error _("Invalid encoding.");
1101 mutt_message_hook (NULL, msg, M_SEND2HOOK);
1104 case OP_COMPOSE_SEND_MESSAGE:
1106 /* Note: We don't invoke send2-hook here, since we want to leave
1107 * users an opportunity to change settings from the ":" prompt.
1110 if(check_attachments(idx, idxlen) != 0)
1112 menu->redraw = REDRAW_FULL;
1118 if (msg->chain && mix_check_message (msg) != 0)
1122 if (!fccSet && *fcc)
1124 if ((i = query_quadoption (OPT_COPY,
1125 _("Save a copy of this message?"))) == -1)
1135 case OP_COMPOSE_EDIT_FILE:
1137 mutt_edit_file (NONULL(Editor), idx[menu->current]->content->filename);
1138 mutt_update_encoding (idx[menu->current]->content);
1139 menu->redraw = REDRAW_CURRENT | REDRAW_STATUS;
1140 mutt_message_hook (NULL, msg, M_SEND2HOOK);
1143 case OP_COMPOSE_TOGGLE_UNLINK:
1145 idx[menu->current]->content->unlink = !idx[menu->current]->content->unlink;
1148 /* OPTRESOLVE is otherwise ignored on this menu.
1152 if (option (OPTRESOLVE) && menu->current + 1 < menu->max)
1155 menu->redraw = REDRAW_INDEX;
1156 /* No send2hook since this doesn't change the message. */
1159 case OP_COMPOSE_GET_ATTACHMENT:
1164 for(top = msg->content; top; top = top->next)
1167 mutt_get_tmp_attachment(top);
1169 menu->redraw = REDRAW_FULL;
1171 else if (mutt_get_tmp_attachment(idx[menu->current]->content) == 0)
1172 menu->redraw = REDRAW_CURRENT;
1174 /* No send2hook since this doesn't change the message. */
1177 case OP_COMPOSE_RENAME_FILE:
1179 strfcpy (fname, idx[menu->current]->content->filename, sizeof (fname));
1180 mutt_pretty_mailbox (fname);
1181 if (mutt_get_field (_("Rename to: "), fname, sizeof (fname), M_FILE)
1184 if (stat(idx[menu->current]->content->filename, &st) == -1)
1186 mutt_error (_("Can't stat %s: %s"), fname, strerror (errno));
1190 mutt_expand_path (fname, sizeof (fname));
1191 if(mutt_rename_file (idx[menu->current]->content->filename, fname))
1194 mutt_str_replace (&idx[menu->current]->content->filename, fname);
1195 menu->redraw = REDRAW_CURRENT;
1197 if(idx[menu->current]->content->stamp >= st.st_mtime)
1198 mutt_stamp_attachment(idx[menu->current]->content);
1201 mutt_message_hook (NULL, msg, M_SEND2HOOK);
1204 case OP_COMPOSE_NEW_MIME:
1211 CLEARLINE (LINES-1);
1213 if (mutt_get_field (_("New file: "), fname, sizeof (fname), M_FILE)
1216 mutt_expand_path (fname, sizeof (fname));
1218 /* Call to lookup_mime_type () ? maybe later */
1220 if (mutt_get_field ("Content-Type: ", type, sizeof (type), 0) != 0
1224 if (!(p = strchr (type, '/')))
1226 mutt_error _("Content-Type is of the form base/sub");
1230 if ((itype = mutt_check_mime_type (type)) == TYPEOTHER)
1232 mutt_error (_("Unknown Content-Type %s"), type);
1235 if (idxlen == idxmax)
1237 safe_realloc (&idx, sizeof (ATTACHPTR *) * (idxmax += 5));
1241 idx[idxlen] = (ATTACHPTR *) safe_calloc (1, sizeof (ATTACHPTR));
1242 /* Touch the file */
1243 if (!(fp = safe_fopen (fname, "w")))
1245 mutt_error (_("Can't create file %s"), fname);
1246 FREE (&idx[idxlen]);
1251 if ((idx[idxlen]->content = mutt_make_file_attach (fname)) == NULL)
1253 mutt_error _("What we have here is a failure to make an attachment");
1256 update_idx (menu, idx, idxlen++);
1258 idx[menu->current]->content->type = itype;
1259 mutt_str_replace (&idx[menu->current]->content->subtype, p);
1260 idx[menu->current]->content->unlink = 1;
1261 menu->redraw |= REDRAW_INDEX | REDRAW_STATUS;
1263 if (mutt_compose_attachment (idx[menu->current]->content))
1265 mutt_update_encoding (idx[menu->current]->content);
1266 menu->redraw = REDRAW_FULL;
1269 mutt_message_hook (NULL, msg, M_SEND2HOOK);
1272 case OP_COMPOSE_EDIT_MIME:
1274 if (mutt_edit_attachment (idx[menu->current]->content))
1276 mutt_update_encoding (idx[menu->current]->content);
1277 menu->redraw = REDRAW_FULL;
1279 mutt_message_hook (NULL, msg, M_SEND2HOOK);
1282 case OP_VIEW_ATTACH:
1283 case OP_DISPLAY_HEADERS:
1285 mutt_attach_display_loop (menu, op, NULL, NULL, NULL, &idx, &idxlen, NULL, 0);
1286 menu->redraw = REDRAW_FULL;
1287 /* no send2hook, since this doesn't modify the message */
1292 mutt_save_attachment_list (NULL, menu->tagprefix, menu->tagprefix ? msg->content : idx[menu->current]->content, NULL, menu);
1293 MAYBE_REDRAW (menu->redraw);
1294 /* no send2hook, since this doesn't modify the message */
1299 mutt_print_attachment_list (NULL, menu->tagprefix, menu->tagprefix ? msg->content : idx[menu->current]->content);
1300 /* no send2hook, since this doesn't modify the message */
1306 mutt_pipe_attachment_list (NULL, menu->tagprefix, menu->tagprefix ? msg->content : idx[menu->current]->content, op == OP_FILTER);
1307 if (op == OP_FILTER) /* cte might have changed */
1308 menu->redraw = menu->tagprefix ? REDRAW_FULL : REDRAW_CURRENT;
1309 menu->redraw |= REDRAW_STATUS;
1310 mutt_message_hook (NULL, msg, M_SEND2HOOK);
1314 if ((i = query_quadoption (OPT_POSTPONE, _("Postpone this message?"))) == M_NO)
1316 while (idxlen-- > 0)
1318 /* avoid freeing other attachments */
1319 idx[idxlen]->content->next = NULL;
1320 idx[idxlen]->content->parts = NULL;
1321 mutt_free_body (&idx[idxlen]->content);
1322 FREE (&idx[idxlen]->tree);
1323 FREE (&idx[idxlen]);
1335 /* fall through to postpone! */
1337 case OP_COMPOSE_POSTPONE_MESSAGE:
1339 if(check_attachments(idx, idxlen) != 0)
1341 menu->redraw = REDRAW_FULL;
1349 case OP_COMPOSE_ISPELL:
1351 snprintf (buf, sizeof (buf), "%s -x %s", NONULL(Ispell), msg->content->filename);
1352 if (mutt_system (buf) == -1)
1353 mutt_error (_("Error running \"%s\"!"), buf);
1356 mutt_update_encoding (msg->content);
1357 menu->redraw |= REDRAW_STATUS;
1361 case OP_COMPOSE_WRITE_MESSAGE:
1366 strfcpy (fname, NONULL (Context->path), sizeof (fname));
1367 mutt_pretty_mailbox (fname);
1370 msg->content = idx[0]->content;
1371 if (mutt_enter_fname (_("Write message to mailbox"), fname, sizeof (fname),
1372 &menu->redraw, 1) != -1 && fname[0])
1374 mutt_message (_("Writing message to %s ..."), fname);
1375 mutt_expand_path (fname, sizeof (fname));
1377 if (msg->content->next)
1378 msg->content = mutt_make_multipart (msg->content);
1380 if (mutt_write_fcc (NONULL (fname), msg, NULL, 1, NULL) < 0)
1381 msg->content = mutt_remove_multipart (msg->content);
1383 mutt_message _("Message written.");
1389 case OP_COMPOSE_PGP_MENU:
1390 if (!(WithCrypto & APPLICATION_PGP))
1392 if ((WithCrypto & APPLICATION_SMIME)
1393 && msg->security & APPLICATION_SMIME)
1395 if (mutt_yesorno (_("S/MIME already selected. Clear & continue ? "),
1398 mutt_clear_error ();
1403 msg->security = crypt_pgp_send_menu (msg, &menu->redraw);
1404 redraw_crypt_lines (msg);
1405 mutt_message_hook (NULL, msg, M_SEND2HOOK);
1409 case OP_FORGET_PASSPHRASE:
1410 crypt_forget_passphrase ();
1414 case OP_COMPOSE_SMIME_MENU:
1415 if (!(WithCrypto & APPLICATION_SMIME))
1418 if ((WithCrypto & APPLICATION_PGP)
1419 && msg->security & APPLICATION_PGP)
1421 if (mutt_yesorno (_("PGP already selected. Clear & continue ? "),
1424 mutt_clear_error ();
1429 msg->security = crypt_smime_send_menu(msg, &menu->redraw);
1430 redraw_crypt_lines (msg);
1431 mutt_message_hook (NULL, msg, M_SEND2HOOK);
1436 case OP_COMPOSE_MIX:
1438 mix_make_chain (&msg->chain, &menu->redraw);
1439 mutt_message_hook (NULL, msg, M_SEND2HOOK);
1445 /* Draw formated compose status line */
1446 if (menu->redraw & REDRAW_STATUS)
1448 compose_status_line (buf, sizeof (buf), menu, NONULL(ComposeFormat));
1449 CLEARLINE (option (OPTSTATUSONTOP) ? 0 : LINES-2);
1450 SETCOLOR (MT_COLOR_STATUS);
1451 printw ("%-*.*s", COLS, COLS, buf);
1452 SETCOLOR (MT_COLOR_NORMAL);
1453 menu->redraw &= ~REDRAW_STATUS;
1457 mutt_menuDestroy (&menu);
1461 msg->content = idx[0]->content;
1462 for (i = 0; i < idxlen; i++)
1464 idx[i]->content->aptr = NULL;
1469 msg->content = NULL;