2 * Copyright (C) 1996-2000 Michael R. Elkins <me@mutt.org>
4 * This program is free software; you can redistribute it and/or modify
5 * it under the terms of the GNU General Public License as published by
6 * the Free Software Foundation; either version 2 of the License, or
7 * (at your option) any later version.
9 * This program is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 * GNU General Public License for more details.
14 * You should have received a copy of the GNU General Public License
15 * along with this program; if not, write to the Free Software
16 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111, USA.
24 #include "mutt_curses.h"
26 #include "mutt_menu.h"
39 #include "imap_private.h"
42 #include "mutt_crypt.h"
57 static const char *No_mailbox_is_open = N_("No mailbox is open.");
58 static const char *There_are_no_messages = N_("There are no messages.");
59 static const char *Mailbox_is_read_only = N_("Mailbox is read-only.");
60 static const char *Function_not_permitted_in_attach_message_mode = N_("Function not permitted in attach-message mode.");
61 static const char *No_visible = N_("No visible messages.");
63 #define CHECK_MSGCOUNT if (!Context) \
66 mutt_error _(No_mailbox_is_open); \
69 else if (!Context->msgcount) \
72 mutt_error _(There_are_no_messages); \
76 #define CHECK_VISIBLE if (Context && menu->current >= Context->vcount) \
79 mutt_error _(No_visible); \
84 #define CHECK_READONLY if (Context->readonly) \
87 mutt_error _(Mailbox_is_read_only); \
92 /* the error message returned here could be better. */
93 #define CHECK_IMAP_ACL(aclbit) if (Context->magic == M_IMAP) \
94 if (mutt_bit_isset (((IMAP_DATA *)Context->data)->capabilities, ACL) \
95 && !mutt_bit_isset(((IMAP_DATA *)Context->data)->rights,aclbit)){ \
97 mutt_error ("Operation not permitted by the IMAP ACL for this mailbox"); \
102 #define CHECK_ATTACH if(option(OPTATTACHMSG)) \
105 mutt_error _(Function_not_permitted_in_attach_message_mode); \
109 #define CURHDR Context->hdrs[Context->v2r[menu->current]]
110 #define OLDHDR Context->hdrs[Context->v2r[menu->oldcurrent]]
111 #define UNREAD(h) mutt_thread_contains_unread (Context, h)
113 extern const char *ReleaseDate;
114 extern size_t UngetCount;
116 static void set_xterm_title_bar(char *title)
118 fputs("\033]2;", stdout);
119 fputs(title, stdout);
120 fputs("\007", stdout);
124 static void set_xterm_icon_name(char *name)
126 fputs("\033]1;", stdout);
128 fputs("\007", stdout);
132 void index_make_entry (char *s, size_t l, MUTTMENU *menu, int num)
134 format_flag flag = M_FORMAT_MAKEPRINT | M_FORMAT_ARROWCURSOR | M_FORMAT_INDEX;
135 int edgemsgno, reverse = Sort & SORT_REVERSE;
136 HEADER *h = Context->hdrs[Context->v2r[num]];
139 if ((Sort & SORT_MASK) == SORT_THREADS && h->tree)
141 flag |= M_FORMAT_TREE; /* display the thread tree */
142 if (h->display_subject)
143 flag |= M_FORMAT_FORCESUBJ;
148 if (menu->top + menu->pagelen > menu->max)
149 edgemsgno = Context->v2r[menu->max - 1];
151 edgemsgno = Context->v2r[menu->top + menu->pagelen - 1];
154 edgemsgno = Context->v2r[menu->top];
156 for (tmp = h->thread->parent; tmp; tmp = tmp->parent)
161 /* if no ancestor is visible on current screen, provisionally force
163 if (reverse ? tmp->message->msgno > edgemsgno : tmp->message->msgno < edgemsgno)
165 flag |= M_FORMAT_FORCESUBJ;
168 else if (tmp->message->virtual >= 0)
171 if (flag & M_FORMAT_FORCESUBJ)
173 for (tmp = h->thread->prev; tmp; tmp = tmp->prev)
178 /* ...but if a previous sibling is available, don't force it */
179 if (reverse ? tmp->message->msgno > edgemsgno : tmp->message->msgno < edgemsgno)
181 else if (tmp->message->virtual >= 0)
183 flag &= ~M_FORMAT_FORCESUBJ;
191 _mutt_make_string (s, l, NONULL (HdrFmt), Context, h, flag);
194 int index_color (int index_no)
196 HEADER *h = Context->hdrs[Context->v2r[index_no]];
201 mutt_set_header_color (Context, h);
205 static int ci_next_undeleted (int msgno)
209 for (i=msgno+1; i < Context->vcount; i++)
210 if (! Context->hdrs[Context->v2r[i]]->deleted)
215 static int ci_previous_undeleted (int msgno)
219 for (i=msgno-1; i>=0; i--)
220 if (! Context->hdrs[Context->v2r[i]]->deleted)
225 /* Return the index of the first new message, or failing that, the first
228 static int ci_first_message (void)
232 if (Context && Context->msgcount)
234 for (i=0; i < Context->vcount; i++)
236 if (! Context->hdrs[Context->v2r[i]]->read &&
237 ! Context->hdrs[Context->v2r[i]]->deleted)
239 if (! Context->hdrs[Context->v2r[i]]->old)
248 /* If Sort is reverse and not threaded, the latest message is first.
249 * If Sort is threaded, the latest message is first iff exactly one
250 * of Sort and SortAux are reverse.
252 if (((Sort & SORT_REVERSE) && (Sort & SORT_MASK) != SORT_THREADS) ||
253 ((Sort & SORT_MASK) == SORT_THREADS &&
254 ((Sort ^ SortAux) & SORT_REVERSE)))
257 return (Context->vcount ? Context->vcount - 1 : 0);
262 /* This should be in mx.c, but it only gets used here. */
263 static int mx_toggle_write (CONTEXT *ctx)
270 mutt_error _("Cannot toggle write on a readonly mailbox!");
277 mutt_message _("Changes to folder will be written on folder exit.");
282 mutt_message _("Changes to folder will not be written.");
288 static void update_index (MUTTMENU *menu, CONTEXT *ctx, int check,
289 int oldcount, int index_hint)
291 /* store pointers to the newly added messages */
292 HEADER **save_new = NULL;
295 /* take note of the current message */
298 if (menu->current < Context->vcount)
299 menu->oldcurrent = index_hint;
301 oldcount = 0; /* invalid message number! */
304 /* We are in a limited view. Check if the new message(s) satisfy
305 * the limit criteria. If they do, set their virtual msgno so that
306 * they will be visible in the limited view */
307 if (Context->pattern)
309 #define THIS_BODY Context->hdrs[j]->content
310 if (oldcount || check == M_REOPENED)
312 for (j = (check == M_REOPENED) ? 0 : oldcount; j < Context->msgcount; j++)
314 if (mutt_pattern_exec (Context->limit_pattern,
315 M_MATCH_FULL_ADDRESS,
316 Context, Context->hdrs[j]))
318 Context->hdrs[j]->virtual = Context->vcount;
319 Context->v2r[Context->vcount] = j;
320 Context->hdrs[j]->limited = 1;
322 Context->vsize += THIS_BODY->length + THIS_BODY->offset - THIS_BODY->hdr_offset;
329 /* save the list of new messages */
330 if (oldcount && check != M_REOPENED
331 && ((Sort & SORT_MASK) == SORT_THREADS))
333 save_new = (HEADER **) safe_malloc (sizeof (HEADER *) * (Context->msgcount - oldcount));
334 for (j = oldcount; j < Context->msgcount; j++)
335 save_new[j-oldcount] = Context->hdrs[j];
338 /* if the mailbox was reopened, need to rethread from scratch */
339 mutt_sort_headers (Context, (check == M_REOPENED));
341 /* uncollapse threads with new mail */
342 if ((Sort & SORT_MASK) == SORT_THREADS)
344 if (check == M_REOPENED)
348 Context->collapsed = 0;
350 for (h = Context->tree; h; h = h->next)
352 for (j = h; !j->message; j = j->child)
354 mutt_uncollapse_thread (Context, j->message);
356 mutt_set_virtual (Context);
360 for (j = 0; j < Context->msgcount - oldcount; j++)
364 for (k = 0; k < Context->msgcount; k++)
366 HEADER *h = Context->hdrs[k];
367 if (h == save_new[j] && (!Context->pattern || h->limited))
368 mutt_uncollapse_thread (Context, h);
372 mutt_set_virtual (Context);
379 /* restore the current message to the message it was pointing to */
380 for (j = 0; j < Context->vcount; j++)
382 if (Context->hdrs[Context->v2r[j]]->index == menu->oldcurrent)
390 if (menu->current < 0)
391 menu->current = ci_first_message ();
395 static void resort_index (MUTTMENU *menu)
398 HEADER *current = CURHDR;
401 mutt_sort_headers (Context, 0);
402 /* Restore the current message */
404 for (i = 0; i < Context->vcount; i++)
406 if (Context->hdrs[Context->v2r[i]] == current)
413 if ((Sort & SORT_MASK) == SORT_THREADS && menu->current < 0)
414 menu->current = mutt_parent_message (Context, current);
416 if (menu->current < 0)
417 menu->current = ci_first_message ();
419 menu->redraw = REDRAW_INDEX | REDRAW_STATUS;
422 struct mapping_t IndexHelp[] = {
423 { N_("Quit"), OP_QUIT },
424 { N_("Del"), OP_DELETE },
425 { N_("Undel"), OP_UNDELETE },
426 { N_("Save"), OP_SAVE },
427 { N_("Mail"), OP_MAIL },
428 { N_("Reply"), OP_REPLY },
429 { N_("Group"), OP_GROUP_REPLY },
430 { N_("Help"), OP_HELP },
435 struct mapping_t IndexNewsHelp[] = {
436 { N_("Quit"), OP_QUIT },
437 { N_("Del"), OP_DELETE },
438 { N_("Undel"), OP_UNDELETE },
439 { N_("Save"), OP_SAVE },
440 { N_("Post"), OP_POST },
441 { N_("Followup"), OP_FOLLOWUP },
442 { N_("Catchup"), OP_CATCHUP },
443 { N_("Help"), OP_HELP },
448 /* This function handles the message index window as well as commands returned
449 * from the pager (MENU_PAGER).
451 int mutt_index_menu (void)
453 char buf[LONG_STRING], helpstr[SHORT_STRING];
456 int done = 0; /* controls when to exit the "event" loop */
458 int tag = 0; /* has the tag-prefix command been pressed? */
463 char *cp; /* temporary variable. */
464 int index_hint; /* used to restore cursor position */
465 int do_buffy_notify = 1;
466 int close = 0; /* did we OP_QUIT or OP_EXIT out of this menu? */
467 int attach_msg = option(OPTATTACHMSG);
469 menu = mutt_new_menu ();
470 menu->menu = MENU_MAIN;
472 menu->pagelen = LINES - 3;
473 menu->make_entry = index_make_entry;
474 menu->color = index_color;
475 menu->current = ci_first_message ();
476 menu->help = mutt_compile_help (helpstr, sizeof (helpstr), MENU_MAIN,
478 (Context && (Context->magic == M_NNTP)) ? IndexNewsHelp :
483 mutt_buffy_check(1); /* force the buffy check after we enter the folder */
487 tag = 0; /* clear the tag-prefix */
489 menu->max = Context ? Context->vcount : 0;
490 oldcount = Context ? Context->msgcount : 0;
492 /* check if we need to resort the index because just about
493 * any 'op' below could do mutt_enter_command(), either here or
494 * from any new menu launched, and change $sort/$sort_aux
496 if (option (OPTNEEDRESORT) && Context && Context->msgcount)
499 if (option (OPTREDRAWTREE) && Context && Context->msgcount && (Sort & SORT_MASK) == SORT_THREADS)
501 mutt_draw_tree (Context);
502 menu->redraw |= REDRAW_STATUS;
503 unset_option (OPTREDRAWTREE);
506 if (Context && !attach_msg)
509 /* check for new mail in the mailbox. If nonzero, then something has
510 * changed about the file (either we got new mail or the file was
511 * modified underneath us.)
515 imap_allow_reopen (Context);
518 index_hint = (Context->vcount && menu->current >= 0 && menu->current < Context->vcount) ? CURHDR->index : 0;
520 if ((check = mx_check_mailbox (Context, &index_hint, 0)) < 0)
524 /* fatal error occurred */
526 menu->redraw = REDRAW_FULL;
529 set_option (OPTSEARCHINVALID);
531 else if (check == M_NEW_MAIL || check == M_REOPENED || check == M_FLAGS)
533 update_index (menu, Context, check, oldcount, index_hint);
535 /* notify the user of new mail */
536 if (check == M_REOPENED)
537 mutt_error _("Mailbox was externally modified. Flags may be wrong.");
538 else if (check == M_NEW_MAIL)
540 mutt_message _("New mail in this mailbox.");
541 if (option (OPTBEEPNEW))
543 } else if (check == M_FLAGS)
544 mutt_message _("Mailbox was externally modified.");
546 /* avoid the message being overwritten by buffy */
549 menu->redraw = REDRAW_FULL;
550 menu->max = Context->vcount;
552 set_option (OPTSEARCHINVALID);
558 imap_disallow_reopen (Context);
563 /* check for new mail in the incoming folders */
565 if ((newcount = mutt_buffy_check (0)) != oldcount)
566 menu->redraw |= REDRAW_STATUS;
569 if (mutt_buffy_notify () && option (OPTBEEPNEW))
579 if (menu->redraw & REDRAW_FULL)
581 menu_redraw_full (menu);
582 draw_sidebar(menu->menu);
586 if (menu->menu == MENU_MAIN)
588 if (Context && Context->hdrs && !(menu->current >= Context->vcount))
590 menu_check_recenter (menu);
592 if (menu->redraw & REDRAW_INDEX)
594 menu_redraw_index (menu);
595 menu->redraw |= REDRAW_STATUS;
597 else if (menu->redraw & (REDRAW_MOTION_RESYNCH | REDRAW_MOTION))
598 menu_redraw_motion (menu);
599 else if (menu->redraw & REDRAW_CURRENT)
600 menu_redraw_current (menu);
603 if (menu->redraw & REDRAW_STATUS)
606 menu_status_line (buf, sizeof (buf), menu, NONULL (Status));
608 CLEARLINE (option (OPTSTATUSONTOP) ? 0 : LINES-2);
609 SETCOLOR (MT_COLOR_STATUS);
610 mutt_paddstr (COLS, buf);
611 SETCOLOR (MT_COLOR_NORMAL);
612 menu->redraw &= ~REDRAW_STATUS;
613 if (option(OPTXTERMSETTITLES))
615 menu_status_line (buf, sizeof (buf), menu, NONULL (XtermTitle));
616 set_xterm_title_bar(buf);
617 menu_status_line (buf, sizeof (buf), menu, NONULL (XtermIcon));
618 set_xterm_icon_name(buf);
623 if (menu->current < menu->max)
624 menu->oldcurrent = menu->current;
626 menu->oldcurrent = -1;
628 if (option (OPTARROWCURSOR))
629 move (menu->current - menu->top + menu->offset, 2);
631 move (menu->current - menu->top + menu->offset, COLS - 1);
634 op = km_dokey (MENU_MAIN);
636 dprint(4, (debugfile, "mutt_index_menu[%d]: Got op %d\n", __LINE__, op));
638 #if defined (USE_SLANG_CURSES) || defined (HAVE_RESIZETERM)
642 mutt_resize_screen ();
643 menu->redraw = REDRAW_FULL;
644 menu->menu = MENU_MAIN;
646 menu->top = 0; /* so we scroll the right amount */
648 * force a real complete redraw. clrtobot() doesn't seem to be able
649 * to handle every case without this.
651 clearok(stdscr,TRUE);
657 continue; /* either user abort or timeout */
661 /* special handling for the tag-prefix function */
662 if (op == OP_TAG_PREFIX)
666 mutt_error _("No mailbox is open.");
670 if (!Context->tagged)
672 mutt_error _("No tagged messages.");
677 /* give visual indication that the next command is a tag- command */
678 mvaddstr (LINES - 1, 0, "tag-");
681 /* get the real command */
682 if ((op = km_dokey (MENU_MAIN)) == OP_TAG_PREFIX)
684 /* abort tag sequence */
689 else if (option (OPTAUTOTAG) && Context && Context->tagged)
692 if (op == OP_TAG_PREFIX_COND)
696 mutt_error _("No mailbox is open.");
700 if (!Context->tagged)
706 if(tmp.op==OP_END_COND)break;
708 mutt_message _("Nothing to do.");
713 /* give visual indication that the next command is a tag- command */
714 mvaddstr (LINES - 1, 0, "tag-");
717 /* get the real command */
718 if ((op = km_dokey (MENU_MAIN)) == OP_TAG_PREFIX)
720 /* abort tag sequence */
730 if (menu->current < menu->max)
731 menu->oldcurrent = menu->current;
733 menu->oldcurrent = -1;
735 mutt_curs_set (1); /* fallback from the pager */
739 unset_option (OPTNEWS); /* for any case */
745 /* ----------------------------------------------------------------------
750 menu_bottom_page (menu);
753 menu_first_entry (menu);
756 menu_middle_page (menu);
762 menu_half_down (menu);
765 menu_next_line (menu);
768 menu_prev_line (menu);
771 menu_next_page (menu);
774 menu_prev_page (menu);
777 menu_last_entry (menu);
780 menu_top_page (menu);
783 menu_current_top (menu);
785 case OP_CURRENT_MIDDLE:
786 menu_current_middle (menu);
788 case OP_CURRENT_BOTTOM:
789 menu_current_bottom (menu);
796 if (Context->magic == M_NNTP)
800 if (op == OP_GET_MESSAGE)
803 if (mutt_get_field (_("Enter Message-Id: "), buf, sizeof (buf), 0) != 0
809 LIST *ref = CURHDR->env->references;
812 mutt_error _("Article has no parent reference!");
815 strfcpy (buf, ref->data, sizeof (buf));
817 if (!Context->id_hash)
818 Context->id_hash = mutt_make_id_hash (Context);
819 if ((h = hash_find (Context->id_hash, buf)))
821 if (h->virtual != -1)
823 menu->current = h->virtual;
824 menu->redraw = REDRAW_MOTION_RESYNCH;
826 else if (h->collapsed)
828 mutt_uncollapse_thread (Context, h);
829 mutt_set_virtual (Context);
830 menu->current = h->virtual;
831 menu->redraw = REDRAW_MOTION_RESYNCH;
834 mutt_error _("Message not visible in limited view.");
838 if (nntp_check_msgid (Context, buf) == 0)
840 h = Context->hdrs[Context->msgcount-1];
841 mutt_sort_headers (Context, 0);
842 menu->current = h->virtual;
843 menu->redraw = REDRAW_FULL;
846 mutt_error (_("Article %s not found on server"), buf);
851 case OP_GET_CHILDREN:
852 case OP_RECONSTRUCT_THREAD:
854 if (Context->magic == M_NNTP)
857 int old = CURHDR->index, i;
859 if (!CURHDR->env->message_id)
861 mutt_error _("No Message-Id. Unable to perform operation");
865 if (!Context->id_hash)
866 Context->id_hash = mutt_make_id_hash (Context);
867 strfcpy (buf, CURHDR->env->message_id, sizeof (buf));
869 if (op == OP_RECONSTRUCT_THREAD)
871 LIST *ref = CURHDR->env->references;
874 nntp_check_msgid (Context, ref->data);
875 /* the last msgid in References is the root message */
877 strfcpy (buf, ref->data, sizeof (buf));
881 mutt_message _("Check for children of message...");
882 if (nntp_check_children (Context, buf) == 0)
884 mutt_sort_headers (Context, (op == OP_RECONSTRUCT_THREAD));
885 h = hash_find (Context->id_hash, buf);
886 /* if the root message was retrieved, move to it */
888 menu->current = h->virtual;
889 else /* try to restore old position */
890 for (i = 0; i < Context->msgcount; i++)
891 if (Context->hdrs[i]->index == old)
893 menu->current = Context->hdrs[i]->virtual;
894 /* As an added courtesy, recenter the menu
895 * with the current entry at the middle of the screen */
896 menu_check_recenter (menu);
897 menu_current_middle (menu);
900 menu->redraw = REDRAW_FULL;
910 if (isdigit (LastKey)) mutt_ungetch (LastKey, 0);
912 if (mutt_get_field (_("Jump to message: "), buf, sizeof (buf), 0) != 0
916 if (! isdigit ((unsigned char) buf[0]))
918 mutt_error _("Argument must be a message number.");
923 if (i > 0 && i <= Context->msgcount)
925 for (j = i-1; j < Context->msgcount; j++)
927 if (Context->hdrs[j]->virtual != -1)
930 if (j >= Context->msgcount)
932 for (j = i-2; j >= 0; j--)
934 if (Context->hdrs[j]->virtual != -1)
941 menu->current = Context->hdrs[j]->virtual;
942 if (menu->menu == MENU_PAGER)
944 op = OP_DISPLAY_MESSAGE;
948 menu->redraw = REDRAW_MOTION;
951 mutt_error _("That message is not visible.");
954 mutt_error _("Invalid message number.");
958 /* --------------------------------------------------------------------
959 * `index' specific commands
962 case OP_MAIN_DELETE_PATTERN:
969 CHECK_IMAP_ACL(IMAP_ACL_DELETE);
973 mutt_pattern_func (M_DELETE, _("Delete messages matching: "));
974 menu->redraw = REDRAW_INDEX | REDRAW_STATUS;
978 case OP_MAIN_FETCH_MAIL:
982 menu->redraw = REDRAW_FULL;
988 mutt_help (MENU_MAIN);
989 menu->redraw = REDRAW_FULL;
992 case OP_MAIN_SHOW_LIMIT:
994 if (!Context->pattern)
995 mutt_message _("No limit pattern is in effect.");
999 /* i18n: ask for a limit to apply */
1000 snprintf (buf, sizeof(buf), _("Limit: %s"),Context->pattern);
1001 mutt_message ("%s", buf);
1006 case OP_TOGGLE_READ:
1009 menu->oldcurrent = (Context->vcount && menu->current >= 0 && menu->current < Context->vcount) ?
1011 if (op == OP_TOGGLE_READ)
1013 char buf[LONG_STRING];
1015 if (!Context->pattern || strncmp (Context->pattern, "!~R!~D~s", 8) != 0)
1017 snprintf (buf, sizeof (buf), "!~R!~D~s%s",
1018 Context->pattern ? Context->pattern : ".*");
1019 set_option (OPTHIDEREAD);
1023 strfcpy (buf, Context->pattern + 8, sizeof(buf));
1024 if (!*buf || strncmp (buf, ".*", 2) == 0)
1025 snprintf (buf, sizeof(buf), "~A");
1026 unset_option (OPTHIDEREAD);
1028 FREE (&Context->pattern);
1029 Context->pattern = safe_strdup (buf);
1031 if ((op == OP_TOGGLE_READ && mutt_pattern_func (M_LIMIT, NULL) == 0) ||
1032 mutt_pattern_func (M_LIMIT, _("Limit to messages matching: ")) == 0)
1034 if (menu->oldcurrent >= 0)
1036 /* try to find what used to be the current message */
1038 for (i = 0; i < Context->vcount; i++)
1039 if (Context->hdrs[Context->v2r[i]]->index == menu->oldcurrent)
1044 if (menu->current < 0) menu->current = 0;
1048 menu->redraw = REDRAW_INDEX | REDRAW_STATUS;
1049 if ((Sort & SORT_MASK) == SORT_THREADS)
1050 mutt_draw_tree (Context);
1051 menu->redraw = REDRAW_FULL;
1064 if (query_quadoption (OPT_QUIT, _("Quit Mutt?")) == M_YES)
1068 oldcount = Context ? Context->msgcount : 0;
1070 if (!Context || (check = mx_close_mailbox (Context, &index_hint)) == 0)
1074 if (check == M_NEW_MAIL || check == M_REOPENED)
1075 update_index (menu, Context, check, oldcount, index_hint);
1077 menu->redraw = REDRAW_FULL; /* new mail arrived? */
1078 set_option (OPTSEARCHINVALID);
1085 clearok (stdscr, TRUE);
1086 menu->redraw = REDRAW_FULL;
1090 case OP_SEARCH_REVERSE:
1091 case OP_SEARCH_NEXT:
1092 case OP_SEARCH_OPPOSITE:
1096 if ((menu->current = mutt_search_command (menu->current, op)) == -1)
1097 menu->current = menu->oldcurrent;
1099 menu->redraw = REDRAW_MOTION;
1103 case OP_SORT_REVERSE:
1105 if (mutt_select_sort ((op == OP_SORT_REVERSE)) == 0)
1107 if (Context && Context->msgcount)
1109 resort_index (menu);
1110 set_option (OPTSEARCHINVALID);
1119 if (tag && !option (OPTAUTOTAG))
1121 for (j = 0; j < Context->vcount; j++)
1122 mutt_set_flag (Context, Context->hdrs[Context->v2r[j]], M_TAG, 0);
1123 menu->redraw = REDRAW_STATUS | REDRAW_INDEX;
1127 mutt_set_flag (Context, CURHDR, M_TAG, !CURHDR->tagged);
1128 Context->last_tag = CURHDR->tagged ? CURHDR :
1129 ((Context->last_tag == CURHDR && !CURHDR->tagged)
1130 ? NULL : Context->last_tag);
1131 menu->redraw = REDRAW_STATUS;
1132 if (option (OPTRESOLVE) && menu->current < Context->vcount - 1)
1135 menu->redraw |= REDRAW_MOTION_RESYNCH;
1138 menu->redraw |= REDRAW_CURRENT;
1142 case OP_MAIN_TAG_PATTERN:
1146 mutt_pattern_func (M_TAG, _("Tag messages matching: "));
1147 menu->redraw = REDRAW_INDEX | REDRAW_STATUS;
1150 case OP_MAIN_UNDELETE_PATTERN:
1157 CHECK_IMAP_ACL(IMAP_ACL_DELETE);
1160 if (mutt_pattern_func (M_UNDELETE, _("Undelete messages matching: ")) == 0)
1161 menu->redraw = REDRAW_INDEX | REDRAW_STATUS;
1164 case OP_MAIN_UNTAG_PATTERN:
1168 if (mutt_pattern_func (M_UNTAG, _("Untag messages matching: ")) == 0)
1169 menu->redraw = REDRAW_INDEX | REDRAW_STATUS;
1172 /* --------------------------------------------------------------------
1173 * The following operations can be performed inside of the pager.
1177 case OP_MAIN_IMAP_FETCH:
1178 if (Context->magic == M_IMAP)
1179 imap_check_mailbox (Context, &index_hint, 1);
1183 case OP_MAIN_SYNC_FOLDER:
1185 if (Context && !Context->msgcount)
1192 int oldvcount = Context->vcount;
1193 int oldcount = Context->msgcount;
1197 /* calculate the number of messages _above_ the cursor,
1198 * so we can keep the cursor on the current message
1200 for (j = 0; j <= menu->current; j++)
1202 if (Context->hdrs[Context->v2r[j]]->deleted)
1206 if ((check = mx_sync_mailbox (Context, &index_hint)) == 0)
1208 if (Context->vcount != oldvcount)
1209 menu->current -= dcount;
1210 set_option (OPTSEARCHINVALID);
1212 else if (check == M_NEW_MAIL || check == M_REOPENED)
1213 update_index (menu, Context, check, oldcount, index_hint);
1216 * do a sanity check even if mx_sync_mailbox failed.
1219 if (menu->current < 0 || menu->current >= Context->vcount)
1220 menu->current = ci_first_message ();
1223 /* check for a fatal error, or all messages deleted */
1227 /* if we were in the pager, redisplay the message */
1228 if (menu->menu == MENU_PAGER)
1230 op = OP_DISPLAY_MESSAGE;
1234 menu->redraw = REDRAW_FULL;
1237 case OP_SIDEBAR_OPEN:
1238 case OP_MAIN_CHANGE_FOLDER:
1239 case OP_MAIN_CHANGE_FOLDER_READONLY:
1241 case OP_MAIN_CHANGE_GROUP:
1242 case OP_MAIN_CHANGE_GROUP_READONLY:
1244 if (attach_msg || option (OPTREADONLY) ||
1246 op == OP_MAIN_CHANGE_GROUP_READONLY ||
1248 op == OP_MAIN_CHANGE_FOLDER_READONLY)
1254 cp = _("Open mailbox in read-only mode");
1256 cp = _("Open mailbox");
1260 unset_option (OPTNEWS);
1261 if (op == OP_MAIN_CHANGE_GROUP ||
1262 op == OP_MAIN_CHANGE_GROUP_READONLY)
1264 set_option (OPTNEWS);
1265 if (!(CurrentNewsSrv = mutt_select_newsserver (NewsServer)))
1268 cp = _("Open newsgroup in read-only mode");
1270 cp = _("Open newsgroup");
1275 mutt_buffy (buf, sizeof (buf));
1277 if ( op == OP_SIDEBAR_OPEN ) {
1280 strncpy( buf, CurBuffy->path, sizeof(buf) );
1281 } else if (mutt_enter_fname (cp, buf, sizeof (buf), &menu->redraw, 1) == -1)
1285 CLEARLINE (LINES-1);
1290 if (option (OPTNEWS))
1292 unset_option (OPTNEWS);
1293 nntp_expand_path (buf, sizeof (buf), &CurrentNewsSrv->conn->account);
1297 mutt_expand_path (buf, sizeof (buf));
1299 if (mx_get_magic (buf) <= 0)
1301 mutt_error (_("%s is not a mailbox."), buf);
1309 #ifdef USE_COMPRESSED
1310 if (Context->compressinfo && Context->realpath)
1311 mutt_str_replace (&LastFolder, Context->realpath);
1315 mutt_str_replace (&LastFolder, Context->path);
1316 oldcount = Context ? Context->msgcount : 0;
1318 if ((check = mx_close_mailbox (Context, &index_hint)) != 0)
1320 if (check == M_NEW_MAIL || check == M_REOPENED)
1321 update_index (menu, Context, check, oldcount, index_hint);
1323 set_option (OPTSEARCHINVALID);
1324 menu->redraw = REDRAW_INDEX | REDRAW_STATUS;
1332 /* Set CurrentMenu to MENU_MAIN before executing any folder
1333 * hooks so that all the index menu functions are available to
1337 CurrentMenu = MENU_MAIN;
1338 mutt_folder_hook (buf);
1340 if ((Context = mx_open_mailbox (buf, flags, NULL)) != NULL)
1342 menu->current = ci_first_message ();
1348 /* mutt_buffy_check() must be done with mail-reader mode! */
1349 menu->help = mutt_compile_help (helpstr, sizeof (helpstr), MENU_MAIN,
1350 (Context && (Context->magic == M_NNTP)) ? IndexNewsHelp : IndexHelp);
1352 mutt_clear_error ();
1353 mutt_buffy_check(1); /* force the buffy check after we have changed
1355 menu->redraw = REDRAW_FULL;
1356 set_option (OPTSEARCHINVALID);
1359 case OP_DISPLAY_MESSAGE:
1360 case OP_DISPLAY_HEADERS: /* don't weed the headers */
1365 * toggle the weeding of headers so that a user can press the key
1366 * again while reading the message.
1368 if (op == OP_DISPLAY_HEADERS)
1369 toggle_option (OPTWEED);
1371 unset_option (OPTNEEDRESORT);
1373 if ((Sort & SORT_MASK) == SORT_THREADS && CURHDR->collapsed)
1375 mutt_uncollapse_thread (Context, CURHDR);
1376 mutt_set_virtual (Context);
1377 if (option (OPTUNCOLLAPSEJUMP))
1378 menu->current = mutt_thread_next_unread (Context, CURHDR);
1381 if ((op = mutt_display_message (CURHDR)) == -1)
1383 unset_option (OPTNEEDRESORT);
1387 menu->menu = MENU_PAGER;
1388 menu->oldcurrent = menu->current;
1394 if (menu->menu == MENU_MAIN && attach_msg)
1400 if ((menu->menu == MENU_MAIN)
1401 && (query_quadoption (OPT_QUIT,
1402 _("Exit Mutt without saving?")) == M_YES))
1406 mx_fastclose_mailbox (Context);
1418 mutt_edit_content_type (CURHDR, CURHDR->content, NULL);
1419 /* if we were in the pager, redisplay the message */
1420 if (menu->menu == MENU_PAGER)
1422 op = OP_DISPLAY_MESSAGE;
1426 menu->redraw = REDRAW_CURRENT;
1429 case OP_MAIN_NEXT_UNDELETED:
1433 if (menu->current >= Context->vcount - 1)
1435 if (menu->menu == MENU_MAIN)
1436 mutt_error _("You are on the last message.");
1439 if ((menu->current = ci_next_undeleted (menu->current)) == -1)
1441 menu->current = menu->oldcurrent;
1442 if (menu->menu == MENU_MAIN)
1443 mutt_error _("No undeleted messages.");
1445 else if (menu->menu == MENU_PAGER)
1447 op = OP_DISPLAY_MESSAGE;
1451 menu->redraw = REDRAW_MOTION;
1458 if (menu->current >= Context->vcount - 1)
1460 if (menu->menu == MENU_MAIN)
1461 mutt_error _("You are on the last message.");
1465 if (menu->menu == MENU_PAGER)
1467 op = OP_DISPLAY_MESSAGE;
1471 menu->redraw = REDRAW_MOTION;
1474 case OP_MAIN_PREV_UNDELETED:
1478 if (menu->current < 1)
1480 mutt_error _("You are on the first message.");
1483 if ((menu->current = ci_previous_undeleted (menu->current)) == -1)
1485 menu->current = menu->oldcurrent;
1486 if (menu->menu == MENU_MAIN)
1487 mutt_error _("No undeleted messages.");
1489 else if (menu->menu == MENU_PAGER)
1491 op = OP_DISPLAY_MESSAGE;
1495 menu->redraw = REDRAW_MOTION;
1502 if (menu->current < 1)
1504 if (menu->menu == MENU_MAIN) mutt_error _("You are on the first message.");
1508 if (menu->menu == MENU_PAGER)
1510 op = OP_DISPLAY_MESSAGE;
1514 menu->redraw = REDRAW_MOTION;
1517 case OP_DECRYPT_COPY:
1518 case OP_DECRYPT_SAVE:
1522 case OP_COPY_MESSAGE:
1524 case OP_DECODE_COPY:
1525 case OP_DECODE_SAVE:
1528 if (mutt_save_message (tag ? NULL : CURHDR,
1529 (op == OP_DECRYPT_SAVE) ||
1530 (op == OP_SAVE) || (op == OP_DECODE_SAVE),
1531 (op == OP_DECODE_SAVE) || (op == OP_DECODE_COPY),
1532 (op == OP_DECRYPT_SAVE) || (op == OP_DECRYPT_COPY) ||
1534 &menu->redraw) == 0 &&
1535 (op == OP_SAVE || op == OP_DECODE_SAVE || op == OP_DECRYPT_SAVE)
1539 menu->redraw |= REDRAW_INDEX;
1540 else if (option (OPTRESOLVE))
1542 if ((menu->current = ci_next_undeleted (menu->current)) == -1)
1544 menu->current = menu->oldcurrent;
1545 menu->redraw |= REDRAW_CURRENT;
1548 menu->redraw |= REDRAW_MOTION_RESYNCH;
1551 menu->redraw |= REDRAW_CURRENT;
1555 case OP_MAIN_NEXT_NEW:
1556 case OP_MAIN_NEXT_UNREAD:
1557 case OP_MAIN_PREV_NEW:
1558 case OP_MAIN_PREV_UNREAD:
1559 case OP_MAIN_NEXT_NEW_THEN_UNREAD:
1560 case OP_MAIN_PREV_NEW_THEN_UNREAD:
1563 int first_unread = -1;
1571 for (j = 0; j != Context->vcount; j++)
1573 #define CURHDRi Context->hdrs[Context->v2r[i]]
1574 if (op == OP_MAIN_NEXT_NEW || op == OP_MAIN_NEXT_UNREAD || op == OP_MAIN_NEXT_NEW_THEN_UNREAD)
1577 if (i > Context->vcount - 1)
1579 mutt_message _("Search wrapped to top.");
1588 mutt_message _("Search wrapped to bottom.");
1589 i = Context->vcount - 1;
1593 if (CURHDRi->collapsed && (Sort & SORT_MASK) == SORT_THREADS)
1595 if (UNREAD (CURHDRi) && first_unread == -1)
1597 if (UNREAD (CURHDRi) == 1 && first_new == -1)
1600 else if ((!CURHDRi->deleted && !CURHDRi->read))
1602 if (first_unread == -1)
1604 if ((!CURHDRi->old) && first_new == -1)
1608 if ((op == OP_MAIN_NEXT_UNREAD || op == OP_MAIN_PREV_UNREAD) &&
1611 if ((op == OP_MAIN_NEXT_NEW || op == OP_MAIN_PREV_NEW ||
1612 op == OP_MAIN_NEXT_NEW_THEN_UNREAD || op == OP_MAIN_PREV_NEW_THEN_UNREAD)
1617 if ((op == OP_MAIN_NEXT_NEW || op == OP_MAIN_PREV_NEW ||
1618 op == OP_MAIN_NEXT_NEW_THEN_UNREAD || op == OP_MAIN_PREV_NEW_THEN_UNREAD)
1620 menu->current = first_new;
1621 else if ((op == OP_MAIN_NEXT_UNREAD || op == OP_MAIN_PREV_UNREAD ||
1622 op == OP_MAIN_NEXT_NEW_THEN_UNREAD || op == OP_MAIN_PREV_NEW_THEN_UNREAD)
1623 && first_unread != -1)
1624 menu->current = first_unread;
1626 if (menu->current == -1)
1628 menu->current = menu->oldcurrent;
1629 mutt_error ("%s%s.", (op == OP_MAIN_NEXT_NEW || op == OP_MAIN_PREV_NEW) ? _("No new messages") : _("No unread messages"),
1630 Context->pattern ? _(" in this limited view") : "");
1632 else if (menu->menu == MENU_PAGER)
1634 op = OP_DISPLAY_MESSAGE;
1638 menu->redraw = REDRAW_MOTION;
1641 case OP_FLAG_MESSAGE:
1648 if (Context->magic == M_POP)
1651 mutt_error _("Can't change 'important' flag on POP server.");
1657 CHECK_IMAP_ACL(IMAP_ACL_WRITE);
1661 if (Context->magic == M_NNTP)
1664 mutt_error _("Can't change 'important' flag on NNTP server.");
1671 for (j = 0; j < Context->vcount; j++)
1673 if (Context->hdrs[Context->v2r[j]]->tagged)
1674 mutt_set_flag (Context, Context->hdrs[Context->v2r[j]],
1675 M_FLAG, !Context->hdrs[Context->v2r[j]]->flagged);
1678 menu->redraw |= REDRAW_INDEX;
1682 mutt_set_flag (Context, CURHDR, M_FLAG, !CURHDR->flagged);
1683 if (option (OPTRESOLVE))
1685 if ((menu->current = ci_next_undeleted (menu->current)) == -1)
1687 menu->current = menu->oldcurrent;
1688 menu->redraw = REDRAW_CURRENT;
1691 menu->redraw = REDRAW_MOTION_RESYNCH;
1694 menu->redraw = REDRAW_CURRENT;
1696 menu->redraw |= REDRAW_STATUS;
1706 CHECK_IMAP_ACL(IMAP_ACL_SEEN);
1711 for (j = 0; j < Context->vcount; j++)
1713 if (Context->hdrs[Context->v2r[j]]->tagged)
1715 if (Context->hdrs[Context->v2r[j]]->read ||
1716 Context->hdrs[Context->v2r[j]]->old)
1717 mutt_set_flag (Context, Context->hdrs[Context->v2r[j]], M_NEW, 1);
1719 mutt_set_flag (Context, Context->hdrs[Context->v2r[j]], M_READ, 1);
1722 menu->redraw = REDRAW_STATUS | REDRAW_INDEX;
1726 if (CURHDR->read || CURHDR->old)
1727 mutt_set_flag (Context, CURHDR, M_NEW, 1);
1729 mutt_set_flag (Context, CURHDR, M_READ, 1);
1731 if (option (OPTRESOLVE))
1733 if ((menu->current = ci_next_undeleted (menu->current)) == -1)
1735 menu->current = menu->oldcurrent;
1736 menu->redraw = REDRAW_CURRENT;
1739 menu->redraw = REDRAW_MOTION_RESYNCH;
1742 menu->redraw = REDRAW_CURRENT;
1743 menu->redraw |= REDRAW_STATUS;
1747 case OP_TOGGLE_WRITE:
1750 if (mx_toggle_write (Context) == 0)
1751 menu->redraw |= REDRAW_STATUS;
1754 case OP_MAIN_NEXT_THREAD:
1755 case OP_MAIN_NEXT_SUBTHREAD:
1756 case OP_MAIN_PREV_THREAD:
1757 case OP_MAIN_PREV_SUBTHREAD:
1763 case OP_MAIN_NEXT_THREAD:
1764 menu->current = mutt_next_thread (CURHDR);
1767 case OP_MAIN_NEXT_SUBTHREAD:
1768 menu->current = mutt_next_subthread (CURHDR);
1771 case OP_MAIN_PREV_THREAD:
1772 menu->current = mutt_previous_thread (CURHDR);
1775 case OP_MAIN_PREV_SUBTHREAD:
1776 menu->current = mutt_previous_subthread (CURHDR);
1780 if (menu->current < 0)
1782 menu->current = menu->oldcurrent;
1783 if (op == OP_MAIN_NEXT_THREAD || op == OP_MAIN_NEXT_SUBTHREAD)
1784 mutt_error _("No more threads.");
1786 mutt_error _("You are on the first thread.");
1788 else if (menu->menu == MENU_PAGER)
1790 op = OP_DISPLAY_MESSAGE;
1794 menu->redraw = REDRAW_MOTION;
1797 case OP_MAIN_PARENT_MESSAGE:
1802 if ((menu->current = mutt_parent_message (Context, CURHDR)) < 0)
1804 menu->current = menu->oldcurrent;
1806 else if (menu->menu == MENU_PAGER)
1808 op = OP_DISPLAY_MESSAGE;
1812 menu->redraw = REDRAW_MOTION;
1815 case OP_MAIN_SET_FLAG:
1816 case OP_MAIN_CLEAR_FLAG:
1823 CHECK_IMAP_ACL(IMAP_ACL_WRITE);
1826 if (mutt_change_flag (tag ? NULL : CURHDR, (op == OP_MAIN_SET_FLAG)) == 0)
1828 menu->redraw = REDRAW_STATUS;
1830 menu->redraw |= REDRAW_INDEX;
1831 else if (option (OPTRESOLVE))
1833 if ((menu->current = ci_next_undeleted (menu->current)) == -1)
1835 menu->current = menu->oldcurrent;
1836 menu->redraw |= REDRAW_CURRENT;
1839 menu->redraw |= REDRAW_MOTION_RESYNCH;
1842 menu->redraw |= REDRAW_CURRENT;
1846 case OP_MAIN_COLLAPSE_THREAD:
1850 if ((Sort & SORT_MASK) != SORT_THREADS)
1852 mutt_error _("Threading is not enabled.");
1856 if (CURHDR->collapsed)
1858 menu->current = mutt_uncollapse_thread (Context, CURHDR);
1859 mutt_set_virtual (Context);
1860 if (option (OPTUNCOLLAPSEJUMP))
1861 menu->current = mutt_thread_next_unread (Context, CURHDR);
1863 else if (option (OPTCOLLAPSEUNREAD) || !UNREAD (CURHDR))
1865 menu->current = mutt_collapse_thread (Context, CURHDR);
1866 mutt_set_virtual (Context);
1870 mutt_error _("Thread contains unread messages.");
1874 menu->redraw = REDRAW_INDEX | REDRAW_STATUS;
1878 case OP_MAIN_COLLAPSE_ALL:
1882 if ((Sort & SORT_MASK) != SORT_THREADS)
1884 mutt_error _("Threading is not enabled.");
1890 THREAD *thread, *top;
1893 if (CURHDR->collapsed)
1894 final = mutt_uncollapse_thread (Context, CURHDR);
1895 else if (option (OPTCOLLAPSEUNREAD) || !UNREAD (CURHDR))
1896 final = mutt_collapse_thread (Context, CURHDR);
1898 final = CURHDR->virtual;
1900 base = Context->hdrs[Context->v2r[final]];
1902 top = Context->tree;
1903 Context->collapsed = !Context->collapsed;
1904 while ((thread = top) != NULL)
1906 while (!thread->message)
1907 thread = thread->child;
1908 h = thread->message;
1910 if (h->collapsed != Context->collapsed)
1913 mutt_uncollapse_thread (Context, h);
1914 else if (option (OPTCOLLAPSEUNREAD) || !UNREAD (h))
1915 mutt_collapse_thread (Context, h);
1920 mutt_set_virtual (Context);
1921 for (j = 0; j < Context->vcount; j++)
1923 if (Context->hdrs[Context->v2r[j]]->index == base->index)
1930 menu->redraw = REDRAW_INDEX | REDRAW_STATUS;
1934 /* --------------------------------------------------------------------
1935 * These functions are invoked directly from the internal-pager
1938 case OP_BOUNCE_MESSAGE:
1943 ci_bounce_message (tag ? NULL : CURHDR, &menu->redraw);
1946 case OP_CREATE_ALIAS:
1948 mutt_create_alias (Context && Context->vcount ? CURHDR->env : NULL, NULL);
1949 MAYBE_REDRAW (menu->redraw);
1950 menu->redraw |= REDRAW_CURRENT;
1955 mutt_query_menu (NULL, 0);
1956 MAYBE_REDRAW (menu->redraw);
1959 case OP_PURGE_MESSAGE:
1967 CHECK_IMAP_ACL(IMAP_ACL_DELETE);
1972 mutt_tag_set_flag (M_DELETE, 1);
1973 mutt_tag_set_flag (M_PURGED, (op != OP_PURGE_MESSAGE) ? 0 : 1);
1974 if (option (OPTDELETEUNTAG))
1975 mutt_tag_set_flag (M_TAG, 0);
1976 menu->redraw = REDRAW_INDEX;
1980 mutt_set_flag (Context, CURHDR, M_DELETE, 1);
1981 mutt_set_flag (Context, CURHDR, M_PURGED,
1982 (op != OP_PURGE_MESSAGE) ? 0 : 1);
1983 if (option (OPTDELETEUNTAG))
1984 mutt_set_flag (Context, CURHDR, M_TAG, 0);
1985 if (option (OPTRESOLVE))
1987 if ((menu->current = ci_next_undeleted (menu->current)) == -1)
1989 menu->current = menu->oldcurrent;
1990 menu->redraw = REDRAW_CURRENT;
1992 else if (menu->menu == MENU_PAGER)
1994 op = OP_DISPLAY_MESSAGE;
1998 menu->redraw |= REDRAW_MOTION_RESYNCH;
2001 menu->redraw = REDRAW_CURRENT;
2003 menu->redraw |= REDRAW_STATUS;
2006 case OP_DELETE_THREAD:
2007 case OP_DELETE_SUBTHREAD:
2014 CHECK_IMAP_ACL(IMAP_ACL_DELETE);
2017 rc = mutt_thread_set_flag (CURHDR, M_DELETE, 1,
2018 op == OP_DELETE_THREAD ? 0 : 1);
2022 if (option (OPTDELETEUNTAG))
2023 mutt_thread_set_flag (CURHDR, M_TAG, 0,
2024 op == OP_DELETE_THREAD ? 0 : 1);
2025 if (option (OPTRESOLVE))
2026 if ((menu->current = ci_next_undeleted (menu->current)) == -1)
2027 menu->current = menu->oldcurrent;
2028 menu->redraw = REDRAW_INDEX | REDRAW_STATUS;
2034 if (Context && Context->magic == M_NNTP)
2036 if (mutt_newsgroup_catchup (CurrentNewsSrv,
2037 ((NNTP_DATA *)Context->data)->group))
2038 menu->redraw = REDRAW_INDEX | REDRAW_STATUS;
2043 case OP_DISPLAY_ADDRESS:
2047 mutt_display_address (CURHDR->env);
2050 case OP_ENTER_COMMAND:
2052 CurrentMenu = MENU_MAIN;
2053 mutt_enter_command ();
2054 mutt_check_rescore (Context);
2055 if (option (OPTFORCEREDRAWINDEX))
2056 menu->redraw = REDRAW_FULL;
2057 unset_option (OPTFORCEREDRAWINDEX);
2058 unset_option (OPTFORCEREDRAWPAGER);
2061 case OP_EDIT_MESSAGE:
2069 if (Context->magic == M_POP)
2072 mutt_error _("Can't edit message on POP server.");
2078 CHECK_IMAP_ACL(IMAP_ACL_INSERT);
2082 if (Context->magic == M_NNTP)
2085 mutt_error _("Can't edit message on newsserver.");
2090 if (option (OPTPGPAUTODEC) && (tag || !(CURHDR->security & PGP_TRADITIONAL_CHECKED)))
2091 mutt_check_traditional_pgp (tag ? NULL : CURHDR, &menu->redraw);
2092 mutt_edit_message (Context, tag ? NULL : CURHDR);
2093 menu->redraw = REDRAW_FULL;
2097 case OP_FORWARD_MESSAGE:
2102 ci_send_message (SENDFORWARD, NULL, NULL, Context, tag ? NULL : CURHDR);
2103 menu->redraw = REDRAW_FULL;
2107 case OP_FORGET_PASSPHRASE:
2108 crypt_forget_passphrase ();
2111 case OP_GROUP_REPLY:
2116 ci_send_message (SENDREPLY|SENDGROUPREPLY, NULL, NULL, Context, tag ? NULL : CURHDR);
2117 menu->redraw = REDRAW_FULL;
2125 ci_send_message (SENDREPLY|SENDLISTREPLY, NULL, NULL, Context, tag ? NULL : CURHDR);
2126 menu->redraw = REDRAW_FULL;
2132 ci_send_message (0, NULL, NULL, Context, NULL);
2133 menu->redraw = REDRAW_FULL;
2137 if (!(WithCrypto & APPLICATION_PGP))
2140 ci_send_message (SENDKEY, NULL, NULL, NULL, NULL);
2141 menu->redraw = REDRAW_FULL;
2145 case OP_EXTRACT_KEYS:
2150 crypt_extract_keys_from_messages(tag ? NULL : CURHDR);
2151 menu->redraw = REDRAW_FULL;
2155 case OP_CHECK_TRADITIONAL:
2156 if (!(WithCrypto & APPLICATION_PGP))
2160 if (tag || !(CURHDR->security & PGP_TRADITIONAL_CHECKED))
2161 mutt_check_traditional_pgp (tag ? NULL : CURHDR, &menu->redraw);
2163 if (menu->menu == MENU_PAGER)
2165 op = OP_DISPLAY_MESSAGE;
2174 mutt_pipe_message (tag ? NULL : CURHDR);
2175 MAYBE_REDRAW (menu->redraw);
2182 mutt_print_message (tag ? NULL : CURHDR);
2185 case OP_MAIN_READ_THREAD:
2186 case OP_MAIN_READ_SUBTHREAD:
2193 CHECK_IMAP_ACL(IMAP_ACL_SEEN);
2196 rc = mutt_thread_set_flag (CURHDR, M_READ, 1,
2197 op == OP_MAIN_READ_THREAD ? 0 : 1);
2201 if (option (OPTRESOLVE))
2203 if ((menu->current = (op == OP_MAIN_READ_THREAD ?
2204 mutt_next_thread (CURHDR) : mutt_next_subthread (CURHDR))) == -1)
2205 menu->current = menu->oldcurrent;
2207 menu->redraw = REDRAW_INDEX | REDRAW_STATUS;
2211 case OP_RECALL_MESSAGE:
2214 ci_send_message (SENDPOSTPONED, NULL, NULL, Context, NULL);
2215 menu->redraw = REDRAW_FULL;
2226 for (j = 0; j < Context->vcount; j++)
2228 if (Context->hdrs[Context->v2r[j]]->tagged)
2229 mutt_resend_message (NULL, Context, Context->hdrs[Context->v2r[j]]);
2233 mutt_resend_message (NULL, Context, CURHDR);
2235 menu->redraw = REDRAW_FULL;
2241 case OP_FORWARD_TO_GROUP:
2244 if (op != OP_FOLLOWUP || !CURHDR->env->followup_to ||
2245 mutt_strcasecmp (CURHDR->env->followup_to, "poster") ||
2246 query_quadoption (OPT_FOLLOWUPTOPOSTER,_("Reply by mail as poster prefers?")) != M_YES)
2248 if (Context && Context->magic == M_NNTP &&
2249 !((NNTP_DATA *)Context->data)->allowed &&
2250 query_quadoption (OPT_TOMODERATED, _("Posting to this group not allowed, may be moderated. Continue?")) != M_YES)
2253 ci_send_message (SENDNEWS, NULL, NULL, Context, NULL);
2257 if (op == OP_FOLLOWUP)
2258 ci_send_message (SENDNEWS|SENDREPLY, NULL, NULL, Context,
2259 tag ? NULL : CURHDR);
2261 ci_send_message (SENDNEWS|SENDFORWARD, NULL, NULL, Context,
2262 tag ? NULL : CURHDR);
2264 menu->redraw = REDRAW_FULL;
2274 ci_send_message (SENDREPLY, NULL, NULL, Context, tag ? NULL : CURHDR);
2275 menu->redraw = REDRAW_FULL;
2278 case OP_SHELL_ESCAPE:
2280 mutt_shell_escape ();
2281 MAYBE_REDRAW (menu->redraw);
2285 case OP_TAG_SUBTHREAD:
2289 rc = mutt_thread_set_flag (CURHDR, M_TAG, !CURHDR->tagged,
2290 op == OP_TAG_THREAD ? 0 : 1);
2294 if (option (OPTRESOLVE))
2296 menu->current = mutt_next_thread (CURHDR);
2298 if (menu->current == -1)
2299 menu->current = menu->oldcurrent;
2301 menu->redraw = REDRAW_INDEX | REDRAW_STATUS;
2312 CHECK_IMAP_ACL(IMAP_ACL_DELETE);
2317 mutt_tag_set_flag (M_DELETE, 0);
2318 mutt_tag_set_flag (M_PURGED, 0);
2319 menu->redraw = REDRAW_INDEX;
2323 mutt_set_flag (Context, CURHDR, M_DELETE, 0);
2324 mutt_set_flag (Context, CURHDR, M_PURGED, 0);
2325 if (option (OPTRESOLVE) && menu->current < Context->vcount - 1)
2328 menu->redraw = REDRAW_MOTION_RESYNCH;
2331 menu->redraw = REDRAW_CURRENT;
2333 menu->redraw |= REDRAW_STATUS;
2336 case OP_UNDELETE_THREAD:
2337 case OP_UNDELETE_SUBTHREAD:
2344 CHECK_IMAP_ACL(IMAP_ACL_DELETE);
2347 rc = mutt_thread_set_flag (CURHDR, M_DELETE, 0,
2348 op == OP_UNDELETE_THREAD ? 0 : 1)
2349 + mutt_thread_set_flag (CURHDR, M_PURGED, 0,
2350 op == OP_UNDELETE_THREAD ? 0 : 1);
2354 if (option (OPTRESOLVE))
2356 if (op == OP_UNDELETE_THREAD)
2357 menu->current = mutt_next_thread (CURHDR);
2359 menu->current = mutt_next_subthread (CURHDR);
2361 if (menu->current == -1)
2362 menu->current = menu->oldcurrent;
2364 menu->redraw = REDRAW_INDEX | REDRAW_STATUS;
2376 case OP_VIEW_ATTACHMENTS:
2379 mutt_view_attachments (CURHDR);
2380 if (CURHDR->attach_del)
2381 Context->changed = 1;
2382 menu->redraw = REDRAW_FULL;
2392 case OP_SIDEBAR_SCROLL_UP:
2393 case OP_SIDEBAR_SCROLL_DOWN:
2394 case OP_SIDEBAR_NEXT:
2395 case OP_SIDEBAR_PREV:
2396 scroll_sidebar(op, menu->menu);
2399 if (menu->menu == MENU_MAIN)
2400 km_error_key (MENU_MAIN);
2403 if (menu->menu == MENU_PAGER)
2405 menu->menu = MENU_MAIN;
2406 menu->redraw = REDRAW_FULL;
2408 set_option (OPTWEED); /* turn header weeding back on. */
2416 /* Close all open IMAP connections */
2421 /* Close all open NNTP connections */
2426 mutt_menuDestroy (&menu);
2430 void mutt_set_header_color (CONTEXT *ctx, HEADER *curhdr)
2437 for (color = ColorIndexList; color; color = color->next)
2438 if (mutt_pattern_exec (color->color_pattern, M_MATCH_FULL_ADDRESS, ctx, curhdr))
2440 curhdr->pair = color->pair;
2443 curhdr->pair = ColorDefs[MT_COLOR_NORMAL];