diff options
Diffstat (limited to 'src/browser.c')
| -rw-r--r-- | src/browser.c | 1078 |
1 files changed, 1078 insertions, 0 deletions
diff --git a/src/browser.c b/src/browser.c new file mode 100644 index 0000000..c43796b --- /dev/null +++ b/src/browser.c @@ -0,0 +1,1078 @@ +/* $Id: browser.c 4461 2009-12-09 17:09:37Z astyanax $ */ +/************************************************************************** + * browser.c * + * * + * Copyright (C) 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009 * + * Free Software Foundation, Inc. * + * This program is free software; you can redistribute it and/or modify * + * it under the terms of the GNU General Public License as published by * + * the Free Software Foundation; either version 3, or (at your option) * + * any later version. * + * * + * This program is distributed in the hope that it will be useful, but * + * WITHOUT ANY WARRANTY; without even the implied warranty of * + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU * + * General Public License for more details. * + * * + * You should have received a copy of the GNU General Public License * + * along with this program; if not, write to the Free Software * + * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA * + * 02110-1301, USA. * + * * + **************************************************************************/ + +#include "proto.h" + +#include <stdio.h> +#include <string.h> +#include <unistd.h> +#include <errno.h> + +#ifndef DISABLE_BROWSER + +static char **filelist = NULL; + /* The list of files to display in the file browser. */ +static size_t filelist_len = 0; + /* The number of files in the list. */ +static int width = 0; + /* The number of files that we can display per line. */ +static int longest = 0; + /* The number of columns in the longest filename in the list. */ +static size_t selected = 0; + /* The currently selected filename in the list. This variable + * is zero-based. */ +static bool search_last_file = FALSE; + /* Have we gone past the last file while searching? */ + +/* Our main file browser function. path is the tilde-expanded path we + * start browsing from. */ +char *do_browser(char *path, DIR *dir) +{ + char *retval = NULL; + int kbinput; + bool meta_key, func_key, old_const_update = ISSET(CONST_UPDATE); + bool abort = FALSE; + /* Whether we should abort the file browser. */ + char *prev_dir = NULL; + /* The directory we were in, if any, before backing up via + * browsing to "..". */ + char *ans = NULL; + /* The last answer the user typed at the statusbar prompt. */ + size_t old_selected; + /* The selected file we had before the current selected file. */ + const sc *s; + const subnfunc *f; + + curs_set(0); + blank_statusbar(); +#if !defined(DISABLE_HELP) || !defined(DISABLE_MOUSE) + currmenu = MBROWSER; +#endif + bottombars(MBROWSER); + wnoutrefresh(bottomwin); + + UNSET(CONST_UPDATE); + + ans = mallocstrcpy(NULL, ""); + + change_browser_directory: + /* We go here after we select a new directory. */ + + /* Start with no key pressed. */ + kbinput = ERR; + + path = mallocstrassn(path, get_full_path(path)); + + assert(path != NULL && path[strlen(path) - 1] == '/'); + + /* Get the file list, and set longest and width in the process. */ + browser_init(path, dir); + + assert(filelist != NULL); + + /* Sort the file list. */ + qsort(filelist, filelist_len, sizeof(char *), diralphasort); + + /* If prev_dir isn't NULL, select the directory saved in it, and + * then blow it away. */ + if (prev_dir != NULL) { + browser_select_filename(prev_dir); + + free(prev_dir); + prev_dir = NULL; + /* Otherwise, select the first file or directory in the list. */ + } else + selected = 0; + + old_selected = (size_t)-1; + + titlebar(path); + + while (!abort) { + struct stat st; + int i; + size_t fileline = selected / width; + /* The line number the selected file is on. */ + char *new_path; + /* The path we switch to at the "Go to Directory" + * prompt. */ + + /* Display the file list if we don't have a key, or if the + * selected file has changed, and set width in the process. */ + if (kbinput == ERR || old_selected != selected) + browser_refresh(); + + old_selected = selected; + + kbinput = get_kbinput(edit, &meta_key, &func_key); + +#ifndef DISABLE_MOUSE + if (kbinput == KEY_MOUSE) { + + int mouse_x, mouse_y; + + /* We can click on the edit window to select a + * filename. */ + if (get_mouseinput(&mouse_x, &mouse_y, TRUE) == 0 && + wmouse_trafo(edit, &mouse_y, &mouse_x, FALSE)) { + /* longest is the width of each column. There + * are two spaces between each column. */ + selected = (fileline / editwinrows) * + (editwinrows * width) + (mouse_y * + width) + (mouse_x / (longest + 2)); + + /* If they clicked beyond the end of a row, + * select the filename at the end of that + * row. */ + if (mouse_x > width * (longest + 2)) + selected--; + + /* If we're off the screen, select the last + * filename. */ + if (selected > filelist_len - 1) + selected = filelist_len - 1; + + /* If we selected the same filename as last + * time, put back the Enter key so that it's + * read in. */ + if (old_selected == selected) + unget_kbinput(sc_seq_or(DO_ENTER, 0), FALSE, FALSE); + } + } +#endif /* !DISABLE_MOUSE */ + + parse_browser_input(&kbinput, &meta_key, &func_key); + s = get_shortcut(MBROWSER, &kbinput, &meta_key, &func_key); + if (!s) + continue; + f = sctofunc((sc *) s); + if (!f) + break; + + if (f->scfunc == TOTAL_REFRESH) { + total_redraw(); + } else if (f->scfunc == DO_HELP_VOID) { +#ifndef DISABLE_HELP + do_browser_help(); + curs_set(0); +#else + nano_disabled_msg(); +#endif + /* Search for a filename. */ + } else if (f->scfunc == DO_SEARCH) { + curs_set(1); + do_filesearch(); + curs_set(0); + /* Search for another filename. */ + } else if (f->scfunc == DO_RESEARCH) { + do_fileresearch(); + } else if (f->scfunc == DO_PAGE_UP) { + if (selected >= (editwinrows + fileline % editwinrows) * + width) + selected -= (editwinrows + fileline % editwinrows) * + width; + else + selected = 0; + } else if (f->scfunc == DO_PAGE_DOWN) { + selected += (editwinrows - fileline % editwinrows) * + width; + if (selected > filelist_len - 1) + selected = filelist_len - 1; + } else if (f->scfunc == FIRST_FILE_MSG) { + if (meta_key) + selected = 0; + } else if (f->scfunc == LAST_FILE_MSG) { + if (meta_key) + selected = filelist_len - 1; + /* Go to a specific directory. */ + } else if (f->scfunc == GOTO_DIR_MSG) { + curs_set(1); + + i = do_prompt(TRUE, +#ifndef DISABLE_TABCOMP + FALSE, +#endif + MGOTODIR, ans, + &meta_key, &func_key, +#ifndef NANO_TINY + NULL, +#endif + browser_refresh, N_("Go To Directory")); + + curs_set(0); +#if !defined(DISABLE_HELP) || !defined(DISABLE_MOUSE) + currmenu = MBROWSER; +#endif + bottombars(MBROWSER); + + /* If the directory begins with a newline (i.e. an + * encoded null), treat it as though it's blank. */ + if (i < 0 || *answer == '\n') { + /* We canceled. Indicate that on the statusbar, and + * blank out ans, since we're done with it. */ + statusbar(_("Cancelled")); + ans = mallocstrcpy(ans, ""); + continue; + } else if (i != 0) { + /* Put back the "Go to Directory" key and save + * answer in ans, so that the file list is displayed + * again, the prompt is displayed again, and what we + * typed before at the prompt is displayed again. */ + unget_kbinput(sc_seq_or(DO_GOTOLINECOLUMN_VOID, 0), FALSE, FALSE); + ans = mallocstrcpy(ans, answer); + continue; + } + + /* We have a directory. Blank out ans, since we're done + * with it. */ + ans = mallocstrcpy(ans, ""); + + /* Convert newlines to nulls, just before we go to the + * directory. */ + sunder(answer); + align(&answer); + + new_path = real_dir_from_tilde(answer); + + if (new_path[0] != '/') { + new_path = charealloc(new_path, strlen(path) + + strlen(answer) + 1); + sprintf(new_path, "%s%s", path, answer); + } + +#ifndef DISABLE_OPERATINGDIR + if (check_operating_dir(new_path, FALSE)) { + statusbar( + _("Can't go outside of %s in restricted mode"), + operating_dir); + free(new_path); + continue; + } +#endif + + dir = opendir(new_path); + if (dir == NULL) { + /* We can't open this directory for some reason. + * Complain. */ + statusbar(_("Error reading %s: %s"), answer, + strerror(errno)); + beep(); + free(new_path); + continue; + } + + /* Start over again with the new path value. */ + free(path); + path = new_path; + goto change_browser_directory; + } else if (f->scfunc == DO_UP_VOID) { + if (selected >= width) + selected -= width; + } else if (f->scfunc == DO_LEFT) { + if (selected > 0) + selected--; + } else if (f->scfunc == DO_DOWN_VOID) { + if (selected + width <= filelist_len - 1) + selected += width; + } else if (f->scfunc == DO_RIGHT) { + if (selected < filelist_len - 1) + selected++; + } else if (f->scfunc == DO_ENTER) { + /* We can't move up from "/". */ + if (strcmp(filelist[selected], "/..") == 0) { + statusbar(_("Can't move up a directory")); + beep(); + continue; + } + +#ifndef DISABLE_OPERATINGDIR + /* Note: The selected file can be outside the operating + * directory if it's ".." or if it's a symlink to a + * directory outside the operating directory. */ + if (check_operating_dir(filelist[selected], FALSE)) { + statusbar( + _("Can't go outside of %s in restricted mode"), + operating_dir); + beep(); + continue; + } +#endif + + if (stat(filelist[selected], &st) == -1) { + /* We can't open this file for some reason. + * Complain. */ + statusbar(_("Error reading %s: %s"), + filelist[selected], strerror(errno)); + beep(); + continue; + } + + /* If we've successfully opened a file, we're done, so + * get out. */ + if (!S_ISDIR(st.st_mode)) { + retval = mallocstrcpy(NULL, filelist[selected]); + abort = TRUE; + continue; + /* If we've successfully opened a directory, and it's + * "..", save the current directory in prev_dir, so that + * we can select it later. */ + } else if (strcmp(tail(filelist[selected]), "..") == 0) + prev_dir = mallocstrcpy(NULL, + striponedir(filelist[selected])); + + dir = opendir(filelist[selected]); + if (dir == NULL) { + /* We can't open this directory for some reason. + * Complain. */ + statusbar(_("Error reading %s: %s"), + filelist[selected], strerror(errno)); + beep(); + continue; + } + + path = mallocstrcpy(path, filelist[selected]); + + /* Start over again with the new path value. */ + goto change_browser_directory; + /* Abort the file browser. */ + } else if (f->scfunc == DO_EXIT) { + abort = TRUE; + } + } + titlebar(NULL); + edit_refresh(); + curs_set(1); + if (old_const_update) + SET(CONST_UPDATE); + + free(path); + free(ans); + + free_chararray(filelist, filelist_len); + filelist = NULL; + filelist_len = 0; + + return retval; +} + +/* The file browser front end. We check to see if inpath has a + * directory in it. If it does, we start do_browser() from there. + * Otherwise, we start do_browser() from the current directory. */ +char *do_browse_from(const char *inpath) +{ + struct stat st; + char *path; + /* This holds the tilde-expanded version of inpath. */ + DIR *dir = NULL; + + assert(inpath != NULL); + + path = real_dir_from_tilde(inpath); + + /* Perhaps path is a directory. If so, we'll pass it to + * do_browser(). Or perhaps path is a directory / a file. If so, + * we'll try stripping off the last path element and passing it to + * do_browser(). Or perhaps path doesn't have a directory portion + * at all. If so, we'll just pass the current directory to + * do_browser(). */ + if (stat(path, &st) == -1 || !S_ISDIR(st.st_mode)) { + path = mallocstrassn(path, striponedir(path)); + + if (stat(path, &st) == -1 || !S_ISDIR(st.st_mode)) { + free(path); + + path = charalloc(PATH_MAX + 1); + path = getcwd(path, PATH_MAX + 1); + + if (path != NULL) + align(&path); + } + } + +#ifndef DISABLE_OPERATINGDIR + /* If the resulting path isn't in the operating directory, use + * the operating directory instead. */ + if (check_operating_dir(path, FALSE)) + path = mallocstrcpy(path, operating_dir); +#endif + + if (path != NULL) + dir = opendir(path); + + /* If we can't open the path, get out. */ + if (dir == NULL) { + if (path != NULL) + free(path); + beep(); + return NULL; + } + + return do_browser(path, dir); +} + +/* Set filelist to the list of files contained in the directory path, + * set filelist_len to the number of files in that list, set longest to + * the width in columns of the longest filename in that list (between 15 + * and COLS), and set width to the number of files that we can display + * per line. longest needs to be at least 15 columns in order to + * display ".. (parent dir)", as Pico does. Assume path exists and is a + * directory. */ +void browser_init(const char *path, DIR *dir) +{ + const struct dirent *nextdir; + size_t i = 0, path_len = strlen(path); + int col = 0; + /* The maximum number of columns that the filenames will take + * up. */ + int line = 0; + /* The maximum number of lines that the filenames will take + * up. */ + int filesperline = 0; + /* The number of files that we can display per line. */ + + assert(path != NULL && path[strlen(path) - 1] == '/' && dir != NULL); + + /* Set longest to zero, just before we initialize it. */ + longest = 0; + + while ((nextdir = readdir(dir)) != NULL) { + size_t d_len; + + /* Don't show the "." entry. */ + if (strcmp(nextdir->d_name, ".") == 0) + continue; + + d_len = strlenpt(nextdir->d_name); + if (d_len > longest) + longest = (d_len > COLS) ? COLS : d_len; + + i++; + } + + rewinddir(dir); + + /* Put 10 columns' worth of blank space between columns of filenames + * in the list whenever possible, as Pico does. */ + longest += 10; + + if (filelist != NULL) + free_chararray(filelist, filelist_len); + + filelist_len = i; + + filelist = (char **)nmalloc(filelist_len * sizeof(char *)); + + i = 0; + + while ((nextdir = readdir(dir)) != NULL && i < filelist_len) { + /* Don't show the "." entry. */ + if (strcmp(nextdir->d_name, ".") == 0) + continue; + + filelist[i] = charalloc(path_len + strlen(nextdir->d_name) + 1); + sprintf(filelist[i], "%s%s", path, nextdir->d_name); + + i++; + } + + /* Maybe the number of files in the directory changed between the + * first time we scanned and the second. i is the actual length of + * filelist, so record it. */ + filelist_len = i; + + closedir(dir); + + /* Make sure longest is between 15 and COLS. */ + if (longest < 15) + longest = 15; + if (longest > COLS) + longest = COLS; + + /* Set width to zero, just before we initialize it. */ + width = 0; + + for (i = 0; i < filelist_len && line < editwinrows; i++) { + /* Calculate the number of columns one filename will take up. */ + col += longest; + filesperline++; + + /* Add some space between the columns. */ + col += 2; + + /* If the next entry isn't going to fit on the current line, + * move to the next line. */ + if (col > COLS - longest) { + line++; + col = 0; + + /* If width isn't initialized yet, and we've taken up more + * than one line, it means that width is equal to + * filesperline. */ + if (width == 0) + width = filesperline; + } + } + + /* If width isn't initialized yet, and we've taken up only one line, + * it means that width is equal to longest. */ + if (width == 0) + width = longest; +} + +/* Determine the shortcut key corresponding to the values of kbinput + * (the key itself), meta_key (whether the key is a meta sequence), and + * func_key (whether the key is a function key), if any. In the + * process, convert certain non-shortcut keys into their corresponding + * shortcut keys. */ +void parse_browser_input(int *kbinput, bool *meta_key, bool *func_key) +{ + get_shortcut(MBROWSER, kbinput, meta_key, func_key); + + /* Pico compatibility. */ + if (!*meta_key) { + switch (*kbinput) { + case ' ': + *kbinput = sc_seq_or(DO_PAGE_DOWN, 0); + break; + case '-': + *kbinput = sc_seq_or(DO_PAGE_UP, 0); + break; + case '?': +#ifndef DISABLE_HELP + *kbinput = sc_seq_or(DO_HELP_VOID, 0); +#endif + break; + /* Cancel equivalent to Exit here. */ + case 'E': + case 'e': + *kbinput = sc_seq_or(DO_EXIT, 0); + break; + case 'G': + case 'g': + *kbinput = sc_seq_or(GOTO_DIR_MSG, 0); + break; + case 'S': + case 's': + *kbinput = sc_seq_or(DO_ENTER, 0); + break; + case 'W': + case 'w': + *kbinput = sc_seq_or(DO_SEARCH, 0); + break; + } + } +} + +/* Set width to the number of files that we can display per line, if + * necessary, and display the list of files. */ +void browser_refresh(void) +{ + static int uimax_digits = -1; + size_t i; + int col = 0; + /* The maximum number of columns that the filenames will take + * up. */ + int line = 0; + /* The maximum number of lines that the filenames will take + * up. */ + char *foo; + /* The file information that we'll display. */ + + if (uimax_digits == -1) + uimax_digits = digits(UINT_MAX); + + blank_edit(); + + wmove(edit, 0, 0); + + i = width * editwinrows * ((selected / width) / editwinrows); + + for (; i < filelist_len && line < editwinrows; i++) { + struct stat st; + const char *filetail = tail(filelist[i]); + /* The filename we display, minus the path. */ + size_t filetaillen = strlenpt(filetail); + /* The length of the filename in columns. */ + size_t foolen; + /* The length of the file information in columns. */ + int foomaxlen = 7; + /* The maximum length of the file information in + * columns: seven for "--", "(dir)", or the file size, + * and 12 for "(parent dir)". */ + bool dots = (COLS >= 15 && filetaillen >= longest - + foomaxlen - 1); + /* Do we put an ellipsis before the filename? Don't set + * this to TRUE if we have fewer than 15 columns (i.e. + * one column for padding, plus seven columns for a + * filename other than ".."). */ + char *disp = display_string(filetail, dots ? filetaillen - + longest + foomaxlen + 4 : 0, longest, FALSE); + /* If we put an ellipsis before the filename, reserve + * one column for padding, plus seven columns for "--", + * "(dir)", or the file size, plus three columns for the + * ellipsis. */ + + /* Start highlighting the currently selected file or + * directory. */ + if (i == selected) + wattron(edit, reverse_attr); + + blank_line(edit, line, col, longest); + + /* If dots is TRUE, we will display something like + * "...ename". */ + if (dots) + mvwaddstr(edit, line, col, "..."); + mvwaddstr(edit, line, dots ? col + 3 : col, disp); + + free(disp); + + col += longest; + + /* Show information about the file. We don't want to report + * file sizes for links, so we use lstat(). */ + if (lstat(filelist[i], &st) == -1 || S_ISLNK(st.st_mode)) { + /* If the file doesn't exist (i.e. it's been deleted while + * the file browser is open), or it's a symlink that doesn't + * point to a directory, display "--". */ + if (stat(filelist[i], &st) == -1 || !S_ISDIR(st.st_mode)) + foo = mallocstrcpy(NULL, "--"); + /* If the file is a symlink that points to a directory, + * display it as a directory. */ + else + /* TRANSLATORS: Try to keep this at most 7 + * characters. */ + foo = mallocstrcpy(NULL, _("(dir)")); + } else if (S_ISDIR(st.st_mode)) { + /* If the file is a directory, display it as such. */ + if (strcmp(filetail, "..") == 0) { + /* TRANSLATORS: Try to keep this at most 12 + * characters. */ + foo = mallocstrcpy(NULL, _("(parent dir)")); + foomaxlen = 12; + } else + foo = mallocstrcpy(NULL, _("(dir)")); + } else { + unsigned long result = st.st_size; + char modifier; + + foo = charalloc(uimax_digits + 4); + + /* Bytes. */ + if (st.st_size < (1 << 10)) + modifier = ' '; + /* Kilobytes. */ + else if (st.st_size < (1 << 20)) { + result >>= 10; + modifier = 'K'; + /* Megabytes. */ + } else if (st.st_size < (1 << 30)) { + result >>= 20; + modifier = 'M'; + /* Gigabytes. */ + } else { + result >>= 30; + modifier = 'G'; + } + + sprintf(foo, "%4lu %cB", result, modifier); + } + + /* Make sure foo takes up no more than foomaxlen columns. */ + foolen = strlenpt(foo); + if (foolen > foomaxlen) { + null_at(&foo, actual_x(foo, foomaxlen)); + foolen = foomaxlen; + } + + mvwaddstr(edit, line, col - foolen, foo); + + /* Finish highlighting the currently selected file or + * directory. */ + if (i == selected) + wattroff(edit, reverse_attr); + + free(foo); + + /* Add some space between the columns. */ + col += 2; + + /* If the next entry isn't going to fit on the current line, + * move to the next line. */ + if (col > COLS - longest) { + line++; + col = 0; + } + + wmove(edit, line, col); + } + + wnoutrefresh(edit); +} + +/* Look for needle. If we find it, set selected to its location. Note + * that needle must be an exact match for a file in the list. The + * return value specifies whether we found anything. */ +bool browser_select_filename(const char *needle) +{ + size_t currselected; + bool found = FALSE; + + for (currselected = 0; currselected < filelist_len; + currselected++) { + if (strcmp(filelist[currselected], needle) == 0) { + found = TRUE; + break; + } + } + + if (found) + selected = currselected; + + return found; +} + +/* Set up the system variables for a filename search. Return -1 if the + * search should be canceled (due to Cancel, a blank search string, or a + * failed regcomp()), return 0 on success, and return 1 on rerun calling + * program. */ +int filesearch_init(void) +{ + int i = 0; + char *buf; + bool meta_key, func_key; + const sc *s; + static char *backupstring = NULL; + /* The search string we'll be using. */ + + /* If backupstring doesn't exist, initialize it to "". */ + if (backupstring == NULL) + backupstring = mallocstrcpy(NULL, ""); + + /* We display the search prompt below. If the user types a partial + * search string and then Replace or a toggle, we will return to + * do_search() or do_replace() and be called again. In that case, + * we should put the same search string back up. */ + + search_init_globals(); + + if (last_search[0] != '\0') { + char *disp = display_string(last_search, 0, COLS / 3, FALSE); + + buf = charalloc(strlen(disp) + 7); + /* We use (COLS / 3) here because we need to see more on the + * line. */ + sprintf(buf, " [%s%s]", disp, + (strlenpt(last_search) > COLS / 3) ? "..." : ""); + free(disp); + } else + buf = mallocstrcpy(NULL, ""); + + /* This is now one simple call. It just does a lot. */ + i = do_prompt(FALSE, +#ifndef DISABLE_TABCOMP + TRUE, +#endif + MWHEREISFILE, backupstring, + &meta_key, &func_key, +#ifndef NANO_TINY + &search_history, +#endif + browser_refresh, "%s%s%s%s%s%s", _("Search"), +#ifndef NANO_TINY + /* This string is just a modifier for the search prompt; no + * grammar is implied. */ + ISSET(CASE_SENSITIVE) ? _(" [Case Sensitive]") : +#endif + "", +#ifdef HAVE_REGEX_H + /* This string is just a modifier for the search prompt; no + * grammar is implied. */ + ISSET(USE_REGEXP) ? _(" [Regexp]") : +#endif + "", +#ifndef NANO_TINY + /* This string is just a modifier for the search prompt; no + * grammar is implied. */ + ISSET(BACKWARDS_SEARCH) ? _(" [Backwards]") : +#endif + "", "", buf); + + /* Release buf now that we don't need it anymore. */ + free(buf); + + free(backupstring); + backupstring = NULL; + + /* Cancel any search, or just return with no previous search. */ + if (i == -1 || (i < 0 && *last_search == '\0') || (i == 0 && + *answer == '\0')) { + statusbar(_("Cancelled")); + return -1; + } else { + s = get_shortcut(MBROWSER, &i, &meta_key, &func_key); + if (i == -2 || i == 0) { +#ifdef HAVE_REGEX_H + /* Use last_search if answer is an empty string, or + * answer if it isn't. */ + if (ISSET(USE_REGEXP) && !regexp_init((i == -2) ? + last_search : answer)) + return -1; +#endif + } else +#ifndef NANO_TINY + if (s && s->scfunc == CASE_SENS_MSG) { + TOGGLE(CASE_SENSITIVE); + backupstring = mallocstrcpy(backupstring, answer); + return 1; + } else if (s && s->scfunc == BACKWARDS_MSG) { + TOGGLE(BACKWARDS_SEARCH); + backupstring = mallocstrcpy(backupstring, answer); + return 1; + } else +#endif +#ifdef HAVE_REGEX_H + if (s && s->scfunc == REGEXP_MSG) { + TOGGLE(USE_REGEXP); + backupstring = mallocstrcpy(backupstring, answer); + return 1; + } else +#endif + return -1; + } + + return 0; +} + +/* Look for needle. If no_sameline is TRUE, skip over selected when + * looking for needle. begin is the location of the filename where we + * first started searching. The return value specifies whether we found + * anything. */ +bool findnextfile(bool no_sameline, size_t begin, const char *needle) +{ + size_t currselected = selected; + /* The location in the current file list of the match we + * find. */ + const char *filetail = tail(filelist[currselected]); + /* The filename we display, minus the path. */ + const char *rev_start = filetail, *found = NULL; + +#ifndef NANO_TINY + if (ISSET(BACKWARDS_SEARCH)) + rev_start += strlen(rev_start); +#endif + + /* Look for needle in the current filename we're searching. */ + while (TRUE) { + found = strstrwrapper(filetail, needle, rev_start); + + /* We've found a potential match. If we're not allowed to find + * a match on the same filename we started on and this potential + * match is on that line, continue searching. */ + if (found != NULL && (!no_sameline || currselected != begin)) + break; + + /* We've finished processing the filenames, so get out. */ + if (search_last_file) { + not_found_msg(needle); + return FALSE; + } + + /* Move to the previous or next filename in the list. If we've + * reached the start or end of the list, wrap around. */ +#ifndef NANO_TINY + if (ISSET(BACKWARDS_SEARCH)) { + if (currselected > 0) + currselected--; + else { + currselected = filelist_len - 1; + statusbar(_("Search Wrapped")); + } + } else { +#endif + if (currselected < filelist_len - 1) + currselected++; + else { + currselected = 0; + statusbar(_("Search Wrapped")); + } +#ifndef NANO_TINY + } +#endif + + /* We've reached the original starting file. */ + if (currselected == begin) + search_last_file = TRUE; + + filetail = tail(filelist[currselected]); + + rev_start = filetail; +#ifndef NANO_TINY + if (ISSET(BACKWARDS_SEARCH)) + rev_start += strlen(rev_start); +#endif + } + + /* We've definitely found something. */ + selected = currselected; + + return TRUE; +} + +/* Clear the flag indicating that a search reached the last file in the + * list. We need to do this just before a new search. */ +void findnextfile_wrap_reset(void) +{ + search_last_file = FALSE; +} + +/* Abort the current filename search. Clean up by setting the current + * shortcut list to the browser shortcut list, displaying it, and + * decompiling the compiled regular expression we used in the last + * search, if any. */ +void filesearch_abort(void) +{ + currmenu = MBROWSER; + bottombars(MBROWSER); +#ifdef HAVE_REGEX_H + regexp_cleanup(); +#endif +} + +/* Search for a filename. */ +void do_filesearch(void) +{ + size_t begin = selected; + int i; + bool didfind; + + i = filesearch_init(); + if (i == -1) /* Cancel, blank search string, or regcomp() + * failed. */ + filesearch_abort(); +#if !defined(NANO_TINY) || defined(HAVE_REGEX_H) + else if (i == 1) /* Case Sensitive, Backwards, or Regexp search + * toggle. */ + do_filesearch(); +#endif + + if (i != 0) + return; + + /* If answer is now "", copy last_search into answer. */ + if (*answer == '\0') + answer = mallocstrcpy(answer, last_search); + else + last_search = mallocstrcpy(last_search, answer); + +#ifndef NANO_TINY + /* If answer is not "", add this search string to the search history + * list. */ + if (answer[0] != '\0') + update_history(&search_history, answer); +#endif + + findnextfile_wrap_reset(); + didfind = findnextfile(FALSE, begin, answer); + + /* Check to see if there's only one occurrence of the string and + * we're on it now. */ + if (selected == begin && didfind) { + /* Do the search again, skipping over the current line. We + * should only end up back at the same position if the string + * isn't found again, in which case it's the only occurrence. */ + didfind = findnextfile(TRUE, begin, answer); + if (selected == begin && !didfind) + statusbar(_("This is the only occurrence")); + } + + filesearch_abort(); +} + +/* Search for the last filename without prompting. */ +void do_fileresearch(void) +{ + size_t begin = selected; + bool didfind; + + search_init_globals(); + + if (last_search[0] != '\0') { +#ifdef HAVE_REGEX_H + /* Since answer is "", use last_search! */ + if (ISSET(USE_REGEXP) && !regexp_init(last_search)) + return; +#endif + + findnextfile_wrap_reset(); + didfind = findnextfile(FALSE, begin, answer); + + /* Check to see if there's only one occurrence of the string and + * we're on it now. */ + if (selected == begin && didfind) { + /* Do the search again, skipping over the current line. We + * should only end up back at the same position if the + * string isn't found again, in which case it's the only + * occurrence. */ + didfind = findnextfile(TRUE, begin, answer); + if (selected == begin && !didfind) + statusbar(_("This is the only occurrence")); + } + } else + statusbar(_("No current search pattern")); + + filesearch_abort(); +} + +/* Select the first file in the list. */ +void do_first_file(void) +{ + selected = 0; +} + +/* Select the last file in the list. */ +void do_last_file(void) +{ + selected = filelist_len - 1; +} + +/* Strip one directory from the end of path, and return the stripped + * path. The returned string is dynamically allocated, and should be + * freed. */ +char *striponedir(const char *path) +{ + char *retval, *tmp; + + assert(path != NULL); + + retval = mallocstrcpy(NULL, path); + + tmp = strrchr(retval, '/'); + + if (tmp != NULL) + null_at(&retval, tmp - retval); + + return retval; +} + +#endif /* !DISABLE_BROWSER */ |