Nico Golde:
[apps/madmutt.git] / curs_main.c
1 /*
2  * Copyright (C) 1996-2000 Michael R. Elkins <me@mutt.org>
3  * 
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.
8  * 
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.
13  * 
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.
17  */ 
18
19 #if HAVE_CONFIG_H
20 # include "config.h"
21 #endif
22
23 #include "mutt.h"
24 #include "mutt_curses.h"
25 #include "mx.h"
26 #include "mutt_menu.h"
27 #include "mailbox.h"
28 #include "mapping.h"
29 #include "sort.h"
30 #include "buffy.h"
31 #include "mx.h"
32 #include "sidebar.h"
33
34 #ifdef USE_POP
35 #include "pop.h"
36 #endif
37
38 #ifdef USE_IMAP
39 #include "imap_private.h"
40 #endif
41
42 #include "mutt_crypt.h"
43
44 #ifdef USE_NNTP
45 #include "nntp.h"
46 #endif
47
48
49 #include <ctype.h>
50 #include <stdlib.h>
51 #include <unistd.h>
52 #include <sys/wait.h>
53 #include <string.h>
54 #include <sys/stat.h>
55 #include <errno.h>
56
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.");
62
63 #define CHECK_MSGCOUNT if (!Context) \
64         { \
65                   mutt_flushinp (); \
66                 mutt_error _(No_mailbox_is_open); \
67                 break; \
68         } \
69         else if (!Context->msgcount) \
70         { \
71                   mutt_flushinp (); \
72                 mutt_error _(There_are_no_messages); \
73                 break; \
74         }
75
76 #define CHECK_VISIBLE if (Context && menu->current >= Context->vcount) \
77           {\
78                   mutt_flushinp (); \
79                   mutt_error _(No_visible); \
80                   break; \
81         }
82     
83
84 #define CHECK_READONLY if (Context->readonly) \
85                         { \
86                                   mutt_flushinp (); \
87                                 mutt_error _(Mailbox_is_read_only); \
88                                 break; \
89                         }
90
91 #ifdef USE_IMAP 
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)){ \
96                         mutt_flushinp(); \
97                         mutt_error ("Operation not permitted by the IMAP ACL for this mailbox"); \
98                         break; \
99                 }
100 #endif
101
102 #define CHECK_ATTACH if(option(OPTATTACHMSG)) \
103                      {\
104                         mutt_flushinp (); \
105                         mutt_error _(Function_not_permitted_in_attach_message_mode); \
106                         break; \
107                      }
108
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)
112
113 extern const char *ReleaseDate;
114 extern size_t UngetCount;
115
116 static void set_xterm_title_bar(char *title)
117 {
118   fputs("\033]2;", stdout);
119   fputs(title, stdout);
120   fputs("\007", stdout);
121   fflush(stdout);
122 }
123
124 static void set_xterm_icon_name(char *name)
125 {
126   fputs("\033]1;", stdout);
127   fputs(name, stdout);
128   fputs("\007", stdout);
129   fflush(stdout);
130 }
131
132 void index_make_entry (char *s, size_t l, MUTTMENU *menu, int num)
133 {
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]];
137   THREAD *tmp;
138
139   if ((Sort & SORT_MASK) == SORT_THREADS && h->tree)
140   {
141     flag |= M_FORMAT_TREE; /* display the thread tree */
142     if (h->display_subject)
143       flag |= M_FORMAT_FORCESUBJ;
144     else
145     {
146       if (reverse)
147       {
148         if (menu->top + menu->pagelen > menu->max)
149           edgemsgno = Context->v2r[menu->max - 1];
150         else
151           edgemsgno = Context->v2r[menu->top + menu->pagelen - 1];
152       }
153       else
154         edgemsgno = Context->v2r[menu->top];
155
156       for (tmp = h->thread->parent; tmp; tmp = tmp->parent)
157       {
158         if (!tmp->message)
159           continue;
160
161         /* if no ancestor is visible on current screen, provisionally force
162          * subject... */
163         if (reverse ? tmp->message->msgno > edgemsgno : tmp->message->msgno < edgemsgno)
164         {
165           flag |= M_FORMAT_FORCESUBJ;
166           break;
167         }
168         else if (tmp->message->virtual >= 0)
169           break;
170       }
171       if (flag & M_FORMAT_FORCESUBJ)
172       {
173         for (tmp = h->thread->prev; tmp; tmp = tmp->prev)
174         {
175           if (!tmp->message)
176             continue;
177
178           /* ...but if a previous sibling is available, don't force it */
179           if (reverse ? tmp->message->msgno > edgemsgno : tmp->message->msgno < edgemsgno)
180             break;
181           else if (tmp->message->virtual >= 0)
182           {
183             flag &= ~M_FORMAT_FORCESUBJ;
184             break;
185           }
186         }
187       }
188     }
189   }
190
191   _mutt_make_string (s, l, NONULL (HdrFmt), Context, h, flag);
192 }
193
194 int index_color (int index_no)
195 {
196   HEADER *h = Context->hdrs[Context->v2r[index_no]];
197
198   if (h->pair)
199     return h->pair;
200
201   mutt_set_header_color (Context, h);
202   return h->pair;
203 }
204
205 static int ci_next_undeleted (int msgno)
206 {
207   int i;
208
209   for (i=msgno+1; i < Context->vcount; i++)
210     if (! Context->hdrs[Context->v2r[i]]->deleted)
211       return (i);
212   return (-1);
213 }
214
215 static int ci_previous_undeleted (int msgno)
216 {
217   int i;
218
219   for (i=msgno-1; i>=0; i--)
220     if (! Context->hdrs[Context->v2r[i]]->deleted)
221       return (i);
222   return (-1);
223 }
224
225 /* Return the index of the first new message, or failing that, the first
226  * unread message.
227  */
228 static int ci_first_message (void)
229 {
230   int old = -1, i;
231
232   if (Context && Context->msgcount)
233   {
234     for (i=0; i < Context->vcount; i++)
235     {
236       if (! Context->hdrs[Context->v2r[i]]->read &&
237           ! Context->hdrs[Context->v2r[i]]->deleted)
238       {
239         if (! Context->hdrs[Context->v2r[i]]->old)
240           return (i);
241         else if (old == -1)
242           old = i;
243       }
244     }
245     if (old != -1)
246       return (old);
247
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.
251      */
252     if (((Sort & SORT_REVERSE) && (Sort & SORT_MASK) != SORT_THREADS) ||
253         ((Sort & SORT_MASK) == SORT_THREADS &&
254          ((Sort ^ SortAux) & SORT_REVERSE)))
255       return 0;
256     else
257       return (Context->vcount ? Context->vcount - 1 : 0);
258   }
259   return 0;
260 }
261
262 /* This should be in mx.c, but it only gets used here. */
263 static int mx_toggle_write (CONTEXT *ctx)
264 {
265   if (!ctx)
266     return -1;
267
268   if (ctx->readonly)
269   {
270     mutt_error _("Cannot toggle write on a readonly mailbox!");
271     return -1;
272   }
273
274   if (ctx->dontwrite)
275   {
276     ctx->dontwrite = 0;
277     mutt_message _("Changes to folder will be written on folder exit.");
278   }
279   else
280   {
281     ctx->dontwrite = 1;
282     mutt_message _("Changes to folder will not be written.");
283   }
284
285   return 0;
286 }
287
288 static void update_index (MUTTMENU *menu, CONTEXT *ctx, int check,
289                           int oldcount, int index_hint)
290 {
291   /* store pointers to the newly added messages */
292   HEADER  **save_new = NULL;
293   int j;
294   
295   /* take note of the current message */
296   if (oldcount)
297   {
298     if (menu->current < Context->vcount)
299       menu->oldcurrent = index_hint;
300     else
301       oldcount = 0; /* invalid message number! */
302   }
303   
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)
308   {
309 #define THIS_BODY Context->hdrs[j]->content
310     if (oldcount || check == M_REOPENED)
311     {
312       for (j = (check == M_REOPENED) ? 0 : oldcount; j < Context->msgcount; j++)
313       {
314         if (mutt_pattern_exec (Context->limit_pattern,
315                                M_MATCH_FULL_ADDRESS, 
316                                Context, Context->hdrs[j]))
317         {
318           Context->hdrs[j]->virtual = Context->vcount;
319           Context->v2r[Context->vcount] = j;
320           Context->hdrs[j]->limited = 1;
321           Context->vcount++;
322           Context->vsize += THIS_BODY->length + THIS_BODY->offset - THIS_BODY->hdr_offset;
323         }
324       }
325     }
326 #undef THIS_BODY
327   }
328     
329   /* save the list of new messages */
330   if (oldcount && check != M_REOPENED
331       && ((Sort & SORT_MASK) == SORT_THREADS))
332   {
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];
336   }
337   
338   /* if the mailbox was reopened, need to rethread from scratch */
339   mutt_sort_headers (Context, (check == M_REOPENED));
340
341   /* uncollapse threads with new mail */
342   if ((Sort & SORT_MASK) == SORT_THREADS)
343   {
344     if (check == M_REOPENED)
345     {
346       THREAD *h, *j;
347       
348       Context->collapsed = 0;
349       
350       for (h = Context->tree; h; h = h->next)
351       {
352         for (j = h; !j->message; j = j->child)
353           ;
354         mutt_uncollapse_thread (Context, j->message);
355       }
356       mutt_set_virtual (Context);
357     }
358     else if (oldcount)
359     {
360       for (j = 0; j < Context->msgcount - oldcount; j++)
361       {
362         int k;
363         
364         for (k = 0; k < Context->msgcount; k++)
365         {
366           HEADER *h = Context->hdrs[k];
367           if (h == save_new[j] && (!Context->pattern || h->limited))
368             mutt_uncollapse_thread (Context, h);
369         }
370       }
371       FREE (&save_new);
372       mutt_set_virtual (Context);
373     }
374   }
375   
376   menu->current = -1;
377   if (oldcount)
378   {
379     /* restore the current message to the message it was pointing to */
380     for (j = 0; j < Context->vcount; j++)
381     {
382       if (Context->hdrs[Context->v2r[j]]->index == menu->oldcurrent)
383       {
384         menu->current = j;
385         break;
386       }
387     }
388   }
389   
390   if (menu->current < 0)
391     menu->current = ci_first_message ();
392   
393 }
394
395 static void resort_index (MUTTMENU *menu)
396 {
397   int i;
398   HEADER *current = CURHDR;
399
400   menu->current = -1;
401   mutt_sort_headers (Context, 0);
402   /* Restore the current message */
403
404   for (i = 0; i < Context->vcount; i++)
405   {
406     if (Context->hdrs[Context->v2r[i]] == current)
407     {
408       menu->current = i;
409       break;
410     }
411   }
412   
413   if ((Sort & SORT_MASK) == SORT_THREADS && menu->current < 0)
414     menu->current = mutt_parent_message (Context, current);
415   
416   if (menu->current < 0)
417     menu->current = ci_first_message ();
418   
419   menu->redraw = REDRAW_INDEX | REDRAW_STATUS;
420 }
421
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 },
431   { NULL }
432 };
433
434 #ifdef USE_NNTP
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 },
444   { NULL }
445 };
446 #endif
447
448 /* This function handles the message index window as well as commands returned
449  * from the pager (MENU_PAGER).
450  */
451 int mutt_index_menu (void)
452 {
453   char buf[LONG_STRING], helpstr[SHORT_STRING];
454   int flags;
455   int op = OP_NULL;
456   int done = 0;                /* controls when to exit the "event" loop */
457   int i = 0, j;
458   int tag = 0;                 /* has the tag-prefix command been pressed? */
459   int newcount = -1;
460   int oldcount = -1;
461   int rc = -1;
462   MUTTMENU *menu;
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);
468   
469   menu = mutt_new_menu ();
470   menu->menu = MENU_MAIN;
471   menu->offset = 1;
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,
477 #ifdef USE_NNTP
478         (Context && (Context->magic == M_NNTP)) ? IndexNewsHelp :
479 #endif
480         IndexHelp);
481   
482   if (!attach_msg) 
483     mutt_buffy_check(1); /* force the buffy check after we enter the folder */
484
485   FOREVER
486   {
487     tag = 0; /* clear the tag-prefix */
488
489     menu->max = Context ? Context->vcount : 0;
490     oldcount = Context ? Context->msgcount : 0;
491
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
495      */
496     if (option (OPTNEEDRESORT) && Context && Context->msgcount)
497       resort_index (menu);
498     
499     if (option (OPTREDRAWTREE) && Context && Context->msgcount && (Sort & SORT_MASK) == SORT_THREADS)
500     {
501       mutt_draw_tree (Context);
502       menu->redraw |= REDRAW_STATUS;
503       unset_option (OPTREDRAWTREE);
504     }
505
506     if (Context && !attach_msg)
507     {
508       int check;
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.)
512        */
513
514 #ifdef USE_IMAP
515       imap_allow_reopen (Context);
516 #endif
517     
518       index_hint = (Context->vcount && menu->current >= 0 && menu->current < Context->vcount) ? CURHDR->index : 0;
519
520       if ((check = mx_check_mailbox (Context, &index_hint, 0)) < 0)
521       {
522         if (!Context->path)
523         {
524           /* fatal error occurred */
525           FREE (&Context);
526           menu->redraw = REDRAW_FULL;
527         }
528
529         set_option (OPTSEARCHINVALID);
530       }
531       else if (check == M_NEW_MAIL || check == M_REOPENED || check == M_FLAGS)
532       {
533         update_index (menu, Context, check, oldcount, index_hint);
534         
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)
539         {
540           /* on new mail: redraw sidebar */
541           draw_sidebar (CurrentMenu);
542           mutt_message _("New mail in this mailbox.");
543           if (option (OPTBEEPNEW))
544             beep ();
545         } else if (check == M_FLAGS)
546           mutt_message _("Mailbox was externally modified.");
547
548         /* avoid the message being overwritten by buffy */
549         do_buffy_notify = 0;
550         
551         menu->redraw = REDRAW_FULL;
552         menu->max = Context->vcount;
553         
554         set_option (OPTSEARCHINVALID);
555       }
556     }
557
558 #ifdef USE_IMAP
559     imap_keepalive ();
560     imap_disallow_reopen (Context);
561 #endif
562
563     if (!attach_msg)
564     {
565      /* check for new mail in the incoming folders */
566      oldcount = newcount;
567      if ((newcount = mutt_buffy_check (0)) != oldcount){
568        menu->redraw |= REDRAW_STATUS;
569        menu->redraw |= REDRAW_SIDEBAR;
570      } 
571      if (do_buffy_notify)
572      {
573        if (mutt_buffy_notify () && option (OPTBEEPNEW))
574          beep ();
575      }
576      else
577        do_buffy_notify = 1;
578     }
579
580     if (op != -1)
581       mutt_curs_set (0);
582     if (menu->redraw & REDRAW_SIDEBAR) draw_sidebar(menu->menu);
583     if (menu->redraw & REDRAW_FULL)
584     {
585       menu_redraw_full (menu);
586       draw_sidebar(menu->menu);
587       mutt_show_error ();
588     }
589
590     if (menu->menu == MENU_MAIN)
591     {
592       if (Context && Context->hdrs && !(menu->current >= Context->vcount))
593       {
594         menu_check_recenter (menu);
595
596         if (menu->redraw & REDRAW_INDEX)
597         {
598           menu_redraw_index (menu);
599           menu->redraw |= REDRAW_STATUS;
600         }
601         else if (menu->redraw & (REDRAW_MOTION_RESYNCH | REDRAW_MOTION))
602           menu_redraw_motion (menu);
603         else if (menu->redraw & REDRAW_CURRENT)
604           menu_redraw_current (menu);
605       }
606
607       if (menu->redraw & REDRAW_STATUS) 
608       {
609         DrawFullLine = 1;
610         menu_status_line (buf, sizeof (buf), menu, NONULL (Status));
611         DrawFullLine = 0;
612         CLEARLINE (option (OPTSTATUSONTOP) ? 0 : LINES-2);
613         SETCOLOR (MT_COLOR_STATUS);
614         mutt_paddstr (COLS, buf);
615         SETCOLOR (MT_COLOR_NORMAL);
616         set_buffystats (Context);
617         menu->redraw &= ~REDRAW_STATUS;
618         if (option(OPTXTERMSETTITLES))
619         {
620           menu_status_line (buf, sizeof (buf), menu, NONULL (XtermTitle));
621           set_xterm_title_bar(buf);
622           menu_status_line (buf, sizeof (buf), menu, NONULL (XtermIcon));
623           set_xterm_icon_name(buf);
624         }
625       }
626
627       menu->redraw = 0;
628       if (menu->current < menu->max)
629         menu->oldcurrent = menu->current;
630       else
631         menu->oldcurrent = -1;
632
633       if (option (OPTARROWCURSOR))
634         move (menu->current - menu->top + menu->offset, 2);
635       else
636         move (menu->current - menu->top + menu->offset, COLS - 1);
637       mutt_refresh ();
638
639       op = km_dokey (MENU_MAIN);
640
641       dprint(4, (debugfile, "mutt_index_menu[%d]: Got op %d\n", __LINE__, op));
642
643 #if defined (USE_SLANG_CURSES) || defined (HAVE_RESIZETERM)
644       if (SigWinch)
645       {
646         mutt_flushinp ();
647         mutt_resize_screen ();
648         menu->redraw = REDRAW_FULL;
649         menu->menu = MENU_MAIN;
650         SigWinch = 0;
651         menu->top = 0; /* so we scroll the right amount */
652         /*
653          * force a real complete redraw.  clrtobot() doesn't seem to be able
654          * to handle every case without this.
655          */
656         clearok(stdscr,TRUE);
657         continue;
658       }
659 #endif
660
661       if (op == -1)
662         continue; /* either user abort or timeout */
663       
664       mutt_curs_set (1);
665       
666       /* special handling for the tag-prefix function */
667       if (op == OP_TAG_PREFIX)
668       {
669         if (!Context)
670         {
671           mutt_error _("No mailbox is open.");
672           continue;
673         }
674
675         if (!Context->tagged)
676         {
677           mutt_error _("No tagged messages.");
678           continue;
679         }
680         tag = 1;
681
682         /* give visual indication that the next command is a tag- command */
683         mvaddstr (LINES - 1, 0, "tag-");
684         clrtoeol ();
685
686         /* get the real command */
687         if ((op = km_dokey (MENU_MAIN)) == OP_TAG_PREFIX)
688         {
689           /* abort tag sequence */
690           CLEARLINE (LINES-1);
691           continue;
692         }
693       }
694       else if (option (OPTAUTOTAG) && Context && Context->tagged)
695         tag = 1;
696
697       if (op == OP_TAG_PREFIX_COND)
698       {
699         if (!Context)
700         {
701           mutt_error _("No mailbox is open.");
702           continue;
703         }
704
705         if (!Context->tagged)
706         {
707           event_t tmp;
708           while(UngetCount>0)
709           {
710             tmp=mutt_getch();
711             if(tmp.op==OP_END_COND)break;
712           }
713           mutt_message  _("Nothing to do.");
714           continue;
715         }
716         tag = 1;
717
718         /* give visual indication that the next command is a tag- command */
719         mvaddstr (LINES - 1, 0, "tag-");
720         clrtoeol ();
721
722         /* get the real command */
723         if ((op = km_dokey (MENU_MAIN)) == OP_TAG_PREFIX)
724         {
725           /* abort tag sequence */
726           CLEARLINE (LINES-1);
727           continue;
728         }
729       }
730
731       mutt_clear_error ();
732     }
733     else
734     {
735       if (menu->current < menu->max)
736         menu->oldcurrent = menu->current;
737       else
738         menu->oldcurrent = -1;
739       
740       mutt_curs_set (1);        /* fallback from the pager */
741     }
742
743 #ifdef USE_NNTP
744     unset_option (OPTNEWS);        /* for any case */
745 #endif
746
747     switch (op)
748     {
749
750       /* ----------------------------------------------------------------------
751        * movement commands
752        */
753
754       case OP_BOTTOM_PAGE:
755         menu_bottom_page (menu);
756         break;
757       case OP_FIRST_ENTRY:
758         menu_first_entry (menu);
759         break;
760       case OP_MIDDLE_PAGE:
761         menu_middle_page (menu);
762         break;
763       case OP_HALF_UP:
764         menu_half_up (menu);
765         break;
766       case OP_HALF_DOWN:
767         menu_half_down (menu);
768         break;
769       case OP_NEXT_LINE:
770         menu_next_line (menu);
771         break;
772       case OP_PREV_LINE:
773         menu_prev_line (menu);
774         break;
775       case OP_NEXT_PAGE:
776         menu_next_page (menu);
777         break;
778       case OP_PREV_PAGE:
779         menu_prev_page (menu);
780         break;
781       case OP_LAST_ENTRY:
782         menu_last_entry (menu);
783         break;
784       case OP_TOP_PAGE:
785         menu_top_page (menu);
786         break;
787       case OP_CURRENT_TOP:
788         menu_current_top (menu);
789         break;
790       case OP_CURRENT_MIDDLE:
791         menu_current_middle (menu);
792         break;
793       case OP_CURRENT_BOTTOM:
794         menu_current_bottom (menu);
795         break;
796
797 #ifdef USE_NNTP
798       case OP_GET_MESSAGE:
799       case OP_GET_PARENT:
800         CHECK_MSGCOUNT;
801         if (Context->magic == M_NNTP)
802         {
803           HEADER *h;
804
805           if (op == OP_GET_MESSAGE)
806           {
807             buf[0] = 0;
808             if (mutt_get_field (_("Enter Message-Id: "), buf, sizeof (buf), 0) != 0
809                   || !buf[0])
810               break;
811           }
812           else
813           {
814             LIST *ref = CURHDR->env->references;
815             if (!ref)
816             {
817               mutt_error _("Article has no parent reference!");
818               break;
819             }
820             strfcpy (buf, ref->data, sizeof (buf));
821           }
822           if (!Context->id_hash)
823             Context->id_hash = mutt_make_id_hash (Context);
824           if ((h = hash_find (Context->id_hash, buf)))
825           {
826             if (h->virtual != -1)
827             {
828               menu->current = h->virtual;
829               menu->redraw = REDRAW_MOTION_RESYNCH;
830             }
831             else if (h->collapsed)
832             {
833               mutt_uncollapse_thread (Context, h);
834               mutt_set_virtual (Context);
835               menu->current = h->virtual;
836               menu->redraw = REDRAW_MOTION_RESYNCH;
837             }
838             else
839               mutt_error _("Message not visible in limited view.");
840           }
841           else
842           {
843             if (nntp_check_msgid (Context, buf) == 0)
844             {
845               h = Context->hdrs[Context->msgcount-1];
846               mutt_sort_headers (Context, 0);
847               menu->current = h->virtual;
848               menu->redraw = REDRAW_FULL;
849             }
850             else
851               mutt_error (_("Article %s not found on server"), buf); 
852           }
853         }
854         break;
855
856       case OP_GET_CHILDREN:
857       case OP_RECONSTRUCT_THREAD:
858         CHECK_MSGCOUNT;
859         if (Context->magic == M_NNTP)
860         {
861           HEADER *h;
862           int old = CURHDR->index, i;
863
864           if (!CURHDR->env->message_id)
865           {
866             mutt_error _("No Message-Id. Unable to perform operation");
867             break;
868           }
869
870           if (!Context->id_hash)
871             Context->id_hash = mutt_make_id_hash (Context);
872           strfcpy (buf, CURHDR->env->message_id, sizeof (buf));
873
874           if (op == OP_RECONSTRUCT_THREAD)
875           {
876             LIST *ref = CURHDR->env->references;
877             while (ref)
878             {
879               nntp_check_msgid (Context, ref->data);
880               /* the last msgid in References is the root message */
881               if (!ref->next)
882                 strfcpy (buf, ref->data, sizeof (buf));
883               ref = ref->next;
884             }
885           }
886           mutt_message _("Check for children of message...");
887           if (nntp_check_children (Context, buf) == 0)
888           {
889             mutt_sort_headers (Context, (op == OP_RECONSTRUCT_THREAD));
890             h = hash_find (Context->id_hash, buf);
891             /* if the root message was retrieved, move to it */
892             if (h)
893               menu->current = h->virtual;
894             else /* try to restore old position */
895               for (i = 0; i < Context->msgcount; i++)
896                 if (Context->hdrs[i]->index == old)
897                 {
898                   menu->current = Context->hdrs[i]->virtual;
899                   /* As an added courtesy, recenter the menu
900                    * with the current entry at the middle of the screen */
901                   menu_check_recenter (menu);
902                   menu_current_middle (menu);
903                 }
904           }
905           menu->redraw = REDRAW_FULL;
906           mutt_clear_error ();
907         }
908         break;
909 #endif
910
911       case OP_JUMP:
912
913         CHECK_MSGCOUNT;
914         CHECK_VISIBLE;
915         if (isdigit (LastKey)) mutt_ungetch (LastKey, 0);
916         buf[0] = 0;
917         if (mutt_get_field (_("Jump to message: "), buf, sizeof (buf), 0) != 0
918             || !buf[0])
919           break;
920
921         if (! isdigit ((unsigned char) buf[0]))
922         {
923           mutt_error _("Argument must be a message number.");
924           break;
925         }
926
927         i = atoi (buf);
928         if (i > 0 && i <= Context->msgcount)
929         {
930           for (j = i-1; j < Context->msgcount; j++)
931           {
932             if (Context->hdrs[j]->virtual != -1)
933               break;
934           }
935           if (j >= Context->msgcount)
936           {
937             for (j = i-2; j >= 0; j--)
938             {
939               if (Context->hdrs[j]->virtual != -1)
940                 break;
941             }
942           }
943
944           if (j >= 0)
945           {
946             menu->current = Context->hdrs[j]->virtual;
947             if (menu->menu == MENU_PAGER)
948             {
949               op = OP_DISPLAY_MESSAGE;
950               continue;
951             }
952             else
953             menu->redraw = REDRAW_MOTION;
954           }
955           else
956             mutt_error _("That message is not visible.");
957         }
958         else
959           mutt_error _("Invalid message number.");
960
961         break;
962
963         /* --------------------------------------------------------------------
964          * `index' specific commands
965          */
966
967       case OP_MAIN_DELETE_PATTERN:
968
969         CHECK_MSGCOUNT;
970         CHECK_VISIBLE;
971         CHECK_READONLY;
972
973 #ifdef USE_IMAP
974 CHECK_IMAP_ACL(IMAP_ACL_DELETE);
975 #endif
976
977         CHECK_ATTACH;
978         mutt_pattern_func (M_DELETE, _("Delete messages matching: "));
979         menu->redraw = REDRAW_INDEX | REDRAW_STATUS;
980         break;
981
982 #ifdef USE_POP
983       case OP_MAIN_FETCH_MAIL:
984
985         CHECK_ATTACH;
986         pop_fetch_mail ();
987         menu->redraw = REDRAW_FULL;
988         break;
989 #endif /* USE_POP */
990
991       case OP_HELP:
992
993         mutt_help (MENU_MAIN);
994         menu->redraw = REDRAW_FULL;
995         break;
996
997       case OP_MAIN_SHOW_LIMIT:
998         CHECK_MSGCOUNT;
999         if (!Context->pattern)
1000            mutt_message _("No limit pattern is in effect.");
1001         else
1002         {
1003            char buf[STRING];
1004            /* i18n: ask for a limit to apply */
1005            snprintf (buf, sizeof(buf), _("Limit: %s"),Context->pattern);
1006            mutt_message ("%s", buf);
1007         }
1008         break;
1009
1010       case OP_MAIN_LIMIT:
1011       case OP_TOGGLE_READ:
1012
1013         CHECK_MSGCOUNT;
1014         menu->oldcurrent = (Context->vcount && menu->current >= 0 && menu->current < Context->vcount) ?
1015                 CURHDR->index : -1;
1016         if (op == OP_TOGGLE_READ)
1017         {
1018           char buf[LONG_STRING];
1019
1020           if (!Context->pattern || strncmp (Context->pattern, "!~R!~D~s", 8) != 0)
1021           {
1022             snprintf (buf, sizeof (buf), "!~R!~D~s%s",
1023                       Context->pattern ? Context->pattern : ".*");
1024             set_option (OPTHIDEREAD);
1025           }
1026           else
1027           {
1028             strfcpy (buf, Context->pattern + 8, sizeof(buf));
1029             if (!*buf || strncmp (buf, ".*", 2) == 0)
1030               snprintf (buf, sizeof(buf), "~A");
1031             unset_option (OPTHIDEREAD);
1032           }
1033           FREE (&Context->pattern);
1034           Context->pattern = safe_strdup (buf);
1035         }
1036         if ((op == OP_TOGGLE_READ && mutt_pattern_func (M_LIMIT, NULL) == 0) ||
1037             mutt_pattern_func (M_LIMIT, _("Limit to messages matching: ")) == 0)
1038         {
1039           if (menu->oldcurrent >= 0)
1040           {
1041             /* try to find what used to be the current message */
1042             menu->current = -1;
1043             for (i = 0; i < Context->vcount; i++)
1044               if (Context->hdrs[Context->v2r[i]]->index == menu->oldcurrent)
1045               {
1046                 menu->current = i;
1047                 break;
1048               }
1049             if (menu->current < 0) menu->current = 0;
1050           }
1051           else
1052             menu->current = 0;
1053           menu->redraw = REDRAW_INDEX | REDRAW_STATUS;
1054           if ((Sort & SORT_MASK) == SORT_THREADS)
1055             mutt_draw_tree (Context);
1056           menu->redraw = REDRAW_FULL;
1057         }
1058         break;          
1059
1060       case OP_QUIT:
1061
1062         close = op;
1063         if (attach_msg)
1064         {
1065          done = 1;
1066          break;
1067         }
1068
1069         if (query_quadoption (OPT_QUIT, _("Quit Mutt-ng?")) == M_YES)
1070         {
1071           int check;
1072           
1073           oldcount = Context ? Context->msgcount : 0;
1074
1075           if (!Context || (check = mx_close_mailbox (Context, &index_hint)) == 0)
1076             done = 1;
1077           else
1078           {
1079             if (check == M_NEW_MAIL || check == M_REOPENED)
1080               update_index (menu, Context, check, oldcount, index_hint);
1081
1082             menu->redraw = REDRAW_FULL; /* new mail arrived? */
1083             set_option (OPTSEARCHINVALID);
1084           }
1085         }
1086         break;
1087
1088       case OP_REDRAW:
1089
1090         clearok (stdscr, TRUE);
1091         menu->redraw = REDRAW_FULL;
1092         break;
1093
1094       case OP_SEARCH:
1095       case OP_SEARCH_REVERSE:
1096       case OP_SEARCH_NEXT:
1097       case OP_SEARCH_OPPOSITE:
1098
1099         CHECK_MSGCOUNT;
1100         CHECK_VISIBLE;
1101         if ((menu->current = mutt_search_command (menu->current, op)) == -1)
1102           menu->current = menu->oldcurrent;
1103         else
1104           menu->redraw = REDRAW_MOTION;
1105         break;
1106
1107       case OP_SORT:
1108       case OP_SORT_REVERSE:
1109
1110         if (mutt_select_sort ((op == OP_SORT_REVERSE)) == 0)
1111         {
1112           if (Context && Context->msgcount)
1113           {
1114             resort_index (menu);
1115             set_option (OPTSEARCHINVALID);
1116           }
1117         }
1118         break;
1119
1120       case OP_TAG:
1121
1122         CHECK_MSGCOUNT;
1123         CHECK_VISIBLE;
1124         if (tag && !option (OPTAUTOTAG))
1125         {
1126           for (j = 0; j < Context->vcount; j++)
1127             mutt_set_flag (Context, Context->hdrs[Context->v2r[j]], M_TAG, 0);
1128           menu->redraw = REDRAW_STATUS | REDRAW_INDEX;
1129         }
1130         else
1131         {
1132           mutt_set_flag (Context, CURHDR, M_TAG, !CURHDR->tagged);
1133           Context->last_tag = CURHDR->tagged ? CURHDR :
1134             ((Context->last_tag == CURHDR && !CURHDR->tagged)
1135             ? NULL : Context->last_tag);
1136           menu->redraw = REDRAW_STATUS;
1137           if (option (OPTRESOLVE) && menu->current < Context->vcount - 1)
1138           {
1139             menu->current++;
1140             menu->redraw |= REDRAW_MOTION_RESYNCH;
1141           }
1142           else
1143             menu->redraw |= REDRAW_CURRENT;
1144         }
1145         break;
1146
1147       case OP_MAIN_TAG_PATTERN:
1148
1149         CHECK_MSGCOUNT;
1150         CHECK_VISIBLE;
1151         mutt_pattern_func (M_TAG, _("Tag messages matching: "));
1152         menu->redraw = REDRAW_INDEX | REDRAW_STATUS;
1153         break;
1154
1155       case OP_MAIN_UNDELETE_PATTERN:
1156
1157         CHECK_MSGCOUNT;
1158         CHECK_VISIBLE;
1159         CHECK_READONLY;
1160
1161 #ifdef USE_IMAP
1162 CHECK_IMAP_ACL(IMAP_ACL_DELETE);
1163 #endif
1164
1165         if (mutt_pattern_func (M_UNDELETE, _("Undelete messages matching: ")) == 0)
1166           menu->redraw = REDRAW_INDEX | REDRAW_STATUS;
1167         break;
1168
1169       case OP_MAIN_UNTAG_PATTERN:
1170
1171         CHECK_MSGCOUNT;
1172         CHECK_VISIBLE;
1173         if (mutt_pattern_func (M_UNTAG, _("Untag messages matching: ")) == 0)
1174           menu->redraw = REDRAW_INDEX | REDRAW_STATUS;
1175         break;
1176
1177         /* --------------------------------------------------------------------
1178          * The following operations can be performed inside of the pager.
1179          */
1180
1181 #ifdef USE_IMAP
1182       case OP_MAIN_IMAP_FETCH:
1183         if (Context->magic == M_IMAP)
1184           imap_check_mailbox (Context, &index_hint, 1);
1185         break;
1186 #endif
1187       
1188       case OP_MAIN_SYNC_FOLDER:
1189
1190         if (Context && !Context->msgcount)
1191           break;
1192
1193         CHECK_MSGCOUNT;
1194         CHECK_VISIBLE;
1195         CHECK_READONLY;
1196         {
1197           int oldvcount = Context->vcount;
1198           int oldcount  = Context->msgcount;
1199           int dcount = 0;
1200           int check;
1201
1202           /* calculate the number of messages _above_ the cursor,
1203            * so we can keep the cursor on the current message
1204            */ 
1205           for (j = 0; j <= menu->current; j++)
1206           {
1207             if (Context->hdrs[Context->v2r[j]]->deleted)
1208               dcount++;
1209           }
1210
1211           if ((check = mx_sync_mailbox (Context, &index_hint)) == 0)
1212           {
1213             if (Context->vcount != oldvcount)
1214               menu->current -= dcount;
1215             set_option (OPTSEARCHINVALID);
1216           }
1217           else if (check == M_NEW_MAIL || check == M_REOPENED)
1218             update_index (menu, Context, check, oldcount, index_hint);
1219
1220           /* 
1221            * do a sanity check even if mx_sync_mailbox failed.
1222            */
1223
1224           if (menu->current < 0 || menu->current >= Context->vcount)
1225             menu->current = ci_first_message ();
1226         }
1227
1228         /* check for a fatal error, or all messages deleted */
1229         if (!Context->path)
1230           FREE (&Context);
1231
1232         /* if we were in the pager, redisplay the message */
1233         if (menu->menu == MENU_PAGER)
1234         {
1235           op = OP_DISPLAY_MESSAGE;
1236           continue;
1237         }
1238         else
1239           menu->redraw = REDRAW_FULL;
1240         break;
1241
1242       case OP_SIDEBAR_OPEN:
1243       case OP_MAIN_CHANGE_FOLDER:
1244       case OP_MAIN_CHANGE_FOLDER_READONLY:
1245 #ifdef USE_NNTP
1246       case OP_MAIN_CHANGE_GROUP:
1247       case OP_MAIN_CHANGE_GROUP_READONLY:
1248 #endif
1249         if (attach_msg || option (OPTREADONLY) ||
1250 #ifdef USE_NNTP
1251             op == OP_MAIN_CHANGE_GROUP_READONLY ||
1252 #endif
1253             op == OP_MAIN_CHANGE_FOLDER_READONLY)
1254           flags = M_READONLY;
1255         else
1256           flags = 0;
1257
1258         if (flags)
1259           cp = _("Open mailbox in read-only mode");
1260         else
1261           cp = _("Open mailbox");
1262
1263         buf[0] = '\0';
1264 #ifdef USE_NNTP
1265         unset_option (OPTNEWS);
1266         if (op == OP_MAIN_CHANGE_GROUP ||
1267             op == OP_MAIN_CHANGE_GROUP_READONLY)
1268         {
1269           set_option (OPTNEWS);
1270           if (!(CurrentNewsSrv = mutt_select_newsserver (NewsServer)))
1271             break;
1272           if (flags)
1273             cp = _("Open newsgroup in read-only mode");
1274           else
1275             cp = _("Open newsgroup");
1276           nntp_buffy (buf);
1277         }
1278         else
1279 #endif
1280         {
1281           if (Context && Context->path)
1282             strncpy (buf, Context->path, sizeof (buf));
1283           mutt_buffy (buf, sizeof (buf));
1284         }
1285
1286         if ( op == OP_SIDEBAR_OPEN ) {
1287           if(!CurBuffy)
1288             break;
1289           strncpy( buf, CurBuffy->path, sizeof(buf) );
1290         } else if (mutt_enter_fname (cp, buf, sizeof (buf), &menu->redraw, 1) == -1)
1291           break;
1292         if (!buf[0])
1293         {
1294           CLEARLINE (LINES-1);
1295           break;
1296         }
1297
1298 #ifdef USE_NNTP
1299         if (option (OPTNEWS))
1300         {
1301           unset_option (OPTNEWS);
1302           nntp_expand_path (buf, sizeof (buf), &CurrentNewsSrv->conn->account);
1303         }
1304         else
1305 #endif
1306         mutt_expand_path (buf, sizeof (buf));
1307         set_curbuffy(buf);
1308         if (mx_get_magic (buf) <= 0)
1309         {
1310           mutt_error (_("%s is not a mailbox."), buf);
1311           break;
1312         }
1313         mutt_str_replace (&CurrentFolder, buf);
1314
1315         if (Context)
1316         {
1317           int check;
1318
1319 #ifdef USE_COMPRESSED
1320           if (Context->compressinfo && Context->realpath)
1321             mutt_str_replace (&LastFolder, Context->realpath);
1322           else
1323 #endif
1324
1325           mutt_str_replace (&LastFolder, Context->path);
1326           oldcount = Context ? Context->msgcount : 0;
1327
1328           if ((check = mx_close_mailbox (Context, &index_hint)) != 0)
1329           {
1330             if (check == M_NEW_MAIL || check == M_REOPENED)
1331               update_index (menu, Context, check, oldcount, index_hint);
1332                 
1333             set_option (OPTSEARCHINVALID);
1334             menu->redraw = REDRAW_INDEX | REDRAW_STATUS;
1335             break;
1336           }
1337           FREE (&Context);
1338         }
1339
1340         mutt_sleep (0);
1341       
1342         /* Set CurrentMenu to MENU_MAIN before executing any folder
1343          * hooks so that all the index menu functions are available to
1344          * the exec command.
1345          */
1346
1347         CurrentMenu = MENU_MAIN;
1348         mutt_folder_hook (buf);
1349
1350         if ((Context = mx_open_mailbox (buf, flags, NULL)) != NULL)
1351         {
1352           menu->current = ci_first_message ();
1353         }
1354         else
1355           menu->current = 0;
1356
1357 #ifdef USE_NNTP
1358         /* mutt_buffy_check() must be done with mail-reader mode! */
1359         menu->help = mutt_compile_help (helpstr, sizeof (helpstr), MENU_MAIN,
1360           (Context && (Context->magic == M_NNTP)) ? IndexNewsHelp : IndexHelp);
1361 #endif
1362         mutt_clear_error ();
1363         mutt_buffy_check(1); /* force the buffy check after we have changed
1364                               the folder */
1365         menu->redraw = REDRAW_FULL;
1366         set_option (OPTSEARCHINVALID);
1367         break;
1368
1369       case OP_DISPLAY_MESSAGE:
1370       case OP_DISPLAY_HEADERS: /* don't weed the headers */
1371
1372         CHECK_MSGCOUNT;
1373         CHECK_VISIBLE;
1374         /*
1375          * toggle the weeding of headers so that a user can press the key
1376          * again while reading the message.
1377          */
1378         if (op == OP_DISPLAY_HEADERS)
1379           toggle_option (OPTWEED);
1380
1381         unset_option (OPTNEEDRESORT);
1382
1383         if ((Sort & SORT_MASK) == SORT_THREADS && CURHDR->collapsed)
1384         {
1385           mutt_uncollapse_thread (Context, CURHDR);
1386           mutt_set_virtual (Context);
1387           if (option (OPTUNCOLLAPSEJUMP))
1388             menu->current = mutt_thread_next_unread (Context, CURHDR);
1389         }
1390  
1391         if ((op = mutt_display_message (CURHDR)) == -1)
1392         {
1393           unset_option (OPTNEEDRESORT);
1394           break;
1395         }
1396
1397         menu->menu = MENU_PAGER;
1398          menu->oldcurrent = menu->current;
1399         continue;
1400
1401       case OP_EXIT:
1402
1403         close = op;
1404         if (menu->menu == MENU_MAIN && attach_msg)
1405         {
1406          done = 1;
1407          break;
1408         }
1409
1410         if ((menu->menu == MENU_MAIN)
1411             && (query_quadoption (OPT_QUIT, 
1412                                   _("Exit Mutt-ng without saving?")) == M_YES))
1413         {
1414           if (Context)
1415           {
1416             mx_fastclose_mailbox (Context);
1417             FREE (&Context);
1418           }
1419           done = 1;
1420         }
1421         break;
1422
1423       case OP_EDIT_TYPE:
1424
1425         CHECK_MSGCOUNT;
1426         CHECK_VISIBLE;
1427         CHECK_ATTACH;
1428         mutt_edit_content_type (CURHDR, CURHDR->content, NULL);
1429         /* if we were in the pager, redisplay the message */
1430         if (menu->menu == MENU_PAGER)
1431         {
1432           op = OP_DISPLAY_MESSAGE;
1433           continue;
1434         }
1435         else
1436           menu->redraw = REDRAW_CURRENT;
1437         break;
1438
1439       case OP_MAIN_BREAK_THREAD:
1440
1441         CHECK_MSGCOUNT;
1442         CHECK_VISIBLE;
1443         CHECK_READONLY;
1444
1445         if ((Sort & SORT_MASK) != SORT_THREADS)
1446           mutt_error _("Threading is not enabled.");
1447         else
1448         {
1449           {
1450             HEADER *oldcur = CURHDR;
1451
1452             mutt_break_thread (CURHDR);
1453             mutt_sort_headers (Context, 1);
1454             menu->current = oldcur->virtual;
1455           }
1456
1457           Context->changed = 1;
1458           mutt_message _("Thread broken");
1459
1460           if (menu->menu == MENU_PAGER)
1461           {
1462             op = OP_DISPLAY_MESSAGE;
1463             continue;
1464           }
1465           else
1466             menu->redraw |= REDRAW_INDEX;
1467         }
1468         break;
1469
1470       case OP_MAIN_LINK_THREADS:
1471
1472         CHECK_MSGCOUNT;
1473         CHECK_VISIBLE;
1474         CHECK_READONLY;
1475
1476         if ((Sort & SORT_MASK) != SORT_THREADS)
1477           mutt_error _("Threading is not enabled.");
1478         else if (!CURHDR->env->message_id)
1479           mutt_error _("No Message-ID: header available to link thread");
1480         else if (!tag && (!Context->last_tag || !Context->last_tag->tagged))
1481           mutt_error _("First, please tag a message to be linked here");
1482         else 
1483         {
1484           HEADER *oldcur = CURHDR;
1485
1486           if (mutt_link_threads (CURHDR, tag ? NULL : Context->last_tag,
1487                                  Context))
1488           {
1489             mutt_sort_headers (Context, 1);
1490             menu->current = oldcur->virtual;
1491             
1492             Context->changed = 1;
1493             mutt_message _("Threads linked");
1494           }
1495           else
1496             mutt_error _("No thread linked");
1497         }
1498
1499         if (menu->menu == MENU_PAGER)
1500         {
1501           op = OP_DISPLAY_MESSAGE;
1502           continue;
1503         }
1504         else
1505           menu->redraw |= REDRAW_STATUS | REDRAW_INDEX;
1506         break;
1507
1508       case OP_MAIN_NEXT_UNDELETED:
1509
1510         CHECK_MSGCOUNT;
1511         CHECK_VISIBLE;
1512         if (menu->current >= Context->vcount - 1)
1513         {
1514           if (menu->menu == MENU_MAIN)
1515             mutt_error _("You are on the last message.");
1516           break;
1517         }
1518         if ((menu->current = ci_next_undeleted (menu->current)) == -1)
1519         {
1520           menu->current = menu->oldcurrent;
1521           if (menu->menu == MENU_MAIN)
1522             mutt_error _("No undeleted messages.");
1523         }
1524         else if (menu->menu == MENU_PAGER)
1525         {
1526           op = OP_DISPLAY_MESSAGE;
1527           continue;
1528         }
1529         else
1530           menu->redraw = REDRAW_MOTION;
1531         break;
1532
1533       case OP_NEXT_ENTRY:
1534
1535         CHECK_MSGCOUNT;
1536         CHECK_VISIBLE;
1537         if (menu->current >= Context->vcount - 1)
1538         {
1539           if (menu->menu == MENU_MAIN)
1540             mutt_error _("You are on the last message.");
1541           break;
1542         }
1543         menu->current++;
1544         if (menu->menu == MENU_PAGER)
1545         {
1546           op = OP_DISPLAY_MESSAGE;
1547           continue;
1548         }
1549         else
1550           menu->redraw = REDRAW_MOTION;
1551         break;
1552
1553       case OP_MAIN_PREV_UNDELETED:
1554
1555         CHECK_MSGCOUNT;
1556         CHECK_VISIBLE;
1557         if (menu->current < 1)
1558         {
1559           mutt_error _("You are on the first message.");
1560           break;
1561         }
1562         if ((menu->current = ci_previous_undeleted (menu->current)) == -1)
1563         {
1564           menu->current = menu->oldcurrent;
1565           if (menu->menu == MENU_MAIN)
1566             mutt_error _("No undeleted messages.");
1567         }
1568         else if (menu->menu == MENU_PAGER)
1569         {
1570           op = OP_DISPLAY_MESSAGE;
1571           continue;
1572         }
1573         else
1574           menu->redraw = REDRAW_MOTION;
1575         break;
1576
1577       case OP_PREV_ENTRY:
1578
1579         CHECK_MSGCOUNT;
1580         CHECK_VISIBLE;
1581         if (menu->current < 1)
1582         {
1583           if (menu->menu == MENU_MAIN) mutt_error _("You are on the first message.");
1584           break;
1585         }
1586         menu->current--;
1587         if (menu->menu == MENU_PAGER)
1588         {
1589           op = OP_DISPLAY_MESSAGE;
1590           continue;
1591         }
1592         else
1593           menu->redraw = REDRAW_MOTION;
1594         break;
1595
1596       case OP_DECRYPT_COPY:
1597       case OP_DECRYPT_SAVE:
1598         if (!WithCrypto)
1599           break;   
1600         /* fall thru */
1601       case OP_COPY_MESSAGE:
1602       case OP_SAVE:
1603       case OP_DECODE_COPY:
1604       case OP_DECODE_SAVE:
1605         CHECK_MSGCOUNT;
1606         CHECK_VISIBLE;
1607         if (mutt_save_message (tag ? NULL : CURHDR,
1608                                (op == OP_DECRYPT_SAVE) ||
1609                                (op == OP_SAVE) || (op == OP_DECODE_SAVE),
1610                                (op == OP_DECODE_SAVE) || (op == OP_DECODE_COPY),
1611                                (op == OP_DECRYPT_SAVE) || (op == OP_DECRYPT_COPY) ||
1612                                0,
1613                                &menu->redraw) == 0 &&
1614              (op == OP_SAVE || op == OP_DECODE_SAVE || op == OP_DECRYPT_SAVE)
1615             )
1616         {
1617           if (tag)
1618             menu->redraw |= REDRAW_INDEX;
1619           else if (option (OPTRESOLVE))
1620           {
1621             if ((menu->current = ci_next_undeleted (menu->current)) == -1)
1622             {
1623               menu->current = menu->oldcurrent;
1624               menu->redraw |= REDRAW_CURRENT;
1625             }
1626             else
1627               menu->redraw |= REDRAW_MOTION_RESYNCH;
1628           }
1629           else
1630             menu->redraw |= REDRAW_CURRENT;
1631         }
1632         break;
1633
1634       case OP_MAIN_NEXT_NEW:
1635       case OP_MAIN_NEXT_UNREAD:
1636       case OP_MAIN_PREV_NEW:
1637       case OP_MAIN_PREV_UNREAD:
1638       case OP_MAIN_NEXT_NEW_THEN_UNREAD:
1639       case OP_MAIN_PREV_NEW_THEN_UNREAD:
1640
1641       {
1642         int first_unread = -1;
1643         int first_new    = -1;
1644         
1645         CHECK_MSGCOUNT;
1646         CHECK_VISIBLE;
1647
1648         i = menu->current;
1649         menu->current = -1;
1650         for (j = 0; j != Context->vcount; j++)
1651         {
1652 #define CURHDRi Context->hdrs[Context->v2r[i]] 
1653           if (op == OP_MAIN_NEXT_NEW || op == OP_MAIN_NEXT_UNREAD || op == OP_MAIN_NEXT_NEW_THEN_UNREAD)
1654           {
1655             i++;
1656             if (i > Context->vcount - 1)
1657             {
1658               mutt_message _("Search wrapped to top.");
1659               i = 0;
1660             }
1661           }
1662           else
1663           {
1664             i--;
1665             if (i < 0)
1666             {
1667               mutt_message _("Search wrapped to bottom.");
1668               i = Context->vcount - 1;
1669             }
1670           }
1671
1672           if (CURHDRi->collapsed && (Sort & SORT_MASK) == SORT_THREADS)
1673           {
1674             if (UNREAD (CURHDRi) && first_unread == -1)
1675               first_unread = i;
1676             if (UNREAD (CURHDRi) == 1 && first_new == -1)
1677               first_new = i;
1678           }
1679           else if ((!CURHDRi->deleted && !CURHDRi->read))
1680           {
1681             if (first_unread == -1)
1682               first_unread = i;
1683             if ((!CURHDRi->old) && first_new == -1)
1684               first_new = i;
1685           }
1686           
1687           if ((op == OP_MAIN_NEXT_UNREAD || op == OP_MAIN_PREV_UNREAD) &&
1688               first_unread != -1)
1689             break;
1690           if ((op == OP_MAIN_NEXT_NEW || op == OP_MAIN_PREV_NEW ||
1691                op == OP_MAIN_NEXT_NEW_THEN_UNREAD || op == OP_MAIN_PREV_NEW_THEN_UNREAD)
1692               && first_new != -1)
1693             break;
1694         }
1695 #undef CURHDRi
1696         if ((op == OP_MAIN_NEXT_NEW || op == OP_MAIN_PREV_NEW ||
1697              op == OP_MAIN_NEXT_NEW_THEN_UNREAD || op == OP_MAIN_PREV_NEW_THEN_UNREAD) 
1698             && first_new != -1)
1699           menu->current = first_new;
1700         else if ((op == OP_MAIN_NEXT_UNREAD || op == OP_MAIN_PREV_UNREAD ||
1701                   op == OP_MAIN_NEXT_NEW_THEN_UNREAD || op == OP_MAIN_PREV_NEW_THEN_UNREAD)
1702                  && first_unread != -1)
1703           menu->current = first_unread;
1704
1705         if (menu->current == -1)
1706         {
1707           menu->current = menu->oldcurrent;
1708           mutt_error ("%s%s.", (op == OP_MAIN_NEXT_NEW || op == OP_MAIN_PREV_NEW) ? _("No new messages") : _("No unread messages"),
1709                       Context->pattern ? _(" in this limited view") : "");
1710         }
1711         else if (menu->menu == MENU_PAGER)
1712         {
1713           op = OP_DISPLAY_MESSAGE;
1714           continue;
1715         }
1716         else
1717           menu->redraw = REDRAW_MOTION;
1718         break;
1719       }
1720       case OP_FLAG_MESSAGE:
1721
1722         CHECK_MSGCOUNT;
1723         CHECK_VISIBLE;
1724         CHECK_READONLY;
1725
1726 #ifdef USE_POP
1727         if (Context->magic == M_POP)
1728         {
1729           mutt_flushinp ();
1730           mutt_error _("Can't change 'important' flag on POP server.");
1731           break;
1732         }
1733 #endif
1734
1735 #ifdef USE_IMAP
1736 CHECK_IMAP_ACL(IMAP_ACL_WRITE);
1737 #endif
1738
1739 #ifdef USE_NNTP
1740         if (Context->magic == M_NNTP)
1741         {
1742           mutt_flushinp ();
1743           mutt_error _("Can't change 'important' flag on NNTP server.");
1744           break;
1745         }
1746 #endif
1747
1748         if (tag)
1749         {
1750           for (j = 0; j < Context->vcount; j++)
1751           {
1752             if (Context->hdrs[Context->v2r[j]]->tagged)
1753               mutt_set_flag (Context, Context->hdrs[Context->v2r[j]],
1754                              M_FLAG, !Context->hdrs[Context->v2r[j]]->flagged);
1755           }
1756
1757           menu->redraw |= REDRAW_INDEX;
1758         }
1759         else
1760         {
1761           mutt_set_flag (Context, CURHDR, M_FLAG, !CURHDR->flagged);
1762           if (option (OPTRESOLVE))
1763           {
1764             if ((menu->current = ci_next_undeleted (menu->current)) == -1)
1765             {
1766               menu->current = menu->oldcurrent;
1767               menu->redraw = REDRAW_CURRENT;
1768             }
1769             else
1770               menu->redraw = REDRAW_MOTION_RESYNCH;
1771           }
1772           else
1773             menu->redraw = REDRAW_CURRENT;
1774         }
1775         menu->redraw |= REDRAW_STATUS;
1776         break;
1777
1778       case OP_TOGGLE_NEW:
1779
1780         CHECK_MSGCOUNT;
1781         CHECK_VISIBLE;
1782         CHECK_READONLY;
1783
1784 #ifdef USE_IMAP
1785 CHECK_IMAP_ACL(IMAP_ACL_SEEN);
1786 #endif
1787
1788         if (tag)
1789         {
1790           for (j = 0; j < Context->vcount; j++)
1791           {
1792             if (Context->hdrs[Context->v2r[j]]->tagged)
1793             {
1794               if (Context->hdrs[Context->v2r[j]]->read ||
1795                   Context->hdrs[Context->v2r[j]]->old)
1796                 mutt_set_flag (Context, Context->hdrs[Context->v2r[j]], M_NEW, 1);
1797               else
1798                 mutt_set_flag (Context, Context->hdrs[Context->v2r[j]], M_READ, 1);
1799             }
1800           }
1801           menu->redraw = REDRAW_STATUS | REDRAW_INDEX;
1802         }
1803         else
1804         {
1805           if (CURHDR->read || CURHDR->old)
1806             mutt_set_flag (Context, CURHDR, M_NEW, 1);
1807           else
1808             mutt_set_flag (Context, CURHDR, M_READ, 1);
1809
1810           if (option (OPTRESOLVE))
1811           {
1812             if ((menu->current = ci_next_undeleted (menu->current)) == -1)
1813             {
1814               menu->current = menu->oldcurrent;
1815               menu->redraw = REDRAW_CURRENT;
1816             }
1817             else
1818               menu->redraw = REDRAW_MOTION_RESYNCH;
1819           }
1820           else
1821             menu->redraw = REDRAW_CURRENT;
1822           menu->redraw |= REDRAW_STATUS;
1823         }
1824         break;
1825
1826       case OP_TOGGLE_WRITE:
1827
1828         CHECK_MSGCOUNT;
1829         if (mx_toggle_write (Context) == 0)
1830           menu->redraw |= REDRAW_STATUS;
1831         break;
1832
1833       case OP_MAIN_NEXT_THREAD:
1834       case OP_MAIN_NEXT_SUBTHREAD:
1835       case OP_MAIN_PREV_THREAD:
1836       case OP_MAIN_PREV_SUBTHREAD:
1837
1838         CHECK_MSGCOUNT;
1839         CHECK_VISIBLE;
1840         switch (op)
1841         {
1842           case OP_MAIN_NEXT_THREAD:
1843             menu->current = mutt_next_thread (CURHDR);
1844             break;
1845
1846           case OP_MAIN_NEXT_SUBTHREAD:
1847             menu->current = mutt_next_subthread (CURHDR);
1848             break;
1849             
1850           case OP_MAIN_PREV_THREAD:
1851             menu->current = mutt_previous_thread (CURHDR);
1852             break;
1853
1854           case OP_MAIN_PREV_SUBTHREAD:
1855             menu->current = mutt_previous_subthread (CURHDR);
1856             break;
1857         }
1858
1859         if (menu->current < 0)
1860         {
1861           menu->current = menu->oldcurrent;
1862           if (op == OP_MAIN_NEXT_THREAD || op == OP_MAIN_NEXT_SUBTHREAD)
1863             mutt_error _("No more threads.");
1864           else
1865             mutt_error _("You are on the first thread.");
1866         }
1867         else if (menu->menu == MENU_PAGER)
1868         {
1869           op = OP_DISPLAY_MESSAGE;
1870           continue;
1871         }
1872         else
1873           menu->redraw = REDRAW_MOTION;
1874         break;
1875
1876       case OP_MAIN_PARENT_MESSAGE:
1877
1878         CHECK_MSGCOUNT;
1879         CHECK_VISIBLE;
1880
1881         if ((menu->current = mutt_parent_message (Context, CURHDR)) < 0)
1882         {
1883           menu->current = menu->oldcurrent;
1884         }
1885         else if (menu->menu == MENU_PAGER)
1886         {
1887           op = OP_DISPLAY_MESSAGE;
1888           continue;
1889         }
1890         else
1891           menu->redraw = REDRAW_MOTION;
1892         break;
1893
1894       case OP_MAIN_SET_FLAG:
1895       case OP_MAIN_CLEAR_FLAG:
1896
1897         CHECK_MSGCOUNT;
1898         CHECK_VISIBLE;
1899         CHECK_READONLY;
1900         
1901 /* #ifdef USE_IMAP
1902 CHECK_IMAP_ACL(IMAP_ACL_WRITE);
1903 #endif */
1904
1905         if (mutt_change_flag (tag ? NULL : CURHDR, (op == OP_MAIN_SET_FLAG)) == 0)
1906         {
1907           menu->redraw = REDRAW_STATUS;
1908           if (tag)
1909             menu->redraw |= REDRAW_INDEX;
1910           else if (option (OPTRESOLVE))
1911           {
1912             if ((menu->current = ci_next_undeleted (menu->current)) == -1)
1913             {
1914               menu->current = menu->oldcurrent;
1915               menu->redraw |= REDRAW_CURRENT;
1916             }
1917             else
1918               menu->redraw |= REDRAW_MOTION_RESYNCH;
1919           }
1920           else
1921             menu->redraw |= REDRAW_CURRENT;
1922         }
1923         break;
1924
1925       case OP_MAIN_COLLAPSE_THREAD:
1926         CHECK_MSGCOUNT;
1927         CHECK_VISIBLE;
1928
1929         if ((Sort & SORT_MASK) != SORT_THREADS)
1930         {
1931           mutt_error _("Threading is not enabled.");
1932           break;
1933         }
1934       
1935         if (CURHDR->collapsed)
1936         {
1937           menu->current = mutt_uncollapse_thread (Context, CURHDR);
1938           mutt_set_virtual (Context);
1939           if (option (OPTUNCOLLAPSEJUMP))
1940             menu->current = mutt_thread_next_unread (Context, CURHDR);
1941         }
1942         else if (option (OPTCOLLAPSEUNREAD) || !UNREAD (CURHDR))
1943         {
1944           menu->current = mutt_collapse_thread (Context, CURHDR);
1945           mutt_set_virtual (Context);
1946         }
1947         else
1948         {
1949           mutt_error _("Thread contains unread messages.");
1950           break;
1951         }
1952
1953         menu->redraw = REDRAW_INDEX | REDRAW_STATUS;
1954
1955        break;
1956
1957       case OP_MAIN_COLLAPSE_ALL:
1958         CHECK_MSGCOUNT;
1959         CHECK_VISIBLE;
1960
1961         if ((Sort & SORT_MASK) != SORT_THREADS)
1962         {
1963           mutt_error _("Threading is not enabled.");
1964           break;
1965         }
1966
1967         {
1968           HEADER *h, *base;
1969           THREAD *thread, *top;
1970           int final;
1971           
1972           if (CURHDR->collapsed)
1973             final = mutt_uncollapse_thread (Context, CURHDR);
1974           else if (option (OPTCOLLAPSEUNREAD) || !UNREAD (CURHDR))
1975             final = mutt_collapse_thread (Context, CURHDR);
1976           else
1977             final = CURHDR->virtual;
1978           
1979           base = Context->hdrs[Context->v2r[final]];
1980           
1981           top = Context->tree;
1982           Context->collapsed = !Context->collapsed;
1983           while ((thread = top) != NULL)
1984           {
1985             while (!thread->message)
1986               thread = thread->child;
1987             h = thread->message;
1988
1989             if (h->collapsed != Context->collapsed)
1990             {
1991               if (h->collapsed)
1992                 mutt_uncollapse_thread (Context, h);
1993               else if (option (OPTCOLLAPSEUNREAD) || !UNREAD (h))
1994                 mutt_collapse_thread (Context, h);
1995             }
1996             top = top->next;
1997           }
1998           
1999           mutt_set_virtual (Context);
2000           for (j = 0; j < Context->vcount; j++)
2001           {
2002             if (Context->hdrs[Context->v2r[j]]->index == base->index)
2003             {
2004               menu->current = j;
2005               break;
2006             }
2007           }
2008           
2009           menu->redraw = REDRAW_INDEX | REDRAW_STATUS;
2010         }
2011         break;
2012       
2013       /* --------------------------------------------------------------------
2014        * These functions are invoked directly from the internal-pager
2015        */
2016
2017       case OP_BOUNCE_MESSAGE:
2018
2019         CHECK_ATTACH;
2020         CHECK_MSGCOUNT;
2021         CHECK_VISIBLE;
2022         ci_bounce_message (tag ? NULL : CURHDR, &menu->redraw);
2023         break;
2024
2025       case OP_CREATE_ALIAS:
2026
2027         mutt_create_alias (Context && Context->vcount ? CURHDR->env : NULL, NULL);
2028         MAYBE_REDRAW (menu->redraw);
2029         menu->redraw |= REDRAW_CURRENT;
2030         break;
2031
2032       case OP_QUERY:
2033         CHECK_ATTACH;
2034         mutt_query_menu (NULL, 0);
2035         MAYBE_REDRAW (menu->redraw);
2036         break;
2037
2038       case OP_PURGE_MESSAGE:
2039       case OP_DELETE:
2040
2041         CHECK_MSGCOUNT;
2042         CHECK_VISIBLE;
2043         CHECK_READONLY;
2044         
2045 #ifdef USE_IMAP
2046 CHECK_IMAP_ACL(IMAP_ACL_DELETE);
2047 #endif
2048
2049         if (tag)
2050         {
2051           mutt_tag_set_flag (M_DELETE, 1);
2052           mutt_tag_set_flag (M_PURGED, (op != OP_PURGE_MESSAGE) ? 0 : 1);
2053           if (option (OPTDELETEUNTAG))
2054             mutt_tag_set_flag (M_TAG, 0);
2055           menu->redraw = REDRAW_INDEX;
2056         }
2057         else
2058         {
2059           mutt_set_flag (Context, CURHDR, M_DELETE, 1);
2060           mutt_set_flag (Context, CURHDR, M_PURGED,
2061                          (op != OP_PURGE_MESSAGE) ? 0 : 1);
2062           if (option (OPTDELETEUNTAG))
2063             mutt_set_flag (Context, CURHDR, M_TAG, 0);
2064           if (option (OPTRESOLVE))
2065           {
2066             if ((menu->current = ci_next_undeleted (menu->current)) == -1)
2067             {
2068               menu->current = menu->oldcurrent;
2069               menu->redraw = REDRAW_CURRENT;
2070             }
2071             else if (menu->menu == MENU_PAGER)
2072             {
2073               op = OP_DISPLAY_MESSAGE;
2074               continue;
2075             }
2076             else
2077               menu->redraw |= REDRAW_MOTION_RESYNCH;
2078           }
2079           else
2080             menu->redraw = REDRAW_CURRENT;
2081         }
2082         menu->redraw |= REDRAW_STATUS;
2083         break;
2084
2085       case OP_DELETE_THREAD:
2086       case OP_DELETE_SUBTHREAD:
2087
2088         CHECK_MSGCOUNT;
2089         CHECK_VISIBLE;
2090         CHECK_READONLY;
2091
2092 #ifdef USE_IMAP
2093 CHECK_IMAP_ACL(IMAP_ACL_DELETE);
2094 #endif
2095
2096         rc = mutt_thread_set_flag (CURHDR, M_DELETE, 1,
2097                                    op == OP_DELETE_THREAD ? 0 : 1);
2098
2099         if (rc != -1)
2100         {
2101           if (option (OPTDELETEUNTAG))
2102             mutt_thread_set_flag (CURHDR, M_TAG, 0, 
2103                                   op == OP_DELETE_THREAD ? 0 : 1);
2104           if (option (OPTRESOLVE))
2105             if ((menu->current = ci_next_undeleted (menu->current)) == -1)
2106               menu->current = menu->oldcurrent;
2107           menu->redraw = REDRAW_INDEX | REDRAW_STATUS;
2108         }
2109         break;
2110
2111 #ifdef USE_NNTP
2112       case OP_CATCHUP:
2113         if (Context && Context->magic == M_NNTP)
2114         {
2115           if (mutt_newsgroup_catchup (CurrentNewsSrv,
2116                 ((NNTP_DATA *)Context->data)->group))
2117             menu->redraw = REDRAW_INDEX | REDRAW_STATUS;
2118         }
2119         break;
2120 #endif
2121
2122       case OP_DISPLAY_ADDRESS:
2123
2124         CHECK_MSGCOUNT;
2125         CHECK_VISIBLE;
2126         mutt_display_address (CURHDR->env);
2127         break;
2128
2129       case OP_ENTER_COMMAND:
2130
2131         CurrentMenu = MENU_MAIN;
2132         mutt_enter_command ();
2133         mutt_check_rescore (Context);
2134         if (option (OPTFORCEREDRAWINDEX))
2135           menu->redraw = REDRAW_FULL;
2136         unset_option (OPTFORCEREDRAWINDEX);
2137         unset_option (OPTFORCEREDRAWPAGER);
2138         break;
2139
2140       case OP_EDIT_MESSAGE:
2141
2142         CHECK_MSGCOUNT;
2143         CHECK_VISIBLE;
2144         CHECK_READONLY;
2145         CHECK_ATTACH;
2146
2147 #ifdef USE_POP
2148         if (Context->magic == M_POP)
2149         {
2150           mutt_flushinp ();
2151           mutt_error _("Can't edit message on POP server.");
2152           break;
2153         }
2154 #endif
2155
2156 #ifdef USE_IMAP
2157 CHECK_IMAP_ACL(IMAP_ACL_INSERT);
2158 #endif
2159
2160 #ifdef USE_NNTP
2161         if (Context->magic == M_NNTP)
2162         {
2163           mutt_flushinp ();
2164           mutt_error _("Can't edit message on newsserver.");
2165           break;
2166         }
2167 #endif
2168
2169         if (option (OPTPGPAUTODEC) && (tag || !(CURHDR->security & PGP_TRADITIONAL_CHECKED))) 
2170           mutt_check_traditional_pgp (tag ? NULL : CURHDR, &menu->redraw);
2171         mutt_edit_message (Context, tag ? NULL : CURHDR);
2172         menu->redraw = REDRAW_FULL;
2173
2174         break;
2175
2176       case OP_FORWARD_MESSAGE:
2177
2178         CHECK_MSGCOUNT;
2179         CHECK_VISIBLE;
2180         CHECK_ATTACH;
2181         ci_send_message (SENDFORWARD, NULL, NULL, Context, tag ? NULL : CURHDR);
2182         menu->redraw = REDRAW_FULL;
2183         break;
2184
2185
2186       case OP_FORGET_PASSPHRASE:
2187         crypt_forget_passphrase ();
2188         break;
2189
2190       case OP_GROUP_REPLY:
2191
2192         CHECK_MSGCOUNT;
2193         CHECK_VISIBLE;
2194         CHECK_ATTACH;
2195         ci_send_message (SENDREPLY|SENDGROUPREPLY, NULL, NULL, Context, tag ? NULL : CURHDR);
2196         menu->redraw = REDRAW_FULL;
2197         break;
2198
2199       case OP_LIST_REPLY:
2200
2201         CHECK_ATTACH;
2202         CHECK_MSGCOUNT;
2203         CHECK_VISIBLE;
2204         ci_send_message (SENDREPLY|SENDLISTREPLY, NULL, NULL, Context, tag ? NULL : CURHDR);
2205         menu->redraw = REDRAW_FULL;
2206         break;
2207
2208       case OP_MAIL:
2209
2210         CHECK_ATTACH;
2211         ci_send_message (0, NULL, NULL, Context, NULL);
2212         menu->redraw = REDRAW_FULL;
2213         break;
2214
2215       case OP_MAIL_KEY:
2216         if (!(WithCrypto & APPLICATION_PGP))
2217           break;
2218         CHECK_ATTACH;
2219         ci_send_message (SENDKEY, NULL, NULL, NULL, NULL);
2220         menu->redraw = REDRAW_FULL;
2221         break;
2222
2223       
2224       case OP_EXTRACT_KEYS:
2225         if (!WithCrypto)
2226           break;
2227         CHECK_MSGCOUNT;
2228         CHECK_VISIBLE;
2229         crypt_extract_keys_from_messages(tag ? NULL : CURHDR);
2230         menu->redraw = REDRAW_FULL;
2231         break;
2232
2233
2234       case OP_CHECK_TRADITIONAL:
2235         if (!(WithCrypto & APPLICATION_PGP))
2236           break;
2237         CHECK_MSGCOUNT; 
2238         CHECK_VISIBLE;
2239         if (tag || !(CURHDR->security & PGP_TRADITIONAL_CHECKED)) 
2240           mutt_check_traditional_pgp (tag ? NULL : CURHDR, &menu->redraw);
2241       
2242         if (menu->menu == MENU_PAGER)
2243         {
2244           op = OP_DISPLAY_MESSAGE;
2245           continue;
2246         }
2247         break;
2248       
2249       case OP_PIPE:
2250
2251         CHECK_MSGCOUNT;
2252         CHECK_VISIBLE;
2253         mutt_pipe_message (tag ? NULL : CURHDR);
2254         MAYBE_REDRAW (menu->redraw);
2255         break;
2256
2257       case OP_PRINT:
2258
2259         CHECK_MSGCOUNT;
2260         CHECK_VISIBLE;
2261         mutt_print_message (tag ? NULL : CURHDR);
2262         break;
2263
2264       case OP_MAIN_READ_THREAD:
2265       case OP_MAIN_READ_SUBTHREAD:
2266
2267         CHECK_MSGCOUNT;
2268         CHECK_VISIBLE;
2269         CHECK_READONLY;
2270
2271 #ifdef USE_IMAP
2272 CHECK_IMAP_ACL(IMAP_ACL_SEEN);
2273 #endif
2274
2275         rc = mutt_thread_set_flag (CURHDR, M_READ, 1,
2276                                    op == OP_MAIN_READ_THREAD ? 0 : 1);
2277
2278         if (rc != -1)
2279         {
2280           if (option (OPTRESOLVE))
2281           {
2282             if ((menu->current = (op == OP_MAIN_READ_THREAD ? 
2283                                   mutt_next_thread (CURHDR) : mutt_next_subthread (CURHDR))) == -1)
2284               menu->current = menu->oldcurrent;
2285           }
2286           menu->redraw = REDRAW_INDEX | REDRAW_STATUS;
2287         }
2288         break;
2289
2290       case OP_RECALL_MESSAGE:
2291
2292         CHECK_ATTACH;
2293         ci_send_message (SENDPOSTPONED, NULL, NULL, Context, NULL);
2294         menu->redraw = REDRAW_FULL;
2295         break;
2296
2297       case OP_RESEND:
2298       
2299         CHECK_ATTACH;
2300         CHECK_MSGCOUNT;
2301         CHECK_VISIBLE;
2302       
2303         if (tag)
2304         {
2305           for (j = 0; j < Context->vcount; j++)
2306           {
2307             if (Context->hdrs[Context->v2r[j]]->tagged)
2308               mutt_resend_message (NULL, Context, Context->hdrs[Context->v2r[j]]);
2309           }
2310         }
2311         else
2312           mutt_resend_message (NULL, Context, CURHDR);
2313       
2314         menu->redraw = REDRAW_FULL;
2315         break;
2316
2317 #ifdef USE_NNTP
2318       case OP_POST:
2319       case OP_FOLLOWUP:
2320       case OP_FORWARD_TO_GROUP:
2321
2322         CHECK_ATTACH;
2323         if ((op == OP_FOLLOWUP || op == OP_FORWARD_TO_GROUP) &&
2324             Context && Context->msgcount == 0) {
2325           mutt_error (_("There are no messages."));
2326           sleep (2);
2327         } else if (op != OP_FOLLOWUP || !CURHDR->env->followup_to ||
2328             mutt_strcasecmp (CURHDR->env->followup_to, "poster") ||
2329             query_quadoption (OPT_FOLLOWUPTOPOSTER,_("Reply by mail as poster prefers?")) != M_YES)
2330         {
2331           if (Context && Context->magic == M_NNTP &&
2332               !((NNTP_DATA *)Context->data)->allowed &&
2333               query_quadoption (OPT_TOMODERATED, _("Posting to this group not allowed, may be moderated. Continue?")) != M_YES)
2334             break;
2335           if (op == OP_POST)
2336             ci_send_message (SENDNEWS, NULL, NULL, Context, NULL);
2337           else
2338           {
2339             CHECK_MSGCOUNT;
2340             if (op == OP_FOLLOWUP)
2341               ci_send_message (SENDNEWS|SENDREPLY, NULL, NULL, Context,
2342                                tag ? NULL : CURHDR);
2343             else
2344               ci_send_message (SENDNEWS|SENDFORWARD, NULL, NULL, Context,
2345                                tag ? NULL : CURHDR);
2346           }
2347           menu->redraw = REDRAW_FULL;
2348           break;
2349         }
2350 #endif
2351       
2352       case OP_REPLY:
2353
2354         CHECK_ATTACH;
2355         CHECK_MSGCOUNT;
2356         CHECK_VISIBLE;
2357         ci_send_message (SENDREPLY, NULL, NULL, Context, tag ? NULL : CURHDR);
2358         menu->redraw = REDRAW_FULL;
2359         break;
2360
2361       case OP_SHELL_ESCAPE:
2362
2363         mutt_shell_escape ();
2364         MAYBE_REDRAW (menu->redraw);
2365         break;
2366
2367       case OP_TAG_THREAD:
2368       case OP_TAG_SUBTHREAD:
2369
2370         CHECK_MSGCOUNT;
2371         CHECK_VISIBLE;
2372         rc = mutt_thread_set_flag (CURHDR, M_TAG, !CURHDR->tagged,
2373                                    op == OP_TAG_THREAD ? 0 : 1);
2374         
2375         if (rc != -1)
2376         {
2377           if (option (OPTRESOLVE))
2378           {
2379             menu->current = mutt_next_thread (CURHDR);
2380
2381             if (menu->current == -1)
2382               menu->current = menu->oldcurrent;
2383           }
2384           menu->redraw = REDRAW_INDEX | REDRAW_STATUS;
2385         }
2386         break;
2387
2388       case OP_UNDELETE:
2389
2390         CHECK_MSGCOUNT;
2391         CHECK_VISIBLE;
2392         CHECK_READONLY;
2393
2394 #ifdef USE_IMAP
2395 CHECK_IMAP_ACL(IMAP_ACL_DELETE);
2396 #endif
2397         
2398         if (tag)
2399         {
2400           mutt_tag_set_flag (M_DELETE, 0);
2401           mutt_tag_set_flag (M_PURGED, 0);
2402           menu->redraw = REDRAW_INDEX;
2403         }
2404         else
2405         {
2406           mutt_set_flag (Context, CURHDR, M_DELETE, 0);
2407           mutt_set_flag (Context, CURHDR, M_PURGED, 0);
2408           if (option (OPTRESOLVE) && menu->current < Context->vcount - 1)
2409           {
2410             menu->current++;
2411             menu->redraw = REDRAW_MOTION_RESYNCH;
2412           }
2413           else
2414             menu->redraw = REDRAW_CURRENT;
2415         }
2416         menu->redraw |= REDRAW_STATUS;
2417         break;
2418
2419       case OP_UNDELETE_THREAD:
2420       case OP_UNDELETE_SUBTHREAD:
2421
2422         CHECK_MSGCOUNT;
2423         CHECK_VISIBLE;
2424         CHECK_READONLY;
2425
2426 #ifdef USE_IMAP
2427 CHECK_IMAP_ACL(IMAP_ACL_DELETE);
2428 #endif
2429
2430         rc = mutt_thread_set_flag (CURHDR, M_DELETE, 0,
2431                                    op == OP_UNDELETE_THREAD ? 0 : 1)
2432           + mutt_thread_set_flag (CURHDR, M_PURGED, 0,
2433                                   op == OP_UNDELETE_THREAD ? 0 : 1);
2434
2435         if (rc > -1)
2436         {
2437           if (option (OPTRESOLVE))
2438           {
2439             if (op == OP_UNDELETE_THREAD)
2440               menu->current = mutt_next_thread (CURHDR);
2441             else
2442               menu->current = mutt_next_subthread (CURHDR);
2443
2444             if (menu->current == -1)
2445               menu->current = menu->oldcurrent;
2446           }
2447           menu->redraw = REDRAW_INDEX | REDRAW_STATUS;
2448         }
2449         break;
2450
2451       case OP_VERSION:
2452         mutt_version ();
2453         break;
2454
2455       case OP_BUFFY_LIST:
2456         mutt_buffy_list ();
2457         menu->redraw = REDRAW_FULL;
2458         break;
2459
2460       case OP_VIEW_ATTACHMENTS:
2461         CHECK_MSGCOUNT;
2462         CHECK_VISIBLE;
2463         mutt_view_attachments (CURHDR);
2464         if (CURHDR->attach_del)
2465           Context->changed = 1;
2466         menu->redraw = REDRAW_FULL;
2467         break;
2468
2469       case OP_END_COND:
2470         break;
2471
2472       case OP_WHAT_KEY:
2473         mutt_what_key();
2474         break;
2475
2476       case OP_SIDEBAR_SCROLL_UP:
2477       case OP_SIDEBAR_SCROLL_DOWN:
2478       case OP_SIDEBAR_NEXT:
2479       case OP_SIDEBAR_PREV:
2480       case OP_SIDEBAR_NEXT_NEW:
2481       case OP_SIDEBAR_PREV_NEW:
2482         scroll_sidebar(op, menu->menu);
2483             break;
2484       default:
2485         if (menu->menu == MENU_MAIN)
2486           km_error_key (MENU_MAIN);
2487     }
2488
2489     if (menu->menu == MENU_PAGER)
2490     {
2491       menu->menu = MENU_MAIN;
2492       menu->redraw = REDRAW_FULL;
2493 #if 0
2494       set_option (OPTWEED); /* turn header weeding back on. */
2495 #endif
2496     }
2497
2498     if (done) break;
2499   }
2500
2501 #ifdef USE_IMAP
2502   /* Close all open IMAP connections */
2503   if (!attach_msg)
2504     imap_logout_all ();
2505 #endif
2506 #ifdef USE_NNTP
2507   /* Close all open NNTP connections */
2508   if (!attach_msg)
2509     nntp_logout_all ();
2510 #endif
2511
2512   mutt_menuDestroy (&menu);
2513   return (close);
2514 }
2515
2516 void mutt_set_header_color (CONTEXT *ctx, HEADER *curhdr)
2517 {
2518   COLOR_LINE *color;
2519
2520   if (!curhdr)
2521     return;
2522   
2523   for (color = ColorIndexList; color; color = color->next)
2524    if (mutt_pattern_exec (color->color_pattern, M_MATCH_FULL_ADDRESS, ctx, curhdr))
2525    {
2526       curhdr->pair = color->pair;
2527       return;
2528    }
2529   curhdr->pair = ColorDefs[MT_COLOR_NORMAL];
2530 }