2 * Copyright notice from original mutt:
3 * Copyright (C) 1996-2000 Michael R. Elkins <me@mutt.org>
5 * This file is part of mutt-ng, see http://www.muttng.org/.
6 * It's licensed under the GNU General Public License,
7 * please see the file GPL in the top level source directory.
14 #include <lib-lib/mem.h>
15 #include <lib-lib/str.h>
16 #include <lib-lib/macros.h>
17 #include <lib-lib/file.h>
18 #include <lib-lib/mapping.h>
23 #include "mutt_curses.h"
24 #include "mutt_menu.h"
32 #include "imap/mx_imap.h"
49 static struct mapping_t FolderHelp[] = {
50 {N_("Exit"), OP_EXIT},
51 {N_("Chdir"), OP_CHANGE_DIRECTORY},
52 {N_("Mask"), OP_ENTER_MASK},
53 {N_("Help"), OP_HELP},
58 static struct mapping_t FolderNewsHelp[] = {
59 {N_("Exit"), OP_EXIT},
60 {N_("List"), OP_TOGGLE_MAILBOXES},
61 {N_("Subscribe"), OP_BROWSER_SUBSCRIBE},
62 {N_("Unsubscribe"), OP_BROWSER_UNSUBSCRIBE},
63 {N_("Catchup"), OP_CATCHUP},
64 {N_("Mask"), OP_ENTER_MASK},
65 {N_("Help"), OP_HELP},
70 typedef struct folder_t {
71 struct folder_file *ff;
75 static char LastDir[_POSIX_PATH_MAX] = "";
76 static char LastDirBackup[_POSIX_PATH_MAX] = "";
78 /* Frees up the memory allocated for the local-global variables. */
79 static void destroy_state (struct browser_state *state)
83 for (c = 0; c < state->entrylen; c++) {
84 p_delete(&((state->entry)[c].name));
85 p_delete(&((state->entry)[c].desc));
86 p_delete(&((state->entry)[c].st));
89 p_delete(&state->folder);
91 p_delete(&state->entry);
94 static int browser_compare_subject (const void *a, const void *b)
96 struct folder_file *pa = (struct folder_file *) a;
97 struct folder_file *pb = (struct folder_file *) b;
99 int r = strcoll(NONULL(pa->name), NONULL(pb->name));
101 return ((BrowserSort & SORT_REVERSE) ? -r : r);
104 static int browser_compare_date (const void *a, const void *b)
106 struct folder_file *pa = (struct folder_file *) a;
107 struct folder_file *pb = (struct folder_file *) b;
109 int r = pa->mtime - pb->mtime;
111 return ((BrowserSort & SORT_REVERSE) ? -r : r);
114 static int browser_compare_size (const void *a, const void *b)
116 struct folder_file *pa = (struct folder_file *) a;
117 struct folder_file *pb = (struct folder_file *) b;
119 int r = pa->size - pb->size;
121 return ((BrowserSort & SORT_REVERSE) ? -r : r);
124 static void browser_sort (struct browser_state *state)
126 int (*f) (const void *, const void *);
128 switch (BrowserSort & SORT_MASK) {
133 if (option (OPTNEWS))
136 f = browser_compare_date;
140 if (option (OPTNEWS))
143 f = browser_compare_size;
147 f = browser_compare_subject;
150 qsort (state->entry, state->entrylen, sizeof (struct folder_file), f);
153 static int link_is_dir (const char *folder, const char *path)
156 char fullpath[_POSIX_PATH_MAX];
158 mutt_concat_path(fullpath, sizeof(fullpath), folder, path);
160 if (stat (fullpath, &st) == 0)
161 return (S_ISDIR (st.st_mode));
166 static const char *folder_format_str (char *dest, size_t destlen, char op,
167 const char *src, const char *fmt,
168 const char *ifstring,
169 const char *elsestring,
170 unsigned long data, format_flag flags)
172 char fn[SHORT_STRING], tmp[SHORT_STRING], permission[11], date[16];
175 FOLDER *folder = (FOLDER *) data;
178 int optional = (flags & M_FORMAT_OPTIONAL);
182 snprintf (tmp, sizeof (tmp), "%%%sd", fmt);
183 snprintf (dest, destlen, tmp, folder->num + 1);
187 if (folder->ff->st != NULL) {
190 tnow - folder->ff->st->st_mtime <
191 31536000 ? "%b %d %H:%M" : "%b %d %Y";
192 strftime (date, sizeof (date), t_fmt,
193 localtime (&folder->ff->st->st_mtime));
194 mutt_format_s (dest, destlen, fmt, date);
197 mutt_format_s (dest, destlen, fmt, "");
205 if (folder->ff->imap)
206 s = NONULL (folder->ff->desc);
209 s = NONULL (folder->ff->name);
211 snprintf (fn, sizeof (fn), "%s%s", s,
212 folder->ff->st ? (S_ISLNK (folder->ff->st->st_mode) ? "@" :
213 (S_ISDIR (folder->ff->st->st_mode) ? "/" :
214 ((folder->ff->st->st_mode & S_IXUSR) !=
215 0 ? "*" : ""))) : "");
217 mutt_format_s (dest, destlen, fmt, fn);
221 if (folder->ff->st != NULL) {
222 snprintf (permission, sizeof (permission), "%c%c%c%c%c%c%c%c%c%c",
223 S_ISDIR (folder->ff->st->
224 st_mode) ? 'd' : (S_ISLNK (folder->ff->st->
225 st_mode) ? 'l' : '-'),
226 (folder->ff->st->st_mode & S_IRUSR) != 0 ? 'r' : '-',
227 (folder->ff->st->st_mode & S_IWUSR) != 0 ? 'w' : '-',
228 (folder->ff->st->st_mode & S_ISUID) !=
229 0 ? 's' : (folder->ff->st->st_mode & S_IXUSR) !=
231 (folder->ff->st->st_mode & S_IRGRP) != 0 ? 'r' : '-',
232 (folder->ff->st->st_mode & S_IWGRP) != 0 ? 'w' : '-',
233 (folder->ff->st->st_mode & S_ISGID) !=
234 0 ? 's' : (folder->ff->st->st_mode & S_IXGRP) !=
236 (folder->ff->st->st_mode & S_IROTH) != 0 ? 'r' : '-',
237 (folder->ff->st->st_mode & S_IWOTH) != 0 ? 'w' : '-',
238 (folder->ff->st->st_mode & S_ISVTX) !=
239 0 ? 't' : (folder->ff->st->st_mode & S_IXOTH) !=
241 mutt_format_s (dest, destlen, fmt, permission);
244 else if (folder->ff->imap) {
245 /* mark folders with subfolders AND mail */
246 snprintf (permission, sizeof (permission), "IMAP %c",
247 (folder->ff->inferiors
248 && folder->ff->selectable) ? '+' : ' ');
249 mutt_format_s (dest, destlen, fmt, permission);
253 mutt_format_s (dest, destlen, fmt, "");
257 if (folder->ff->st != NULL) {
258 if ((gr = getgrgid (folder->ff->st->st_gid)))
259 mutt_format_s (dest, destlen, fmt, gr->gr_name);
261 snprintf (tmp, sizeof (tmp), "%%%sld", fmt);
262 snprintf (dest, destlen, tmp, folder->ff->st->st_gid);
266 mutt_format_s (dest, destlen, fmt, "");
270 if (folder->ff->st != NULL) {
271 snprintf (tmp, sizeof (tmp), "%%%sd", fmt);
272 snprintf (dest, destlen, tmp, folder->ff->st->st_nlink);
275 mutt_format_s (dest, destlen, fmt, "");
280 if (imap_is_magic (folder->ff->desc, NULL) == M_IMAP) {
282 snprintf (tmp, sizeof (tmp), "%%%sd", fmt);
283 snprintf (dest, destlen, tmp, folder->ff->new);
285 else if (!folder->ff->new)
290 snprintf (tmp, sizeof (tmp), "%%%sc", fmt);
291 snprintf (dest, destlen, tmp, folder->ff->new ? 'N' : ' ');
295 if (folder->ff->st != NULL) {
296 snprintf (tmp, sizeof (tmp), "%%%sld", fmt);
297 snprintf (dest, destlen, tmp, (long) folder->ff->st->st_size);
300 mutt_format_s (dest, destlen, fmt, "");
304 snprintf (tmp, sizeof (tmp), "%%%sc", fmt);
305 snprintf (dest, destlen, tmp, folder->ff->tagged ? '*' : ' ');
309 if (folder->ff->st != NULL) {
310 if ((pw = getpwuid (folder->ff->st->st_uid)))
311 mutt_format_s (dest, destlen, fmt, pw->pw_name);
313 snprintf (tmp, sizeof (tmp), "%%%sld", fmt);
314 snprintf (dest, destlen, tmp, folder->ff->st->st_uid);
318 mutt_format_s (dest, destlen, fmt, "");
322 snprintf (tmp, sizeof (tmp), "%%%sc", fmt);
323 snprintf (dest, destlen, tmp, op);
328 mutt_FormatString (dest, destlen, ifstring, folder_format_str, data, 0);
329 else if (flags & M_FORMAT_OPTIONAL)
330 mutt_FormatString (dest, destlen, elsestring, folder_format_str, data, 0);
336 static const char *newsgroup_format_str (char *dest, size_t destlen, char op,
337 const char *src, const char *fmt,
338 const char *ifstring,
339 const char *elsestring,
343 char fn[SHORT_STRING], tmp[SHORT_STRING];
344 FOLDER *folder = (FOLDER *) data;
348 snprintf (tmp, sizeof (tmp), "%%%sd", fmt);
349 snprintf (dest, destlen, tmp, folder->num + 1);
353 m_strcpy(fn, sizeof(fn), folder->ff->name);
354 snprintf (tmp, sizeof (tmp), "%%%ss", fmt);
355 snprintf (dest, destlen, tmp, fn);
359 snprintf (tmp, sizeof (tmp), "%%%sc", fmt);
360 if (folder->ff->nd->subscribed)
361 snprintf (dest, destlen, tmp, ' ');
363 snprintf (dest, destlen, tmp, folder->ff->new ? 'N' : 'u');
367 snprintf (tmp, sizeof (tmp), "%%%sc", fmt);
368 if (folder->ff->nd->deleted)
369 snprintf (dest, destlen, tmp, 'D');
371 snprintf (dest, destlen, tmp, folder->ff->nd->allowed ? ' ' : '-');
375 if (flags & M_FORMAT_OPTIONAL) {
376 if (folder->ff->nd->unread != 0)
377 mutt_FormatString (dest, destlen, ifstring, newsgroup_format_str,
380 mutt_FormatString (dest, destlen, elsestring, newsgroup_format_str,
383 else if (Context && Context->data == folder->ff->nd) {
384 snprintf (tmp, sizeof (tmp), "%%%sd", fmt);
385 snprintf (dest, destlen, tmp, Context->unread);
388 snprintf (tmp, sizeof (tmp), "%%%sd", fmt);
389 snprintf (dest, destlen, tmp, folder->ff->nd->unread);
394 if (Context && Context->data == folder->ff->nd) {
395 snprintf (tmp, sizeof (tmp), "%%%sd", fmt);
396 snprintf (dest, destlen, tmp, Context->new);
398 else if (option (OPTMARKOLD) &&
399 folder->ff->nd->lastCached >= folder->ff->nd->firstMessage &&
400 folder->ff->nd->lastCached <= folder->ff->nd->lastMessage) {
401 snprintf (tmp, sizeof (tmp), "%%%sd", fmt);
402 snprintf (dest, destlen, tmp,
403 folder->ff->nd->lastMessage - folder->ff->nd->lastCached);
406 snprintf (tmp, sizeof (tmp), "%%%sd", fmt);
407 snprintf (dest, destlen, tmp, folder->ff->nd->unread);
412 if (folder->ff->nd->desc != NULL) {
413 snprintf (tmp, sizeof (tmp), "%%%ss", fmt);
414 snprintf (dest, destlen, tmp, folder->ff->nd->desc);
417 snprintf (tmp, sizeof (tmp), "%%%ss", fmt);
418 snprintf (dest, destlen, tmp, "");
424 #endif /* USE_NNTP */
427 static void add_folder (MUTTMENU * m, struct browser_state *state,
428 const char *name, const struct stat *s,
431 static void add_folder (MUTTMENU * m, struct browser_state *state,
432 const char *name, const struct stat *s,
436 if (state->entrylen == state->entrymax) {
437 /* need to allocate more space */
438 p_realloc(&state->entry, state->entrymax += 256);
439 p_clear(&state->entry[state->entrylen], 256);
441 m->data = state->entry;
445 (state->entry)[state->entrylen].mode = s->st_mode;
446 (state->entry)[state->entrylen].mtime = s->st_mtime;
447 (state->entry)[state->entrylen].size = s->st_size;
448 (state->entry)[state->entrylen].st = p_dup(s, 1);
451 (state->entry)[state->entrylen].new = new;
452 (state->entry)[state->entrylen].name = m_strdup(name);
453 (state->entry)[state->entrylen].desc = m_strdup(name);
455 (state->entry)[state->entrylen].imap = 0;
458 if (option (OPTNEWS))
459 (state->entry)[state->entrylen].nd = (NNTP_DATA *) data;
464 static void init_state (struct browser_state *state, MUTTMENU * menu)
467 state->entrymax = 256;
468 state->entry = p_new(struct folder_file, state->entrymax);
470 state->imap_browse = 0;
473 menu->data = state->entry;
476 /* get list of all files/newsgroups with mask */
477 static int examine_directory (MUTTMENU * menu, struct browser_state *state,
478 char *d, const char *prefix)
481 if (option (OPTNEWS)) {
484 NNTP_SERVER *news = CurrentNewsSrv;
486 /* buffy_check (0); */
487 init_state (state, menu);
489 for (tmp = news->list; tmp; tmp = tmp->next) {
490 if (!(data = (NNTP_DATA *) tmp->data))
492 nntp_sync_sidebar (data);
493 if (prefix && *prefix && strncmp (prefix, data->group,
494 m_strlen(prefix)) != 0)
496 if (!((regexec (Mask.rx, data->group, 0, NULL, 0) == 0) ^ Mask.not))
499 add_folder (menu, state, data->group, NULL, data, data->new);
501 add_folder (menu, state, data->group, NULL, data->new);
504 sidebar_draw (CurrentMenu);
507 #endif /* USE_NNTP */
512 char buffer[_POSIX_PATH_MAX + SHORT_STRING];
515 while (stat (d, &s) == -1) {
516 if (errno == ENOENT) {
517 /* The last used directory is deleted, try to use the parent dir. */
518 char *c = strrchr (d, '/');
529 if (!S_ISDIR (s.st_mode)) {
530 mutt_error (_("%s is not a directory."), d);
536 if ((dp = opendir (d)) == NULL) {
541 init_state (state, menu);
543 while ((de = readdir (dp)) != NULL) {
544 if (m_strcmp(de->d_name, ".") == 0)
545 continue; /* we don't need . */
547 if (prefix && *prefix
548 && m_strncmp(prefix, de->d_name, m_strlen(prefix)) != 0)
550 if (!((regexec (Mask.rx, de->d_name, 0, NULL, 0) == 0) ^ Mask.not))
553 mutt_concat_path(buffer, sizeof(buffer), d, de->d_name);
554 if (lstat (buffer, &s) == -1)
557 if ((!S_ISREG (s.st_mode)) && (!S_ISDIR (s.st_mode)) &&
558 (!S_ISLNK (s.st_mode)))
561 i = buffy_lookup (buffer);
563 add_folder (menu, state, de->d_name, &s, NULL, i >= 0 ? ((BUFFY*) Incoming->data[i])->new : 0);
565 add_folder (menu, state, de->d_name, &s, i >= 0 ? ((BUFFY*) Incoming->data[i])->new : 0);
570 sidebar_draw (CurrentMenu);
571 browser_sort (state);
575 /* get list of mailboxes/subscribed newsgroups */
576 static int examine_mailboxes (MUTTMENU * menu, struct browser_state *state)
579 char buffer[LONG_STRING];
582 if (option (OPTNEWS)) {
585 NNTP_SERVER *news = CurrentNewsSrv;
587 /* buffy_check (0); */
588 init_state (state, menu);
590 for (tmp = news->list; tmp; tmp = tmp->next) {
591 if ((data = (NNTP_DATA*) tmp->data) == NULL)
593 nntp_sync_sidebar (data);
594 if ((data->new || (data->subscribed &&
595 (!option (OPTSHOWONLYUNREAD)|| data->unread))))
596 add_folder (menu, state, data->group, NULL, data, data->new);
598 sidebar_draw (CurrentMenu);
610 init_state (state, menu);
612 for (i = 0; i < Incoming->length; i++) {
613 tmp = (BUFFY*) Incoming->data[i];
614 tmp->magic = mx_get_magic (tmp->path);
616 if (tmp->magic == M_IMAP) {
618 add_folder (menu, state, tmp->path, NULL, NULL, tmp->new);
620 add_folder (menu, state, tmp->path, NULL, tmp->new);
626 if (tmp->magic == M_POP) {
628 add_folder (menu, state, tmp->path, NULL, NULL, tmp->new);
630 add_folder (menu, state, tmp->path, NULL, tmp->new);
636 if (tmp->magic == M_NNTP) {
637 add_folder (menu, state, tmp->path, NULL, NULL, tmp->new);
641 if (lstat (tmp->path, &s) == -1)
644 if ((!S_ISREG (s.st_mode)) && (!S_ISDIR (s.st_mode)) &&
645 (!S_ISLNK (s.st_mode)))
648 m_strcpy(buffer, sizeof(buffer), NONULL(tmp->path));
649 mutt_pretty_mailbox (buffer);
652 add_folder (menu, state, buffer, &s, NULL, tmp->new);
654 add_folder (menu, state, buffer, &s, tmp->new);
658 browser_sort (state);
662 static int select_file_search (MUTTMENU * menu, regex_t * re, int n)
665 if (option (OPTNEWS))
667 (re, ((struct folder_file *) menu->data)[n].desc, 0, NULL, 0));
670 (re, ((struct folder_file *) menu->data)[n].name, 0, NULL, 0));
673 static void folder_entry (char *s, size_t slen, MUTTMENU * menu, int num)
677 folder.ff = &((struct folder_file *) menu->data)[num];
681 if (option (OPTNEWS))
682 mutt_FormatString (s, slen, NONULL (GroupFormat), newsgroup_format_str,
683 (unsigned long) &folder, M_FORMAT_ARROWCURSOR);
686 mutt_FormatString (s, slen, NONULL (FolderFormat), folder_format_str,
687 (unsigned long) &folder, M_FORMAT_ARROWCURSOR);
690 static void init_menu (struct browser_state *state, MUTTMENU * menu,
691 char *title, size_t titlelen, int buffy)
693 char path[_POSIX_PATH_MAX];
695 menu->max = state->entrylen;
697 if (menu->current >= menu->max)
698 menu->current = menu->max - 1;
699 if (menu->current < 0)
701 if (menu->top > menu->current)
707 if (option (OPTNEWS)) {
709 snprintf (title, titlelen, "%s", _("Subscribed newsgroups"));
711 snprintf (title, titlelen, _("Newsgroups on server [%s]"),
712 CurrentNewsSrv->conn->account.host);
717 snprintf(title, titlelen, _("Mailboxes [%d]"), buffy_check(0));
719 m_strcpy(path, sizeof(path), LastDir);
720 mutt_pretty_mailbox (path);
722 if (state->imap_browse && option (OPTIMAPLSUB))
723 snprintf (title, titlelen, _("Subscribed [%s], File mask: %s"),
724 path, NONULL (Mask.pattern));
727 snprintf (title, titlelen, _("Directory [%s], File mask: %s"),
728 path, NONULL (Mask.pattern));
730 menu->redraw = REDRAW_FULL;
733 static int file_tag (MUTTMENU * menu, int n, int m)
735 struct folder_file *ff = &(((struct folder_file *) menu->data)[n]);
738 if (S_ISDIR (ff->mode)
739 || (S_ISLNK (ff->mode) && link_is_dir (LastDir, ff->name))) {
740 mutt_error _("Can't attach a directory!");
746 ff->tagged = (m >= 0 ? m : !ff->tagged);
748 return ff->tagged - ot;
751 void _mutt_select_file (char *f, size_t flen, int flags, char ***files,
754 char buf[_POSIX_PATH_MAX];
755 char prefix[_POSIX_PATH_MAX] = "";
756 char helpstr[SHORT_STRING];
758 struct browser_state state;
761 int i, killPrefix = 0;
762 int multiple = (flags & M_SEL_MULTI) ? 1 : 0;
763 int folder = (flags & M_SEL_FOLDER) ? 1 : 0;
764 int buffy = (flags & M_SEL_BUFFY) ? 1 : 0;
766 buffy = buffy && folder;
771 m_strcpy(LastDirBackup, sizeof(LastDirBackup), LastDir);
774 if (option (OPTNEWS)) {
776 m_strcpy(prefix, sizeof(prefix), f);
780 /* default state for news reader mode is browse subscribed newsgroups */
782 for (list = CurrentNewsSrv->list; list; list = list->next) {
783 NNTP_DATA *data = (NNTP_DATA *) list->data;
785 if (data && data->subscribed) {
795 mutt_expand_path (f, flen);
797 if (imap_is_magic (f, NULL) == M_IMAP) {
798 init_state (&state, NULL);
799 state.imap_browse = 1;
800 if (!imap_browse (f, &state))
801 m_strcpy(LastDir, sizeof(LastDir), state.folder);
805 for (i = m_strlen(f) - 1; i > 0 && f[i] != '/'; i--);
808 i = MIN(ssizeof(LastDir) - 1, i);
809 m_strcpy(LastDir, sizeof(LastDir), f);
812 getcwd(LastDir, sizeof(LastDir));
813 m_strcat(LastDir, sizeof(LastDir), "/");
814 m_strncat(LastDir, sizeof(LastDir), f, i);
819 strcpy (LastDir, "/"); /* __STRCPY_CHECKED__ */
821 getcwd (LastDir, sizeof (LastDir));
824 if (i <= 0 && f[0] != '/')
825 m_strcpy(prefix, sizeof(prefix), f);
827 m_strcpy(prefix, sizeof(prefix), f + i + 1);
835 getcwd (LastDir, sizeof (LastDir));
836 else if (!LastDir[0])
837 m_strcpy(LastDir, sizeof(LastDir), NONULL(Maildir));
840 if (!buffy && imap_is_magic (LastDir, NULL) == M_IMAP) {
841 init_state (&state, NULL);
842 state.imap_browse = 1;
843 imap_browse (LastDir, &state);
844 browser_sort (&state);
852 if (examine_mailboxes (NULL, &state) == -1)
857 if (!state.imap_browse)
859 if (examine_directory (NULL, &state, LastDir, prefix) == -1)
862 menu = mutt_new_menu ();
863 menu->menu = MENU_FOLDER;
864 menu->make_entry = folder_entry;
865 menu->search = select_file_search;
867 menu->data = state.entry;
869 menu->tag = file_tag;
871 menu->help = mutt_compile_help (helpstr, sizeof (helpstr), MENU_FOLDER,
873 (option (OPTNEWS)) ? FolderNewsHelp :
877 init_menu (&state, menu, title, sizeof (title), buffy);
880 switch (i = mutt_menuLoop (menu)) {
881 case OP_GENERIC_SELECT_ENTRY:
883 if (!state.entrylen) {
884 mutt_error _("No files match the file mask");
889 if (S_ISDIR (state.entry[menu->current].mode) ||
890 (S_ISLNK (state.entry[menu->current].mode) &&
891 link_is_dir (LastDir, state.entry[menu->current].name))
893 || state.entry[menu->current].inferiors
896 /* make sure this isn't a MH or maildir mailbox */
898 m_strcpy(buf, sizeof(buf), state.entry[menu->current].name);
899 mutt_expand_path (buf, sizeof (buf));
902 else if (state.imap_browse) {
903 m_strcpy(buf, sizeof(buf), state.entry[menu->current].name);
907 mutt_concat_path(buf, sizeof(buf), LastDir,
908 state.entry[menu->current].name);
910 if ((mx_get_magic (buf) <= 0)
912 || state.entry[menu->current].inferiors
915 char OldLastDir[_POSIX_PATH_MAX];
917 /* save the old directory */
918 m_strcpy(OldLastDir, sizeof(OldLastDir), LastDir);
920 if (m_strcmp(state.entry[menu->current].name, "..") == 0) {
921 if (m_strcmp("..", LastDir + m_strlen(LastDir) - 2) == 0)
922 strcat (LastDir, "/.."); /* __STRCAT_CHECKED__ */
924 char *p = strrchr (LastDir + 1, '/');
929 if (LastDir[0] == '/')
932 strcat (LastDir, "/.."); /* __STRCAT_CHECKED__ */
937 m_strcpy(LastDir, sizeof(LastDir),
938 state.entry[menu->current].name);
939 mutt_expand_path (LastDir, sizeof (LastDir));
942 else if (state.imap_browse) {
946 m_strcpy(LastDir, sizeof(LastDir),
947 state.entry[menu->current].name);
948 /* tack on delimiter here */
949 n = m_strlen(LastDir) + 1;
951 /* special case "" needs no delimiter */
952 url_parse_ciss (&url, state.entry[menu->current].name);
954 (state.entry[menu->current].delim != '\0') &&
955 (n < sizeof (LastDir))) {
957 LastDir[n - 1] = state.entry[menu->current].delim;
962 char tmp[_POSIX_PATH_MAX];
964 mutt_concat_path(tmp, sizeof(tmp), LastDir,
965 state.entry[menu->current].name);
966 m_strcpy(LastDir, sizeof(LastDir), tmp);
969 destroy_state (&state);
976 if (state.imap_browse) {
977 init_state (&state, NULL);
978 state.imap_browse = 1;
979 imap_browse (LastDir, &state);
980 browser_sort (&state);
981 menu->data = state.entry;
985 if (examine_directory (menu, &state, LastDir, prefix) == -1) {
986 /* try to restore the old values */
987 m_strcpy(LastDir, sizeof(LastDir), OldLastDir);
988 if (examine_directory (menu, &state, LastDir, prefix) == -1) {
989 m_strcpy(LastDir, sizeof(LastDir), NONULL(Homedir));
995 init_menu (&state, menu, title, sizeof (title), buffy);
1001 if (buffy || option (OPTNEWS)) /* news have not path */
1006 m_strcpy(f, flen, state.entry[menu->current].name);
1007 mutt_expand_path (f, flen);
1010 else if (state.imap_browse)
1011 m_strcpy(f, flen, state.entry[menu->current].name);
1014 mutt_concat_path(f, flen, LastDir, state.entry[menu->current].name);
1016 /* Fall through to OP_EXIT */
1026 *numfiles = menu->tagged;
1027 tfiles = p_new(char *, *numfiles);
1028 for (h = 0, j = 0; h < state.entrylen; i++) {
1029 struct folder_file ff = state.entry[i];
1030 char full[_POSIX_PATH_MAX];
1033 mutt_concat_path(full, sizeof(full), LastDir, ff.name);
1034 mutt_expand_path (full, sizeof (full));
1035 tfiles[j++] = m_strdup(full);
1040 else if (f[0]) { /* no tagged entries. return selected entry */
1042 tfiles = p_new(char *, *numfiles);
1043 mutt_expand_path (f, flen);
1044 tfiles[0] = m_strdup(f);
1049 destroy_state (&state);
1050 mutt_menuDestroy (&menu);
1053 case OP_BROWSER_TELL:
1055 mutt_message ("%s", state.entry[menu->current].name);
1059 case OP_BROWSER_TOGGLE_LSUB:
1060 if (option (OPTIMAPLSUB)) {
1061 unset_option (OPTIMAPLSUB);
1064 set_option (OPTIMAPLSUB);
1066 mutt_ungetch (0, OP_CHECK_NEW);
1069 case OP_CREATE_MAILBOX:
1070 if (!state.imap_browse)
1071 mutt_error (_("Create is only supported for IMAP mailboxes"));
1073 imap_mailbox_create (LastDir);
1074 /* TODO: find a way to detect if the new folder would appear in
1075 * this window, and insert it without starting over. */
1076 destroy_state (&state);
1077 init_state (&state, NULL);
1078 state.imap_browse = 1;
1079 imap_browse (LastDir, &state);
1080 browser_sort (&state);
1081 menu->data = state.entry;
1084 init_menu (&state, menu, title, sizeof (title), buffy);
1085 MAYBE_REDRAW (menu->redraw);
1089 case OP_RENAME_MAILBOX:
1090 if (!state.entry[menu->current].imap)
1091 mutt_error (_("Rename is only supported for IMAP mailboxes"));
1093 int nentry = menu->current;
1095 if (imap_mailbox_rename (state.entry[nentry].name) >= 0) {
1096 destroy_state (&state);
1097 init_state (&state, NULL);
1098 state.imap_browse = 1;
1099 imap_browse (LastDir, &state);
1100 browser_sort (&state);
1101 menu->data = state.entry;
1104 init_menu (&state, menu, title, sizeof (title), buffy);
1105 MAYBE_REDRAW (menu->redraw);
1110 case OP_DELETE_MAILBOX:
1111 if (!state.entry[menu->current].imap)
1112 mutt_error (_("Delete is only supported for IMAP mailboxes"));
1114 char msg[SHORT_STRING];
1116 int nentry = menu->current;
1118 imap_parse_path (state.entry[nentry].name, &mx);
1119 snprintf (msg, sizeof (msg), _("Really delete mailbox \"%s\"?"),
1121 if (mutt_yesorno (msg, M_NO) == M_YES) {
1122 if (!imap_delete_mailbox (Context, mx)) {
1123 /* free the mailbox from the browser */
1124 p_delete(&((state.entry)[nentry].name));
1125 p_delete(&((state.entry)[nentry].desc));
1126 /* and move all other entries up */
1127 if (nentry + 1 < state.entrylen)
1128 memmove (state.entry + nentry, state.entry + nentry + 1,
1129 sizeof (struct folder_file) * (state.entrylen -
1132 mutt_message _("Mailbox deleted.");
1134 init_menu (&state, menu, title, sizeof (title), buffy);
1135 MAYBE_REDRAW (menu->redraw);
1139 mutt_message _("Mailbox not deleted.");
1145 case OP_CHANGE_DIRECTORY:
1148 if (option (OPTNEWS))
1152 m_strcpy(buf, sizeof(buf), LastDir);
1154 if (!state.imap_browse)
1157 /* add '/' at the end of the directory name if not already there */
1158 size_t len = m_strlen(LastDir);
1160 if (len && LastDir[len - 1] != '/' && sizeof (buf) > len)
1164 if (mutt_get_field (_("Chdir to: "), buf, sizeof (buf), M_FILE) == 0 &&
1167 mutt_expand_path (buf, sizeof (buf));
1169 if (imap_is_magic (buf, NULL) == M_IMAP) {
1170 m_strcpy(LastDir, sizeof(LastDir), buf);
1171 destroy_state (&state);
1172 init_state (&state, NULL);
1173 state.imap_browse = 1;
1174 imap_browse (LastDir, &state);
1175 browser_sort (&state);
1176 menu->data = state.entry;
1179 init_menu (&state, menu, title, sizeof (title), buffy);
1183 if (stat (buf, &st) == 0) {
1184 if (S_ISDIR (st.st_mode)) {
1185 destroy_state (&state);
1186 if (examine_directory (menu, &state, buf, prefix) == 0)
1187 m_strcpy(LastDir, sizeof(LastDir), buf);
1189 mutt_error _("Error scanning directory.");
1191 if (examine_directory (menu, &state, LastDir, prefix) == -1) {
1192 mutt_menuDestroy (&menu);
1198 init_menu (&state, menu, title, sizeof (title), buffy);
1201 mutt_error (_("%s is not a directory."), buf);
1206 MAYBE_REDRAW (menu->redraw);
1211 m_strcpy(buf, sizeof(buf), NONULL(Mask.pattern));
1212 if (mutt_get_field (_("File Mask: "), buf, sizeof (buf), 0) == 0) {
1213 regex_t *rx = p_new(regex_t, 1);
1218 /* assume that the user wants to see everything */
1220 m_strcpy(buf, sizeof(buf), ".");
1223 s = vskipspaces(s + 1);
1227 if ((err = REGCOMP (rx, s, REG_NOSUB)) != 0) {
1228 regerror (err, rx, buf, sizeof (buf));
1231 mutt_error ("%s", buf);
1234 m_strreplace(&Mask.pattern, buf);
1240 destroy_state (&state);
1242 if (state.imap_browse) {
1243 init_state (&state, NULL);
1244 state.imap_browse = 1;
1245 imap_browse (LastDir, &state);
1246 browser_sort (&state);
1247 menu->data = state.entry;
1248 init_menu (&state, menu, title, sizeof (title), buffy);
1252 if (examine_directory (menu, &state, LastDir, NULL) == 0)
1253 init_menu (&state, menu, title, sizeof (title), buffy);
1255 mutt_error _("Error scanning directory.");
1257 mutt_menuDestroy (&menu);
1261 if (!state.entrylen) {
1262 mutt_error _("No files match the file mask");
1268 MAYBE_REDRAW (menu->redraw);
1272 case OP_SORT_REVERSE:
1276 int reverse = (i == OP_SORT_REVERSE);
1278 switch (mutt_multi_choice ((reverse) ?
1280 ("Reverse sort by (d)ate, (a)lpha, si(z)e or do(n)'t sort? ")
1283 ("Sort by (d)ate, (a)lpha, si(z)e or do(n)'t sort? "),
1285 case -1: /* abort */
1289 case 1: /* (d)ate */
1290 BrowserSort = SORT_DATE;
1293 case 2: /* (a)lpha */
1294 BrowserSort = SORT_SUBJECT;
1297 case 3: /* si(z)e */
1298 BrowserSort = SORT_SIZE;
1301 case 4: /* do(n)'t sort */
1302 BrowserSort = SORT_ORDER;
1307 BrowserSort |= reverse ? SORT_REVERSE : 0;
1308 browser_sort (&state);
1309 menu->redraw = REDRAW_FULL;
1314 case OP_TOGGLE_MAILBOXES:
1318 destroy_state (&state);
1323 if (examine_mailboxes (menu, &state) == -1)
1327 else if (imap_is_magic (LastDir, NULL) == M_IMAP) {
1328 init_state (&state, NULL);
1329 state.imap_browse = 1;
1330 imap_browse (LastDir, &state);
1331 browser_sort (&state);
1332 menu->data = state.entry;
1335 else if (examine_directory (menu, &state, LastDir, prefix) == -1)
1337 init_menu (&state, menu, title, sizeof (title), buffy);
1341 if (option (OPTFORCEBUFFYCHECK))
1346 case OP_BROWSER_NEW_FILE:
1348 snprintf (buf, sizeof (buf), "%s/", LastDir);
1349 if (mutt_get_field (_("New file name: "), buf, sizeof (buf), M_FILE) ==
1351 m_strcpy(f, flen, buf);
1352 destroy_state (&state);
1353 mutt_menuDestroy (&menu);
1356 MAYBE_REDRAW (menu->redraw);
1359 case OP_BROWSER_VIEW_FILE:
1360 if (!state.entrylen) {
1361 mutt_error _("No files match the file mask");
1367 if (state.entry[menu->current].selectable) {
1368 m_strcpy(f, flen, state.entry[menu->current].name);
1369 destroy_state (&state);
1370 mutt_menuDestroy (&menu);
1375 if (S_ISDIR (state.entry[menu->current].mode) ||
1376 (S_ISLNK (state.entry[menu->current].mode) &&
1377 link_is_dir (LastDir, state.entry[menu->current].name))) {
1378 mutt_error _("Can't view a directory");
1384 char nbuf[_POSIX_PATH_MAX];
1386 mutt_concat_path(nbuf, sizeof(nbuf), LastDir,
1387 state.entry[menu->current].name);
1388 b = mutt_make_file_attach (nbuf);
1390 mutt_view_attachment (NULL, b, M_REGULAR, NULL, NULL, 0);
1391 mutt_free_body (&b);
1392 menu->redraw = REDRAW_FULL;
1395 mutt_error _("Error trying to view file");
1402 if (option (OPTNEWS)) {
1403 struct folder_file *f = &state.entry[menu->current];
1406 if (i == OP_CATCHUP)
1407 nd = mutt_newsgroup_catchup (CurrentNewsSrv, f->name);
1409 nd = mutt_newsgroup_uncatchup (CurrentNewsSrv, f->name);
1413 struct folder_file ff;
1414 char buffer[_POSIX_PATH_MAX + SHORT_STRING];
1417 folder.ff->name = f->name;
1418 folder.ff->st = NULL;
1419 folder.ff->is_new = nd->new;
1422 mutt_FormatString (buffer, sizeof (buffer), NONULL(GroupFormat),
1423 newsgroup_format_str, (unsigned long) &folder,
1424 M_FORMAT_ARROWCURSOR);
1425 f->desc = m_strdup(buffer); */
1426 if (menu->current + 1 < menu->max)
1428 menu->redraw = REDRAW_MOTION_RESYNCH;
1433 case OP_LOAD_ACTIVE:
1434 if (!option (OPTNEWS))
1441 for (tmp = CurrentNewsSrv->list; tmp; tmp = tmp->next) {
1442 if ((data = (NNTP_DATA *) tmp->data))
1446 nntp_get_active (CurrentNewsSrv);
1448 destroy_state (&state);
1450 examine_mailboxes (menu, &state);
1452 examine_directory (menu, &state, NULL, NULL);
1453 init_menu (&state, menu, title, sizeof (title), buffy);
1455 #endif /* USE_NNTP */
1457 #if defined USE_IMAP || defined USE_NNTP
1458 case OP_BROWSER_SUBSCRIBE:
1459 case OP_BROWSER_UNSUBSCRIBE:
1462 case OP_SUBSCRIBE_PATTERN:
1463 case OP_UNSUBSCRIBE_PATTERN:
1464 if (option (OPTNEWS)) {
1465 regex_t *rx = p_new(regex_t, 1);
1467 int j = menu->current;
1469 NNTP_SERVER *news = CurrentNewsSrv;
1471 if (i == OP_SUBSCRIBE_PATTERN || i == OP_UNSUBSCRIBE_PATTERN) {
1476 if (i == OP_SUBSCRIBE_PATTERN)
1477 snprintf (tmp, sizeof (tmp), _("Subscribe pattern: "));
1479 snprintf (tmp, sizeof (tmp), _("Unsubscribe pattern: "));
1480 if (mutt_get_field (tmp, buf, sizeof (buf), 0) != 0 || !buf[0]) {
1485 if ((err = REGCOMP (rx, s, REG_NOSUB)) != 0) {
1486 regerror (err, rx, buf, sizeof (buf));
1489 mutt_error ("%s", buf);
1492 menu->redraw = REDRAW_FULL;
1495 else if (!state.entrylen) {
1496 mutt_error _("No newsgroups match the mask");
1501 for (; j < state.entrylen; j++) {
1502 struct folder_file *f = &state.entry[j];
1504 if (i == OP_BROWSER_SUBSCRIBE || i == OP_BROWSER_UNSUBSCRIBE ||
1505 regexec (rx, f->name, 0, NULL, 0) == 0) {
1506 if (i == OP_BROWSER_SUBSCRIBE || i == OP_SUBSCRIBE_PATTERN)
1507 nd = mutt_newsgroup_subscribe (news, f->name);
1509 nd = mutt_newsgroup_unsubscribe (news, f->name);
1513 char buffer[_POSIX_PATH_MAX + SHORT_STRING];
1515 folder.name = f->name;
1517 folder.new = nd->new;
1520 mutt_FormatString (buffer, sizeof (buffer), NONULL(GroupFormat),
1521 newsgroup_format_str, (unsigned long) &folder,
1522 M_FORMAT_ARROWCURSOR);
1523 f->desc = m_strdup(buffer);
1526 if (i == OP_BROWSER_SUBSCRIBE || i == OP_BROWSER_UNSUBSCRIBE) {
1527 if (menu->current + 1 < menu->max)
1529 menu->redraw = REDRAW_MOTION_RESYNCH;
1533 if (i == OP_SUBSCRIBE_PATTERN) {
1534 LIST *grouplist = NULL;
1537 grouplist = news->list;
1538 for (; grouplist; grouplist = grouplist->next) {
1539 nd = (NNTP_DATA *) grouplist->data;
1540 if (nd && nd->group && !nd->subscribed) {
1541 if (regexec (rx, nd->group, 0, NULL, 0) == 0) {
1542 mutt_newsgroup_subscribe (news, nd->group);
1543 add_folder (menu, &state, nd->group, NULL, nd, nd->new);
1547 init_menu (&state, menu, title, sizeof (title), buffy);
1549 mutt_newsrc_update (news);
1550 nntp_clear_cacheindex (news);
1551 if (i != OP_BROWSER_SUBSCRIBE && i != OP_BROWSER_UNSUBSCRIBE)
1557 #endif /* USE_IMAP && USE_NNTP */
1558 #endif /* USE_NNTP */
1561 if (i == OP_BROWSER_SUBSCRIBE)
1562 imap_subscribe (state.entry[menu->current].name, 1);
1564 imap_subscribe (state.entry[menu->current].name, 0);
1566 #endif /* USE_IMAP */
1573 m_strcpy(LastDir, sizeof(LastDir), LastDirBackup);