/************************************************************************** * prompt.c -- This file is part of GNU nano. * * * * Copyright (C) 1999-2011, 2013-2021 Free Software Foundation, Inc. * * Copyright (C) 2016, 2018, 2020 Benno Schulenberg * * * * GNU nano 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 of the License, * * or (at your option) any later version. * * * * GNU nano 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, see http://www.gnu.org/licenses/. * * * **************************************************************************/ #include "prototypes.h" #include static char *prompt = NULL; /* The prompt string used for status-bar questions. */ static size_t typing_x = HIGHEST_POSITIVE; /* The cursor position in answer. */ /* Move to the beginning of the answer. */ void do_statusbar_home(void) { typing_x = 0; } /* Move to the end of the answer. */ void do_statusbar_end(void) { typing_x = strlen(answer); } #ifndef NANO_TINY /* Move to the next word in the answer. */ void do_statusbar_next_word(void) { bool seen_space = !is_word_char(answer + typing_x, FALSE); bool seen_word = !seen_space; /* Move forward until we reach either the end or the start of a word, * depending on whether the AFTER_ENDS flag is set or not. */ while (answer[typing_x] != '\0') { typing_x = step_right(answer, typing_x); if (ISSET(AFTER_ENDS)) { /* If this is a word character, continue; else it's a separator, * and if we've already seen a word, then it's a word end. */ if (is_word_char(answer + typing_x, FALSE)) seen_word = TRUE; #ifdef ENABLE_UTF8 else if (is_zerowidth(answer + typing_x)) ; /* skip */ #endif else if (seen_word) break; } else { #ifdef ENABLE_UTF8 if (is_zerowidth(answer + typing_x)) ; /* skip */ else #endif /* If this is not a word character, then it's a separator; else * if we've already seen a separator, then it's a word start. */ if (!is_word_char(answer + typing_x, FALSE)) seen_space = TRUE; else if (seen_space) break; } } } /* Move to the previous word in the answer. */ void do_statusbar_prev_word(void) { bool seen_a_word = FALSE, step_forward = FALSE; /* Move backward until we pass over the start of a word. */ while (typing_x != 0) { typing_x = step_left(answer, typing_x); if (is_word_char(answer + typing_x, FALSE)) seen_a_word = TRUE; #ifdef ENABLE_UTF8 else if (is_zerowidth(answer + typing_x)) ; /* skip */ #endif else if (seen_a_word) { /* This is space now: we've overshot the start of the word. */ step_forward = TRUE; break; } } if (step_forward) /* Move one character forward again to sit on the start of the word. */ typing_x = step_right(answer, typing_x); } #endif /* !NANO_TINY */ /* Move left one character in the answer. */ void do_statusbar_left(void) { if (typing_x > 0) { typing_x = step_left(answer, typing_x); #ifdef ENABLE_UTF8 while (typing_x > 0 && is_zerowidth(answer + typing_x)) typing_x = step_left(answer, typing_x); #endif } } /* Move right one character in the answer. */ void do_statusbar_right(void) { if (answer[typing_x] != '\0') { typing_x = step_right(answer, typing_x); #ifdef ENABLE_UTF8 while (answer[typing_x] != '\0' && is_zerowidth(answer + typing_x)) typing_x = step_right(answer, typing_x); #endif } } /* Delete one character in the answer. */ void do_statusbar_delete(void) { if (answer[typing_x] != '\0') { int charlen = char_length(answer + typing_x); memmove(answer + typing_x, answer + typing_x + charlen, strlen(answer) - typing_x - charlen + 1); #ifdef ENABLE_UTF8 if (is_zerowidth(answer + typing_x)) do_statusbar_delete(); #endif } } /* Backspace over one character in the answer. */ void do_statusbar_backspace(void) { if (typing_x > 0) { size_t was_x = typing_x; typing_x = step_left(answer, typing_x); memmove(answer + typing_x, answer + was_x, strlen(answer) - was_x + 1); } } /* Zap some or all text from the answer. */ void do_statusbar_cut_text(void) { if (!ISSET(CUT_FROM_CURSOR)) typing_x = 0; answer[typing_x] = '\0'; } /* Paste the first line of the cutbuffer into the current answer. */ void paste_into_answer(void) { size_t pastelen = strlen(cutbuffer->data); char *fusion = nmalloc(strlen(answer) + pastelen + 1); /* Concatenate: the current answer before the cursor, the first line * of the cutbuffer, plus the rest of the current answer. */ strncpy(fusion, answer, typing_x); strncpy(fusion + typing_x, cutbuffer->data, pastelen); strcpy(fusion + typing_x + pastelen, answer + typing_x); free(answer); answer = fusion; typing_x += pastelen; } #ifdef ENABLE_MOUSE /* Handle a mouse click on the status-bar prompt or the shortcut list. */ int do_statusbar_mouse(void) { int click_row, click_col; int retval = get_mouseinput(&click_row, &click_col, TRUE); /* We can click on the status-bar window text to move the cursor. */ if (retval == 0 && wmouse_trafo(bottomwin, &click_row, &click_col, FALSE)) { size_t start_col = breadth(prompt) + 2; /* Move to where the click occurred. */ if (click_row == 0 && click_col >= start_col) typing_x = actual_x(answer, get_statusbar_page_start(start_col, start_col + wideness(answer, typing_x)) + click_col - start_col); } return retval; } #endif /* Insert the given short burst of bytes into the answer. */ void inject_into_answer(char *burst, size_t count) { /* First encode any embedded NUL byte as 0x0A. */ for (size_t index = 0; index < count; index++) if (burst[index] == '\0') burst[index] = '\n'; answer = nrealloc(answer, strlen(answer) + count + 1); memmove(answer + typing_x + count, answer + typing_x, strlen(answer) - typing_x + 1); strncpy(answer + typing_x, burst , count); typing_x += count; } /* Get a verbatim keystroke and insert it into the answer. */ void do_statusbar_verbatim_input(void) { size_t count = 1; char *bytes; bytes = get_verbatim_kbinput(bottomwin, &count); if (0 < count && count < 999) inject_into_answer(bytes, count); else if (count == 0) beep(); free(bytes); } /* Read in a keystroke, interpret it if it is a shortcut or toggle, and * return it. Set finished to TRUE if we're done after running * or trying to run a function associated with a shortcut key. */ int do_statusbar_input(bool *finished) { int input; /* The character we read in. */ static char *puddle = NULL; /* The input buffer. */ static size_t depth = 0; /* The length of the input buffer. */ const keystruct *shortcut; *finished = FALSE; /* Read in a character. */ input = get_kbinput(bottomwin, VISIBLE); #ifndef NANO_TINY if (input == KEY_WINCH) return KEY_WINCH; #endif #ifdef ENABLE_MOUSE /* If we got a mouse click and it was on a shortcut, read in the * shortcut character. */ if (input == KEY_MOUSE) { if (do_statusbar_mouse() == 1) input = get_kbinput(bottomwin, BLIND); else return ERR; } #endif /* Check for a shortcut in the current list. */ shortcut = get_shortcut(&input); /* If not a command, discard anything that is not a normal character byte. * Apart from that, only accept input when not in restricted mode, or when * not at the "Write File" prompt, or when there is no filename yet. */ if (shortcut == NULL) { if (input < 0x20 || input > 0xFF || meta_key) beep(); else if (!ISSET(RESTRICTED) || currmenu != MWRITEFILE || openfile->filename[0] == '\0') { puddle = nrealloc(puddle, depth + 2); puddle[depth++] = (char)input; } } /* If we got a shortcut, or if there aren't any other keystrokes waiting, * it's time to insert all characters in the input buffer (if not empty) * into the answer, and then clear the input buffer. */ if ((shortcut || get_key_buffer_len() == 0) && puddle != NULL) { puddle[depth] = '\0'; inject_into_answer(puddle, depth); free(puddle); puddle = NULL; depth = 0; } if (shortcut) { if (shortcut->func == do_tab || shortcut->func == do_enter) ; #ifdef ENABLE_HISTORIES else if (shortcut->func == get_history_older_void || shortcut->func == get_history_newer_void) ; #endif else if (shortcut->func == do_left) do_statusbar_left(); else if (shortcut->func == do_right) do_statusbar_right(); #ifndef NANO_TINY else if (shortcut->func == to_prev_word) do_statusbar_prev_word(); else if (shortcut->func == to_next_word) do_statusbar_next_word(); #endif else if (shortcut->func == do_home) do_statusbar_home(); else if (shortcut->func == do_end) do_statusbar_end(); /* When in restricted mode at the "Write File" prompt and the * filename isn't blank, disallow any input and deletion. */ else if (ISSET(RESTRICTED) && currmenu == MWRITEFILE && openfile->filename[0] != '\0' && (shortcut->func == do_verbatim_input || shortcut->func == cut_text || shortcut->func == paste_text || shortcut->func == do_delete || shortcut->func == do_backspace)) ; #ifdef ENABLE_NANORC else if (shortcut->func == (functionptrtype)implant) implant(shortcut->expansion); #endif else if (shortcut->func == do_verbatim_input) do_statusbar_verbatim_input(); else if (shortcut->func == cut_text) do_statusbar_cut_text(); else if (shortcut->func == do_delete) do_statusbar_delete(); else if (shortcut->func == do_backspace) do_statusbar_backspace(); else if (shortcut->func == paste_text) { if (cutbuffer != NULL) paste_into_answer(); } else { /* Handle any other shortcut in the current menu, setting finished * to TRUE to indicate that we're done after running or trying to * run its associated function. */ if (!ISSET(VIEW_MODE) || okay_for_view(shortcut)) shortcut->func(); *finished = TRUE; } } return input; } /* Return the column number of the first character of the answer that is * displayed in the status bar when the cursor is at the given column, * with the available room for the answer starting at base. Note that * (0 <= column - get_statusbar_page_start(column) < COLS). */ size_t get_statusbar_page_start(size_t base, size_t column) { if (column == base || column < COLS - 1) return 0; else if (COLS > base + 2) return column - base - 1 - (column - base - 1) % (COLS - base - 2); else return column - 2; } /* Reinitialize the cursor position in the answer. */ void put_cursor_at_end_of_answer(void) { typing_x = HIGHEST_POSITIVE; } /* Redraw the prompt bar and place the cursor at the right spot. */ void draw_the_promptbar(void) { size_t base = breadth(prompt) + 2; size_t column = base + wideness(answer, typing_x); size_t the_page, end_page; char *expanded; the_page = get_statusbar_page_start(base, column); end_page = get_statusbar_page_start(base, base + breadth(answer) - 1); /* Color the prompt bar over its full width. */ wattron(bottomwin, interface_color_pair[PROMPT_BAR]); mvwprintw(bottomwin, 0, 0, "%*s", COLS, " "); mvwaddstr(bottomwin, 0, 0, prompt); waddch(bottomwin, ':'); waddch(bottomwin, (the_page == 0) ? ' ' : '<'); expanded = display_string(answer, the_page, COLS - base, FALSE, TRUE); waddstr(bottomwin, expanded); free(expanded); if (the_page < end_page && base + breadth(answer) - the_page > COLS) mvwaddch(bottomwin, 0, COLS - 1, '>'); wattroff(bottomwin, interface_color_pair[PROMPT_BAR]); #if defined(NCURSES_VERSION_PATCH) && (NCURSES_VERSION_PATCH < 20210220) /* Work around a cursor-misplacement bug -- https://sv.gnu.org/bugs/?59808. */ if (ISSET(NO_HELP)) { wmove(bottomwin, 0, 0); wrefresh(bottomwin); } #endif /* Place the cursor at the right spot. */ wmove(bottomwin, 0, column - the_page); wnoutrefresh(bottomwin); } #ifndef NANO_TINY /* Remove or add the pipe character at the answer's head. */ void add_or_remove_pipe_symbol_from_answer(void) { if (answer[0] == '|') { memmove(answer, answer + 1, strlen(answer)); if (typing_x > 0) typing_x--; } else { answer = nrealloc(answer, strlen(answer) + 2); memmove(answer + 1, answer, strlen(answer) + 1); answer[0] = '|'; typing_x++; } } #endif /* Get a string of input at the status-bar prompt. */ functionptrtype acquire_an_answer(int *actual, bool *listed, linestruct **history_list, void (*refresh_func)(void)) { int kbinput = ERR; bool finished; functionptrtype func; #ifdef ENABLE_HISTORIES char *history = NULL; /* The current history string. */ char *magichistory = NULL; /* The (partial) answer that was typed at the prompt, if any. */ #ifdef ENABLE_TABCOMP bool previous_was_tab = FALSE; /* Whether the previous keystroke was an attempt at tab completion. */ size_t fragment_length = 0; /* The length of the fragment that the user tries to tab complete. */ #endif if (history_list != NULL) history_reset(*history_list); #endif /* ENABLE_HISTORIES */ if (typing_x > strlen(answer)) typing_x = strlen(answer); while (TRUE) { draw_the_promptbar(); kbinput = do_statusbar_input(&finished); #ifndef NANO_TINY /* If the window size changed, go reformat the prompt string. */ if (kbinput == KEY_WINCH) { refresh_func(); *actual = KEY_WINCH; #ifdef ENABLE_HISTORIES free(magichistory); #endif return NULL; } #endif /* !NANO_TINY */ func = func_from_key(&kbinput); if (func == do_cancel || func == do_enter) break; #ifdef ENABLE_TABCOMP if (func == do_tab) { #ifdef ENABLE_HISTORIES if (history_list != NULL) { if (!previous_was_tab) fragment_length = strlen(answer); if (fragment_length > 0) { answer = get_history_completion(history_list, answer, fragment_length); typing_x = strlen(answer); } } else #endif /* Allow tab completion of filenames, but not in restricted mode. */ if ((currmenu & (MINSERTFILE|MWRITEFILE|MGOTODIR)) && !ISSET(RESTRICTED)) answer = input_tab(answer, &typing_x, refresh_func, listed); } else #endif /* ENABLE_TABCOMP */ #ifdef ENABLE_HISTORIES if (func == get_history_older_void) { if (history_list != NULL) { /* If we're scrolling up at the bottom of the history list * and answer isn't blank, save answer in magichistory. */ if ((*history_list)->next == NULL) magichistory = mallocstrcpy(magichistory, answer); /* Get the older search from the history list and save it in * answer. If there is no older search, don't do anything. */ if ((history = get_history_older(history_list)) != NULL) { answer = mallocstrcpy(answer, history); typing_x = strlen(answer); } } } else if (func == get_history_newer_void) { if (history_list != NULL) { /* Get the newer search from the history list and save it in * answer. If there is no newer search, don't do anything. */ if ((history = get_history_newer(history_list)) != NULL) { answer = mallocstrcpy(answer, history); typing_x = strlen(answer); } /* If we've reached the bottom of the history list, and answer * is blank, and magichistory is set, restore the old answer. */ if ((*history_list)->next == NULL && *answer == '\0' && magichistory != NULL) { answer = mallocstrcpy(answer, magichistory); typing_x = strlen(answer); } } } else #endif /* ENABLE_HISTORIES */ /* If we ran a function that should not exit from the prompt... */ if (func == do_help || func == full_refresh) finished = FALSE; #ifndef NANO_TINY else if (func == do_nothing) finished = FALSE; else if (func == do_toggle_void) { TOGGLE(NO_HELP); window_init(); focusing = FALSE; refresh_func(); bottombars(currmenu); finished = FALSE; } #endif /* If we have a shortcut with an associated function, break out if * we're finished after running or trying to run the function. */ if (finished) break; #if defined(ENABLE_HISTORIES) && defined(ENABLE_TABCOMP) previous_was_tab = (func == do_tab); #endif } #ifdef ENABLE_HISTORIES /* Put the history pointer back at the bottom of the list. */ if (history_list != NULL) { history_reset(*history_list); free(magichistory); } #endif *actual = kbinput; return func; } /* Ask a question on the status bar. Return 0 when text was entered, * -1 for a cancelled entry, -2 for a blank string, and the relevant * keycode when a valid shortcut key was pressed. The 'provided' * parameter is the default answer for when simply Enter is typed. */ int do_prompt(int menu, const char *provided, linestruct **history_list, void (*refresh_func)(void), const char *msg, ...) { va_list ap; int retval; functionptrtype func = NULL; bool listed = FALSE; /* Save a possible current status-bar x position and prompt. */ size_t was_typing_x = typing_x; char *saved_prompt = prompt; bottombars(menu); if (answer != provided) answer = mallocstrcpy(answer, provided); #ifndef NANO_TINY redo_theprompt: #endif prompt = nmalloc((COLS * MAXCHARLEN) + 1); va_start(ap, msg); vsnprintf(prompt, COLS * MAXCHARLEN, msg, ap); va_end(ap); /* Reserve five columns for colon plus angles plus answer, ":". */ prompt[actual_x(prompt, (COLS < 5) ? 0 : COLS - 5)] = '\0'; lastmessage = VACUUM; func = acquire_an_answer(&retval, &listed, history_list, refresh_func); free(prompt); prompt = saved_prompt; #ifndef NANO_TINY if (retval == KEY_WINCH) goto redo_theprompt; #endif /* If we're done with this prompt, restore the x position to what * it was at a possible previous prompt. */ if (func == do_cancel || func == do_enter) typing_x = was_typing_x; /* If we left the prompt via Cancel or Enter, set the return value * properly. */ if (func == do_cancel) retval = -1; else if (func == do_enter) retval = (*answer == '\0') ? -2 : 0; if (lastmessage == VACUUM) wipe_statusbar(); #ifdef ENABLE_TABCOMP /* If possible filename completions are still listed, clear them off. */ if (listed) refresh_func(); #endif return retval; } /* Ask a simple Yes/No (and optionally All) question, specified in msg, * on the status bar. Return 1 for Yes, 0 for No, 2 for All (if all is * TRUE when passed in), and -1 for Cancel. */ int do_yesno_prompt(bool all, const char *msg) { int choice = -2, width = 16; /* TRANSLATORS: For the next three strings, specify the starting letters * of the translations for "Yes"/"No"/"All". The first letter of each of * these strings MUST be a single-byte letter; others may be multi-byte. */ const char *yesstr = _("Yy"); const char *nostr = _("Nn"); const char *allstr = _("Aa"); while (choice == -2) { #ifdef ENABLE_NLS char letter[MAXCHARLEN + 1]; int index = 0; #endif int kbinput; if (!ISSET(NO_HELP)) { char shortstr[MAXCHARLEN + 2]; /* Temporary string for (translated) " Y", " N" and " A". */ const keystruct *cancelshortcut = first_sc_for(MYESNO, do_cancel); /* The keystroke that is bound to the Cancel function. */ if (COLS < 32) width = COLS / 2; /* Clear the shortcut list from the bottom of the screen. */ blank_bottombars(); /* Now show the ones for "Yes", "No", "Cancel" and maybe "All". */ sprintf(shortstr, " %c", yesstr[0]); wmove(bottomwin, 1, 0); post_one_key(shortstr, _("Yes"), width); shortstr[1] = nostr[0]; wmove(bottomwin, 2, 0); post_one_key(shortstr, _("No"), width); if (all) { shortstr[1] = allstr[0]; wmove(bottomwin, 1, width); post_one_key(shortstr, _("All"), width); } wmove(bottomwin, 2, width); post_one_key(cancelshortcut->keystr, _("Cancel"), width); } /* Color the prompt bar over its full width and display the question. */ wattron(bottomwin, interface_color_pair[PROMPT_BAR]); mvwprintw(bottomwin, 0, 0, "%*s", COLS, " "); mvwaddnstr(bottomwin, 0, 0, msg, actual_x(msg, COLS - 1)); wattroff(bottomwin, interface_color_pair[PROMPT_BAR]); wnoutrefresh(bottomwin); currmenu = MYESNO; /* When not replacing, show the cursor while waiting for a key. */ kbinput = get_kbinput(bottomwin, !all); #ifndef NANO_TINY if (kbinput == KEY_WINCH) continue; /* Accept the first character of an external paste. */ if (bracketed_paste && kbinput == BRACKETED_PASTE_MARKER) kbinput = get_kbinput(bottomwin, BLIND); #endif #ifdef ENABLE_NLS letter[index++] = (unsigned char)kbinput; #ifdef ENABLE_UTF8 /* If the received code is a UTF-8 starter byte, get also the * continuation bytes and assemble them into one letter. */ if (using_utf8() && 0xC0 <= kbinput && kbinput <= 0xF7) { int extras = (kbinput / 16) % 4 + (kbinput <= 0xCF ? 1 : 0); while (extras <= get_key_buffer_len() && extras-- > 0) letter[index++] = (unsigned char)get_kbinput(bottomwin, !all); } #endif letter[index] = '\0'; /* See if the typed letter is in the Yes, No, or All strings. */ if (strstr(yesstr, letter) != NULL) choice = 1; else if (strstr(nostr, letter) != NULL) choice = 0; else if (all && strstr(allstr, letter) != NULL) choice = 2; else #endif /* ENABLE_NLS */ if (strchr("Yy", kbinput) != NULL) choice = 1; else if (strchr("Nn", kbinput) != NULL) choice = 0; else if (all && strchr("Aa", kbinput) != NULL) choice = 2; else if (func_from_key(&kbinput) == do_cancel) choice = -1; /* Interpret ^N and ^Q as "No", to allow exiting in anger. */ else if (kbinput == '\x0E' || kbinput == '\x11') choice = 0; /* And interpret ^Y as "Yes". */ else if (kbinput == '\x19') choice = 1; #ifdef ENABLE_MOUSE else if (kbinput == KEY_MOUSE) { int mouse_x, mouse_y; /* We can click on the Yes/No/All shortcuts to select an answer. */ if (get_mouseinput(&mouse_y, &mouse_x, FALSE) == 0 && wmouse_trafo(bottomwin, &mouse_y, &mouse_x, FALSE) && mouse_x < (width * 2) && mouse_y > 0) { int x = mouse_x / width; int y = mouse_y - 1; /* x == 0 means Yes or No, y == 0 means Yes or All. */ choice = -2 * x * y + x - y + 1; if (choice == 2 && !all) choice = -2; } } #endif else if (func_from_key(&kbinput) == full_refresh) full_refresh(); #ifndef NANO_TINY else if (func_from_key(&kbinput) == do_toggle_void) { TOGGLE(NO_HELP); window_init(); titlebar(NULL); focusing = FALSE; edit_refresh(); } #endif else beep(); #ifndef NANO_TINY /* Ignore the rest of an external paste. */ while (bracketed_paste) kbinput = get_kbinput(bottomwin, BLIND); #endif } return choice; }