Adding upstream version 2:9.0.1378.upstream/2%9.0.1378upstream

Signed-off-by: Daniel Baumann <daniel.baumann@progress-linux.org>

1 files changed, 4857 insertions, 0 deletions

diff --git a/src/ex_getln.c b/src/ex_getln.c
new file mode 100644
index 0000000..a938bd6
--- /dev/null
+++ b/src/ex_getln.c
@@ -0,0 +1,4857 @@
+/* vi:set ts=8 sts=4 sw=4 noet:
+ *
+ * VIM - Vi IMproved	by Bram Moolenaar
+ *
+ * Do ":help uganda"  in Vim to read copying and usage conditions.
+ * Do ":help credits" in Vim to see a list of people who contributed.
+ * See README.txt for an overview of the Vim source code.
+ */
+
+/*
+ * ex_getln.c: Functions for entering and editing an Ex command line.
+ */
+
+#include "vim.h"
+
+#ifndef MAX
+# define MAX(x,y) ((x) > (y) ? (x) : (y))
+#endif
+
+// Return value when handling keys in command-line mode.
+#define CMDLINE_NOT_CHANGED	1
+#define CMDLINE_CHANGED		2
+#define GOTO_NORMAL_MODE	3
+#define PROCESS_NEXT_KEY	4
+
+// The current cmdline_info.  It is initialized in getcmdline() and after that
+// used by other functions.  When invoking getcmdline() recursively it needs
+// to be saved with save_cmdline() and restored with restore_cmdline().
+static cmdline_info_T ccline;
+
+#ifdef FEAT_EVAL
+static int	new_cmdpos;	// position set by set_cmdline_pos()
+#endif
+
+static int	extra_char = NUL;  // extra character to display when redrawing
+				   // the command line
+static int	extra_char_shift;
+
+#ifdef FEAT_RIGHTLEFT
+static int	cmd_hkmap = 0;	// Hebrew mapping during command line
+#endif
+
+static char_u	*getcmdline_int(int firstc, long count, int indent, int clear_ccline);
+static int	cmdline_charsize(int idx);
+static void	set_cmdspos(void);
+static void	set_cmdspos_cursor(void);
+static void	correct_cmdspos(int idx, int cells);
+static void	alloc_cmdbuff(int len);
+static void	draw_cmdline(int start, int len);
+static void	save_cmdline(cmdline_info_T *ccp);
+static void	restore_cmdline(cmdline_info_T *ccp);
+static int	cmdline_paste(int regname, int literally, int remcr);
+static void	redrawcmdprompt(void);
+static int	ccheck_abbr(int);
+static int	open_cmdwin(void);
+#ifdef FEAT_SEARCH_EXTRA
+static int	empty_pattern_magic(char_u *pat, size_t len, magic_T magic_val);
+#endif
+
+static int	cedit_key = -1;	// key value of 'cedit' option
+
+    static void
+trigger_cmd_autocmd(int typechar, int evt)
+{
+    char_u	typestr[2];
+
+    typestr[0] = typechar;
+    typestr[1] = NUL;
+    apply_autocmds(evt, typestr, typestr, FALSE, curbuf);
+}
+
+/*
+ * Abandon the command line.
+ */
+    static void
+abandon_cmdline(void)
+{
+    VIM_CLEAR(ccline.cmdbuff);
+    if (msg_scrolled == 0)
+	compute_cmdrow();
+    msg("");
+    redraw_cmdline = TRUE;
+}
+
+#ifdef FEAT_SEARCH_EXTRA
+/*
+ * Guess that the pattern matches everything.  Only finds specific cases, such
+ * as a trailing \|, which can happen while typing a pattern.
+ */
+    static int
+empty_pattern(char_u *p, int delim)
+{
+    size_t	n = STRLEN(p);
+    magic_T	magic_val = MAGIC_ON;
+
+    if (n > 0)
+	(void) skip_regexp_ex(p, delim, magic_isset(), NULL, NULL, &magic_val);
+    else
+	return TRUE;
+
+    return empty_pattern_magic(p, n, magic_val);
+}
+
+    static int
+empty_pattern_magic(char_u *p, size_t len, magic_T magic_val)
+{
+    // remove trailing \v and the like
+    while (len >= 2 && p[len - 2] == '\\'
+			&& vim_strchr((char_u *)"mMvVcCZ", p[len - 1]) != NULL)
+       len -= 2;
+
+    // true, if the pattern is empty, or the pattern ends with \| and magic is
+    // set (or it ends with '|' and very magic is set)
+    return len == 0 || (len > 1
+	    && ((p[len - 2] == '\\'
+				 && p[len - 1] == '|' && magic_val == MAGIC_ON)
+		|| (p[len - 2] != '\\'
+			     && p[len - 1] == '|' && magic_val == MAGIC_ALL)));
+}
+
+// Struct to store the viewstate during 'incsearch' highlighting.
+typedef struct {
+    colnr_T	vs_curswant;
+    colnr_T	vs_leftcol;
+    linenr_T	vs_topline;
+# ifdef FEAT_DIFF
+    int		vs_topfill;
+# endif
+    linenr_T	vs_botline;
+    linenr_T	vs_empty_rows;
+} viewstate_T;
+
+    static void
+save_viewstate(viewstate_T *vs)
+{
+    vs->vs_curswant = curwin->w_curswant;
+    vs->vs_leftcol = curwin->w_leftcol;
+    vs->vs_topline = curwin->w_topline;
+# ifdef FEAT_DIFF
+    vs->vs_topfill = curwin->w_topfill;
+# endif
+    vs->vs_botline = curwin->w_botline;
+    vs->vs_empty_rows = curwin->w_empty_rows;
+}
+
+    static void
+restore_viewstate(viewstate_T *vs)
+{
+    curwin->w_curswant = vs->vs_curswant;
+    curwin->w_leftcol = vs->vs_leftcol;
+    curwin->w_topline = vs->vs_topline;
+# ifdef FEAT_DIFF
+    curwin->w_topfill = vs->vs_topfill;
+# endif
+    curwin->w_botline = vs->vs_botline;
+    curwin->w_empty_rows = vs->vs_empty_rows;
+}
+
+// Struct to store the state of 'incsearch' highlighting.
+typedef struct {
+    pos_T	search_start;	// where 'incsearch' starts searching
+    pos_T	save_cursor;
+    int		winid;		// window where this state is valid
+    viewstate_T	init_viewstate;
+    viewstate_T	old_viewstate;
+    pos_T	match_start;
+    pos_T	match_end;
+    int		did_incsearch;
+    int		incsearch_postponed;
+    optmagic_T	magic_overruled_save;
+} incsearch_state_T;
+
+    static void
+init_incsearch_state(incsearch_state_T *is_state)
+{
+    is_state->winid = curwin->w_id;
+    is_state->match_start = curwin->w_cursor;
+    is_state->did_incsearch = FALSE;
+    is_state->incsearch_postponed = FALSE;
+    is_state->magic_overruled_save = magic_overruled;
+    CLEAR_POS(&is_state->match_end);
+    is_state->save_cursor = curwin->w_cursor;  // may be restored later
+    is_state->search_start = curwin->w_cursor;
+    save_viewstate(&is_state->init_viewstate);
+    save_viewstate(&is_state->old_viewstate);
+}
+
+/*
+ * First move cursor to end of match, then to the start.  This
+ * moves the whole match onto the screen when 'nowrap' is set.
+ */
+    static void
+set_search_match(pos_T *t)
+{
+    t->lnum += search_match_lines;
+    t->col = search_match_endcol;
+    if (t->lnum > curbuf->b_ml.ml_line_count)
+    {
+	t->lnum = curbuf->b_ml.ml_line_count;
+	coladvance((colnr_T)MAXCOL);
+    }
+}
+
+/*
+ * Return TRUE when 'incsearch' highlighting is to be done.
+ * Sets search_first_line and search_last_line to the address range.
+ * May change the last search pattern.
+ */
+    static int
+do_incsearch_highlighting(
+	int		    firstc,
+	int		    *search_delim,
+	incsearch_state_T   *is_state,
+	int		    *skiplen,
+	int		    *patlen)
+{
+    char_u	*cmd;
+    cmdmod_T	dummy_cmdmod;
+    char_u	*p;
+    int		delim_optional = FALSE;
+    int		delim;
+    char_u	*end;
+    char	*dummy;
+    exarg_T	ea;
+    pos_T	save_cursor;
+    int		use_last_pat;
+    int		retval = FALSE;
+    magic_T     magic = 0;
+
+    *skiplen = 0;
+    *patlen = ccline.cmdlen;
+
+    if (!p_is || cmd_silent)
+	return FALSE;
+
+    // by default search all lines
+    search_first_line = 0;
+    search_last_line = MAXLNUM;
+
+    if (firstc == '/' || firstc == '?')
+    {
+	*search_delim = firstc;
+	return TRUE;
+    }
+    if (firstc != ':')
+	return FALSE;
+
+    ++emsg_off;
+    CLEAR_FIELD(ea);
+    ea.line1 = 1;
+    ea.line2 = 1;
+    ea.cmd = ccline.cmdbuff;
+    ea.addr_type = ADDR_LINES;
+
+    parse_command_modifiers(&ea, &dummy, &dummy_cmdmod, TRUE);
+
+    cmd = skip_range(ea.cmd, TRUE, NULL);
+    if (vim_strchr((char_u *)"sgvl", *cmd) == NULL)
+	goto theend;
+
+    // Skip over "substitute" to find the pattern separator.
+    for (p = cmd; ASCII_ISALPHA(*p); ++p)
+	;
+    if (*skipwhite(p) == NUL)
+	goto theend;
+
+    if (STRNCMP(cmd, "substitute", p - cmd) == 0
+	    || STRNCMP(cmd, "smagic", p - cmd) == 0
+	    || STRNCMP(cmd, "snomagic", MAX(p - cmd, 3)) == 0
+	    || STRNCMP(cmd, "vglobal", p - cmd) == 0)
+    {
+	if (*cmd == 's' && cmd[1] == 'm')
+	    magic_overruled = OPTION_MAGIC_ON;
+	else if (*cmd == 's' && cmd[1] == 'n')
+	    magic_overruled = OPTION_MAGIC_OFF;
+    }
+    else if (STRNCMP(cmd, "sort", MAX(p - cmd, 3)) == 0)
+    {
+	// skip over ! and flags
+	if (*p == '!')
+	    p = skipwhite(p + 1);
+	while (ASCII_ISALPHA(*(p = skipwhite(p))))
+	    ++p;
+	if (*p == NUL)
+	    goto theend;
+    }
+    else if (STRNCMP(cmd, "vimgrep", MAX(p - cmd, 3)) == 0
+	|| STRNCMP(cmd, "vimgrepadd", MAX(p - cmd, 8)) == 0
+	|| STRNCMP(cmd, "lvimgrep", MAX(p - cmd, 2)) == 0
+	|| STRNCMP(cmd, "lvimgrepadd", MAX(p - cmd, 9)) == 0
+	|| STRNCMP(cmd, "global", p - cmd) == 0)
+    {
+	// skip over "!"
+	if (*p == '!')
+	{
+	    p++;
+	    if (*skipwhite(p) == NUL)
+		goto theend;
+	}
+	if (*cmd != 'g')
+	    delim_optional = TRUE;
+    }
+    else
+	goto theend;
+
+    p = skipwhite(p);
+    delim = (delim_optional && vim_isIDc(*p)) ? ' ' : *p++;
+    *search_delim = delim;
+    end = skip_regexp_ex(p, delim, magic_isset(), NULL, NULL, &magic);
+
+    use_last_pat = end == p && *end == delim;
+
+    if (end == p && !use_last_pat)
+	goto theend;
+
+    // Don't do 'hlsearch' highlighting if the pattern matches everything.
+    if (!use_last_pat)
+    {
+	char c = *end;
+	int  empty;
+
+	*end = NUL;
+	empty = empty_pattern_magic(p, STRLEN(p), magic);
+	*end = c;
+	if (empty)
+	    goto theend;
+    }
+
+    // found a non-empty pattern or //
+    *skiplen = (int)(p - ccline.cmdbuff);
+    *patlen = (int)(end - p);
+
+    // parse the address range
+    save_cursor = curwin->w_cursor;
+    curwin->w_cursor = is_state->search_start;
+    parse_cmd_address(&ea, &dummy, TRUE);
+    if (ea.addr_count > 0)
+    {
+	// Allow for reverse match.
+	if (ea.line2 < ea.line1)
+	{
+	    search_first_line = ea.line2;
+	    search_last_line = ea.line1;
+	}
+	else
+	{
+	    search_first_line = ea.line1;
+	    search_last_line = ea.line2;
+	}
+    }
+    else if (cmd[0] == 's' && cmd[1] != 'o')
+    {
+	// :s defaults to the current line
+	search_first_line = curwin->w_cursor.lnum;
+	search_last_line = curwin->w_cursor.lnum;
+    }
+
+    curwin->w_cursor = save_cursor;
+    retval = TRUE;
+theend:
+    --emsg_off;
+    return retval;
+}
+
+    static void
+finish_incsearch_highlighting(
+	int gotesc,
+	incsearch_state_T *is_state,
+	int call_update_screen)
+{
+    if (!is_state->did_incsearch)
+	return;
+
+    is_state->did_incsearch = FALSE;
+    if (gotesc)
+	curwin->w_cursor = is_state->save_cursor;
+    else
+    {
+	if (!EQUAL_POS(is_state->save_cursor, is_state->search_start))
+	{
+	    // put the '" mark at the original position
+	    curwin->w_cursor = is_state->save_cursor;
+	    setpcmark();
+	}
+	curwin->w_cursor = is_state->search_start;
+    }
+    restore_viewstate(&is_state->old_viewstate);
+    highlight_match = FALSE;
+
+    // by default search all lines
+    search_first_line = 0;
+    search_last_line = MAXLNUM;
+
+    magic_overruled = is_state->magic_overruled_save;
+
+    validate_cursor();	// needed for TAB
+    status_redraw_all();
+    redraw_all_later(UPD_SOME_VALID);
+    if (call_update_screen)
+	update_screen(UPD_SOME_VALID);
+}
+
+/*
+ * Do 'incsearch' highlighting if desired.
+ */
+    static void
+may_do_incsearch_highlighting(
+	int		    firstc,
+	long		    count,
+	incsearch_state_T   *is_state)
+{
+    int		skiplen, patlen;
+    int		found;  // do_search() result
+    pos_T	end_pos;
+#ifdef FEAT_RELTIME
+    searchit_arg_T sia;
+#endif
+    int		next_char;
+    int		use_last_pat;
+    int		did_do_incsearch = is_state->did_incsearch;
+    int		search_delim;
+
+    // Parsing range may already set the last search pattern.
+    // NOTE: must call restore_last_search_pattern() before returning!
+    save_last_search_pattern();
+
+    if (!do_incsearch_highlighting(firstc, &search_delim, is_state,
+							    &skiplen, &patlen))
+    {
+	restore_last_search_pattern();
+	finish_incsearch_highlighting(FALSE, is_state, TRUE);
+	if (did_do_incsearch && vpeekc() == NUL)
+	    // may have skipped a redraw, do it now
+	    redrawcmd();
+	return;
+    }
+
+    // If there is a character waiting, search and redraw later.
+    if (char_avail())
+    {
+	restore_last_search_pattern();
+	is_state->incsearch_postponed = TRUE;
+	return;
+    }
+    is_state->incsearch_postponed = FALSE;
+
+    if (search_first_line == 0)
+	// start at the original cursor position
+	curwin->w_cursor = is_state->search_start;
+    else if (search_first_line > curbuf->b_ml.ml_line_count)
+    {
+	// start after the last line
+	curwin->w_cursor.lnum = curbuf->b_ml.ml_line_count;
+	curwin->w_cursor.col = MAXCOL;
+    }
+    else
+    {
+	// start at the first line in the range
+	curwin->w_cursor.lnum = search_first_line;
+	curwin->w_cursor.col = 0;
+    }
+
+    // Use the previous pattern for ":s//".
+    next_char = ccline.cmdbuff[skiplen + patlen];
+    use_last_pat = patlen == 0 && skiplen > 0
+				   && ccline.cmdbuff[skiplen - 1] == next_char;
+
+    // If there is no pattern, don't do anything.
+    if (patlen == 0 && !use_last_pat)
+    {
+	found = 0;
+	set_no_hlsearch(TRUE); // turn off previous highlight
+	redraw_all_later(UPD_SOME_VALID);
+    }
+    else
+    {
+	int search_flags = SEARCH_OPT + SEARCH_NOOF + SEARCH_PEEK;
+
+	cursor_off();	// so the user knows we're busy
+	out_flush();
+	++emsg_off;	// so it doesn't beep if bad expr
+	if (!p_hls)
+	    search_flags += SEARCH_KEEP;
+	if (search_first_line != 0)
+	    search_flags += SEARCH_START;
+	ccline.cmdbuff[skiplen + patlen] = NUL;
+#ifdef FEAT_RELTIME
+	CLEAR_FIELD(sia);
+	// Set the time limit to half a second.
+	sia.sa_tm = 500;
+#endif
+	found = do_search(NULL, firstc == ':' ? '/' : firstc, search_delim,
+				 ccline.cmdbuff + skiplen, count, search_flags,
+#ifdef FEAT_RELTIME
+		&sia
+#else
+		NULL
+#endif
+		);
+	ccline.cmdbuff[skiplen + patlen] = next_char;
+	--emsg_off;
+
+	if (curwin->w_cursor.lnum < search_first_line
+		|| curwin->w_cursor.lnum > search_last_line)
+	{
+	    // match outside of address range
+	    found = 0;
+	    curwin->w_cursor = is_state->search_start;
+	}
+
+	// if interrupted while searching, behave like it failed
+	if (got_int)
+	{
+	    (void)vpeekc();	// remove <C-C> from input stream
+	    got_int = FALSE;	// don't abandon the command line
+	    found = 0;
+	}
+	else if (char_avail())
+	    // cancelled searching because a char was typed
+	    is_state->incsearch_postponed = TRUE;
+    }
+    if (found != 0)
+	highlight_match = TRUE;		// highlight position
+    else
+	highlight_match = FALSE;	// remove highlight
+
+    // First restore the old curwin values, so the screen is positioned in the
+    // same way as the actual search command.
+    restore_viewstate(&is_state->old_viewstate);
+    changed_cline_bef_curs();
+    update_topline();
+
+    if (found != 0)
+    {
+	pos_T	    save_pos = curwin->w_cursor;
+
+	is_state->match_start = curwin->w_cursor;
+	set_search_match(&curwin->w_cursor);
+	validate_cursor();
+	end_pos = curwin->w_cursor;
+	is_state->match_end = end_pos;
+	curwin->w_cursor = save_pos;
+    }
+    else
+	end_pos = curwin->w_cursor; // shutup gcc 4
+
+    // Disable 'hlsearch' highlighting if the pattern matches everything.
+    // Avoids a flash when typing "foo\|".
+    if (!use_last_pat)
+    {
+	next_char = ccline.cmdbuff[skiplen + patlen];
+	ccline.cmdbuff[skiplen + patlen] = NUL;
+	if (empty_pattern(ccline.cmdbuff + skiplen, search_delim)
+							       && !no_hlsearch)
+	{
+	    redraw_all_later(UPD_SOME_VALID);
+	    set_no_hlsearch(TRUE);
+	}
+	ccline.cmdbuff[skiplen + patlen] = next_char;
+    }
+
+    validate_cursor();
+
+    // May redraw the status line to show the cursor position.
+    if (p_ru && curwin->w_status_height > 0)
+	curwin->w_redr_status = TRUE;
+
+    update_screen(UPD_SOME_VALID);
+    highlight_match = FALSE;
+    restore_last_search_pattern();
+
+    // Leave it at the end to make CTRL-R CTRL-W work.  But not when beyond the
+    // end of the pattern, e.g. for ":s/pat/".
+    if (ccline.cmdbuff[skiplen + patlen] != NUL)
+	curwin->w_cursor = is_state->search_start;
+    else if (found != 0)
+	curwin->w_cursor = end_pos;
+
+    msg_starthere();
+    redrawcmdline();
+    is_state->did_incsearch = TRUE;
+}
+
+/*
+ * May adjust 'incsearch' highlighting for typing CTRL-G and CTRL-T, go to next
+ * or previous match.
+ * Returns FAIL when jumping to cmdline_not_changed;
+ */
+    static int
+may_adjust_incsearch_highlighting(
+	int			firstc,
+	long			count,
+	incsearch_state_T	*is_state,
+	int			c)
+{
+    int	    skiplen, patlen;
+    pos_T   t;
+    char_u  *pat;
+    int	    search_flags = SEARCH_NOOF;
+    int	    i;
+    int	    save;
+    int	    search_delim;
+
+    // Parsing range may already set the last search pattern.
+    // NOTE: must call restore_last_search_pattern() before returning!
+    save_last_search_pattern();
+
+    if (!do_incsearch_highlighting(firstc, &search_delim, is_state,
+							    &skiplen, &patlen))
+    {
+	restore_last_search_pattern();
+	return OK;
+    }
+    if (patlen == 0 && ccline.cmdbuff[skiplen] == NUL)
+    {
+	restore_last_search_pattern();
+	return FAIL;
+    }
+
+    if (search_delim == ccline.cmdbuff[skiplen])
+    {
+	pat = last_search_pattern();
+	if (pat == NULL)
+	{
+	    restore_last_search_pattern();
+	    return FAIL;
+	}
+	skiplen = 0;
+	patlen = (int)STRLEN(pat);
+    }
+    else
+	pat = ccline.cmdbuff + skiplen;
+
+    cursor_off();
+    out_flush();
+    if (c == Ctrl_G)
+    {
+	t = is_state->match_end;
+	if (LT_POS(is_state->match_start, is_state->match_end))
+	    // Start searching at the end of the match not at the beginning of
+	    // the next column.
+	    (void)decl(&t);
+	search_flags += SEARCH_COL;
+    }
+    else
+	t = is_state->match_start;
+    if (!p_hls)
+	search_flags += SEARCH_KEEP;
+    ++emsg_off;
+    save = pat[patlen];
+    pat[patlen] = NUL;
+    i = searchit(curwin, curbuf, &t, NULL,
+		 c == Ctrl_G ? FORWARD : BACKWARD,
+		 pat, count, search_flags, RE_SEARCH, NULL);
+    --emsg_off;
+    pat[patlen] = save;
+    if (i)
+    {
+	is_state->search_start = is_state->match_start;
+	is_state->match_end = t;
+	is_state->match_start = t;
+	if (c == Ctrl_T && firstc != '?')
+	{
+	    // Move just before the current match, so that when nv_search
+	    // finishes the cursor will be put back on the match.
+	    is_state->search_start = t;
+	    (void)decl(&is_state->search_start);
+	}
+	else if (c == Ctrl_G && firstc == '?')
+	{
+	    // Move just after the current match, so that when nv_search
+	    // finishes the cursor will be put back on the match.
+	    is_state->search_start = t;
+	    (void)incl(&is_state->search_start);
+	}
+	if (LT_POS(t, is_state->search_start) && c == Ctrl_G)
+	{
+	    // wrap around
+	    is_state->search_start = t;
+	    if (firstc == '?')
+		(void)incl(&is_state->search_start);
+	    else
+		(void)decl(&is_state->search_start);
+	}
+
+	set_search_match(&is_state->match_end);
+	curwin->w_cursor = is_state->match_start;
+	changed_cline_bef_curs();
+	update_topline();
+	validate_cursor();
+	highlight_match = TRUE;
+	save_viewstate(&is_state->old_viewstate);
+	update_screen(UPD_NOT_VALID);
+	highlight_match = FALSE;
+	redrawcmdline();
+	curwin->w_cursor = is_state->match_end;
+    }
+    else
+	vim_beep(BO_ERROR);
+    restore_last_search_pattern();
+    return FAIL;
+}
+
+/*
+ * When CTRL-L typed: add character from the match to the pattern.
+ * May set "*c" to the added character.
+ * Return OK when jumping to cmdline_not_changed.
+ */
+    static int
+may_add_char_to_search(int firstc, int *c, incsearch_state_T *is_state)
+{
+    int		skiplen, patlen, search_delim;
+
+    // Parsing range may already set the last search pattern.
+    // NOTE: must call restore_last_search_pattern() before returning!
+    save_last_search_pattern();
+
+    if (!do_incsearch_highlighting(firstc, &search_delim, is_state,
+							    &skiplen, &patlen))
+    {
+	restore_last_search_pattern();
+	return FAIL;
+    }
+    restore_last_search_pattern();
+
+    // Add a character from under the cursor for 'incsearch'.
+    if (is_state->did_incsearch)
+    {
+	curwin->w_cursor = is_state->match_end;
+	*c = gchar_cursor();
+	if (*c != NUL)
+	{
+	    // If 'ignorecase' and 'smartcase' are set and the
+	    // command line has no uppercase characters, convert
+	    // the character to lowercase.
+	    if (p_ic && p_scs && !pat_has_uppercase(ccline.cmdbuff + skiplen))
+		*c = MB_TOLOWER(*c);
+	    if (*c == search_delim || vim_strchr((char_u *)(
+			     magic_isset() ? "\\~^$.*[" : "\\^$"), *c) != NULL)
+	    {
+		// put a backslash before special characters
+		stuffcharReadbuff(*c);
+		*c = '\\';
+	    }
+	    // add any composing characters
+	    if (mb_char2len(*c) != mb_ptr2len(ml_get_cursor()))
+	    {
+		int save_c = *c;
+
+		while (mb_char2len(*c) != mb_ptr2len(ml_get_cursor()))
+		{
+		    curwin->w_cursor.col += mb_char2len(*c);
+		    *c = gchar_cursor();
+		    stuffcharReadbuff(*c);
+		}
+		*c = save_c;
+	    }
+	    return FAIL;
+	}
+    }
+    return OK;
+}
+#endif
+
+#ifdef FEAT_ARABIC
+/*
+ * Return TRUE if the command line has an Arabic character at or after "start"
+ * for "len" bytes.
+ */
+    static int
+cmdline_has_arabic(int start, int len)
+{
+    int	    j;
+    int	    mb_l;
+    int	    u8c;
+    char_u  *p;
+    int	    u8cc[MAX_MCO];
+
+    if (!enc_utf8)
+	return FALSE;
+
+    for (j = start; j < start + len; j += mb_l)
+    {
+	p = ccline.cmdbuff + j;
+	u8c = utfc_ptr2char_len(p, u8cc, start + len - j);
+	mb_l = utfc_ptr2len_len(p, start + len - j);
+	if (ARABIC_CHAR(u8c))
+	    return TRUE;
+    }
+    return FALSE;
+}
+#endif
+
+    void
+cmdline_init(void)
+{
+    CLEAR_FIELD(ccline);
+}
+
+/*
+ * Handle CTRL-\ pressed in Command-line mode:
+ * - CTRL-\ CTRL-N goes to Normal mode
+ * - CTRL-\ CTRL-G goes to Insert mode when 'insertmode' is set
+ * - CTRL-\ e prompts for an expression.
+ */
+    static int
+cmdline_handle_ctrl_bsl(int c, int *gotesc)
+{
+    ++no_mapping;
+    ++allow_keys;
+    c = plain_vgetc();
+    --no_mapping;
+    --allow_keys;
+
+    // CTRL-\ e doesn't work when obtaining an expression, unless it
+    // is in a mapping.
+    if (c != Ctrl_N && c != Ctrl_G && (c != 'e'
+		|| (ccline.cmdfirstc == '=' && KeyTyped)
+#ifdef FEAT_EVAL
+		|| cmdline_star > 0
+#endif
+		))
+    {
+	vungetc(c);
+	return PROCESS_NEXT_KEY;
+    }
+
+#ifdef FEAT_EVAL
+    if (c == 'e')
+    {
+	char_u	*p = NULL;
+	int	len;
+
+	/*
+	 * Replace the command line with the result of an expression.
+	 * This will call getcmdline() recursively in get_expr_register().
+	 */
+	if (ccline.cmdpos == ccline.cmdlen)
+	    new_cmdpos = 99999;	// keep it at the end
+	else
+	    new_cmdpos = ccline.cmdpos;
+
+	c = get_expr_register();
+	if (c == '=')
+	{
+	    // Evaluate the expression.  Set "textlock" to avoid nasty things
+	    // like going to another buffer.
+	    ++textlock;
+	    p = get_expr_line();
+	    --textlock;
+
+	    if (p != NULL)
+	    {
+		len = (int)STRLEN(p);
+		if (realloc_cmdbuff(len + 1) == OK)
+		{
+		    ccline.cmdlen = len;
+		    STRCPY(ccline.cmdbuff, p);
+		    vim_free(p);
+
+		    // Restore the cursor or use the position set with
+		    // set_cmdline_pos().
+		    if (new_cmdpos > ccline.cmdlen)
+			ccline.cmdpos = ccline.cmdlen;
+		    else
+			ccline.cmdpos = new_cmdpos;
+
+		    KeyTyped = FALSE;	// Don't do p_wc completion.
+		    redrawcmd();
+		    return CMDLINE_CHANGED;
+		}
+		vim_free(p);
+	    }
+	}
+	beep_flush();
+	got_int = FALSE;	// don't abandon the command line
+	did_emsg = FALSE;
+	emsg_on_display = FALSE;
+	redrawcmd();
+	return CMDLINE_NOT_CHANGED;
+    }
+#endif
+
+    if (c == Ctrl_G && p_im && restart_edit == 0)
+	restart_edit = 'a';
+    *gotesc = TRUE;	// will free ccline.cmdbuff after putting it
+			// in history
+    return GOTO_NORMAL_MODE;
+}
+
+/*
+ * Completion for 'wildchar' or 'wildcharm' key.
+ * - hitting <ESC> twice means: abandon command line.
+ * - wildcard expansion is only done when the 'wildchar' key is really
+ *   typed, not when it comes from a macro
+ * Returns CMDLINE_CHANGED if command line is changed or CMDLINE_NOT_CHANGED.
+ */
+    static int
+cmdline_wildchar_complete(
+	int		c,
+	int		escape,
+	int		*did_wild_list,
+	int		*wim_index_p,
+	expand_T	*xp,
+	int		*gotesc)
+{
+    int		wim_index = *wim_index_p;
+    int		res;
+    int		j;
+    int		options = WILD_NO_BEEP;
+
+    if (wim_flags[wim_index] & WIM_BUFLASTUSED)
+	options |= WILD_BUFLASTUSED;
+    if (xp->xp_numfiles > 0)   // typed p_wc at least twice
+    {
+	// if 'wildmode' contains "list" may still need to list
+	if (xp->xp_numfiles > 1
+		&& !*did_wild_list
+		&& ((wim_flags[wim_index] & WIM_LIST)
+		    || (p_wmnu && (wim_flags[wim_index] & WIM_FULL) != 0)))
+	{
+	    (void)showmatches(xp,
+		    p_wmnu && ((wim_flags[wim_index] & WIM_LIST) == 0));
+	    redrawcmd();
+	    *did_wild_list = TRUE;
+	}
+	if (wim_flags[wim_index] & WIM_LONGEST)
+	    res = nextwild(xp, WILD_LONGEST, options, escape);
+	else if (wim_flags[wim_index] & WIM_FULL)
+	    res = nextwild(xp, WILD_NEXT, options, escape);
+	else
+	    res = OK;	    // don't insert 'wildchar' now
+    }
+    else		    // typed p_wc first time
+    {
+	wim_index = 0;
+	j = ccline.cmdpos;
+	// if 'wildmode' first contains "longest", get longest
+	// common part
+	if (wim_flags[0] & WIM_LONGEST)
+	    res = nextwild(xp, WILD_LONGEST, options, escape);
+	else
+	    res = nextwild(xp, WILD_EXPAND_KEEP, options, escape);
+
+	// if interrupted while completing, behave like it failed
+	if (got_int)
+	{
+	    (void)vpeekc();	// remove <C-C> from input stream
+	    got_int = FALSE;	// don't abandon the command line
+	    (void)ExpandOne(xp, NULL, NULL, 0, WILD_FREE);
+	    xp->xp_context = EXPAND_NOTHING;
+	    *wim_index_p = wim_index;
+	    return CMDLINE_CHANGED;
+	}
+
+	// when more than one match, and 'wildmode' first contains
+	// "list", or no change and 'wildmode' contains "longest,list",
+	// list all matches
+	if (res == OK && xp->xp_numfiles > 1)
+	{
+	    // a "longest" that didn't do anything is skipped (but not
+	    // "list:longest")
+	    if (wim_flags[0] == WIM_LONGEST && ccline.cmdpos == j)
+		wim_index = 1;
+	    if ((wim_flags[wim_index] & WIM_LIST)
+		    || (p_wmnu && (wim_flags[wim_index] & WIM_FULL) != 0))
+	    {
+		if (!(wim_flags[0] & WIM_LONGEST))
+		{
+		    int p_wmnu_save = p_wmnu;
+
+		    p_wmnu = 0;
+
+		    // remove match
+		    nextwild(xp, WILD_PREV, 0, escape);
+		    p_wmnu = p_wmnu_save;
+		}
+		(void)showmatches(xp, p_wmnu
+			&& ((wim_flags[wim_index] & WIM_LIST) == 0));
+		redrawcmd();
+		*did_wild_list = TRUE;
+		if (wim_flags[wim_index] & WIM_LONGEST)
+		    nextwild(xp, WILD_LONGEST, options, escape);
+		else if (wim_flags[wim_index] & WIM_FULL)
+		    nextwild(xp, WILD_NEXT, options, escape);
+	    }
+	    else
+		vim_beep(BO_WILD);
+	}
+	else if (xp->xp_numfiles == -1)
+	    xp->xp_context = EXPAND_NOTHING;
+    }
+    if (wim_index < 3)
+	++wim_index;
+    if (c == ESC)
+	*gotesc = TRUE;
+
+    *wim_index_p = wim_index;
+    return (res == OK) ? CMDLINE_CHANGED : CMDLINE_NOT_CHANGED;
+}
+
+/*
+ * Handle backspace, delete and CTRL-W keys in the command-line mode.
+ * Returns:
+ *  CMDLINE_NOT_CHANGED - if the command line is not changed
+ *  CMDLINE_CHANGED - if the command line is changed
+ *  GOTO_NORMAL_MODE - go back to normal mode
+ */
+    static int
+cmdline_erase_chars(
+	int c,
+	int indent
+#ifdef FEAT_SEARCH_EXTRA
+	, incsearch_state_T *isp
+#endif
+	)
+{
+    int		i;
+    int		j;
+
+    if (c == K_KDEL)
+	c = K_DEL;
+
+    /*
+     * Delete current character is the same as backspace on next
+     * character, except at end of line.
+     */
+    if (c == K_DEL && ccline.cmdpos != ccline.cmdlen)
+	++ccline.cmdpos;
+    if (has_mbyte && c == K_DEL)
+	ccline.cmdpos += mb_off_next(ccline.cmdbuff,
+		ccline.cmdbuff + ccline.cmdpos);
+    if (ccline.cmdpos > 0)
+    {
+	char_u *p;
+
+	j = ccline.cmdpos;
+	p = ccline.cmdbuff + j;
+	if (has_mbyte)
+	{
+	    p = mb_prevptr(ccline.cmdbuff, p);
+	    if (c == Ctrl_W)
+	    {
+		while (p > ccline.cmdbuff && vim_isspace(*p))
+		    p = mb_prevptr(ccline.cmdbuff, p);
+		i = mb_get_class(p);
+		while (p > ccline.cmdbuff && mb_get_class(p) == i)
+		    p = mb_prevptr(ccline.cmdbuff, p);
+		if (mb_get_class(p) != i)
+		    p += (*mb_ptr2len)(p);
+	    }
+	}
+	else if (c == Ctrl_W)
+	{
+	    while (p > ccline.cmdbuff && vim_isspace(p[-1]))
+		--p;
+	    if (p > ccline.cmdbuff)
+	    {
+		i = vim_iswordc(p[-1]);
+		while (p > ccline.cmdbuff && !vim_isspace(p[-1])
+			&& vim_iswordc(p[-1]) == i)
+		    --p;
+	    }
+	}
+	else
+	    --p;
+	ccline.cmdpos = (int)(p - ccline.cmdbuff);
+	ccline.cmdlen -= j - ccline.cmdpos;
+	i = ccline.cmdpos;
+	while (i < ccline.cmdlen)
+	    ccline.cmdbuff[i++] = ccline.cmdbuff[j++];
+
+	// Truncate at the end, required for multi-byte chars.
+	ccline.cmdbuff[ccline.cmdlen] = NUL;
+#ifdef FEAT_SEARCH_EXTRA
+	if (ccline.cmdlen == 0)
+	{
+	    isp->search_start = isp->save_cursor;
+	    // save view settings, so that the screen
+	    // won't be restored at the wrong position
+	    isp->old_viewstate = isp->init_viewstate;
+	}
+#endif
+	redrawcmd();
+    }
+    else if (ccline.cmdlen == 0 && c != Ctrl_W
+	    && ccline.cmdprompt == NULL && indent == 0)
+    {
+	// In ex and debug mode it doesn't make sense to return.
+	if (exmode_active
+#ifdef FEAT_EVAL
+		|| ccline.cmdfirstc == '>'
+#endif
+	   )
+	    return CMDLINE_NOT_CHANGED;
+
+	VIM_CLEAR(ccline.cmdbuff);	// no commandline to return
+	if (!cmd_silent)
+	{
+#ifdef FEAT_RIGHTLEFT
+	    if (cmdmsg_rl)
+		msg_col = Columns;
+	    else
+#endif
+		msg_col = 0;
+	    msg_putchar(' ');		// delete ':'
+	}
+#ifdef FEAT_SEARCH_EXTRA
+	if (ccline.cmdlen == 0)
+	    isp->search_start = isp->save_cursor;
+#endif
+	redraw_cmdline = TRUE;
+	return GOTO_NORMAL_MODE;
+    }
+    return CMDLINE_CHANGED;
+}
+
+/*
+ * Handle the CTRL-^ key in the command-line mode and toggle the use of the
+ * language :lmap mappings and/or Input Method.
+ */
+    static void
+cmdline_toggle_langmap(long *b_im_ptr)
+{
+    if (map_to_exists_mode((char_u *)"", MODE_LANGMAP, FALSE))
+    {
+	// ":lmap" mappings exists, toggle use of mappings.
+	State ^= MODE_LANGMAP;
+#ifdef HAVE_INPUT_METHOD
+	im_set_active(FALSE);	// Disable input method
+#endif
+	if (b_im_ptr != NULL)
+	{
+	    if (State & MODE_LANGMAP)
+		*b_im_ptr = B_IMODE_LMAP;
+	    else
+		*b_im_ptr = B_IMODE_NONE;
+	}
+    }
+#ifdef HAVE_INPUT_METHOD
+    else
+    {
+	// There are no ":lmap" mappings, toggle IM.  When
+	// 'imdisable' is set don't try getting the status, it's
+	// always off.
+	if ((p_imdisable && b_im_ptr != NULL)
+		? *b_im_ptr == B_IMODE_IM : im_get_status())
+	{
+	    im_set_active(FALSE);	// Disable input method
+	    if (b_im_ptr != NULL)
+		*b_im_ptr = B_IMODE_NONE;
+	}
+	else
+	{
+	    im_set_active(TRUE);	// Enable input method
+	    if (b_im_ptr != NULL)
+		*b_im_ptr = B_IMODE_IM;
+	}
+    }
+#endif
+    if (b_im_ptr != NULL)
+    {
+	if (b_im_ptr == &curbuf->b_p_iminsert)
+	    set_iminsert_global();
+	else
+	    set_imsearch_global();
+    }
+#ifdef CURSOR_SHAPE
+    ui_cursor_shape();	// may show different cursor shape
+#endif
+#if defined(FEAT_KEYMAP)
+    // Show/unshow value of 'keymap' in status lines later.
+    status_redraw_curbuf();
+#endif
+}
+
+/*
+ * Handle the CTRL-R key in the command-line mode and insert the contents of a
+ * numbered or named register.
+ */
+    static int
+cmdline_insert_reg(int *gotesc UNUSED)
+{
+    int		i;
+    int		c;
+    int		literally = FALSE;
+#ifdef FEAT_EVAL
+    int		save_new_cmdpos = new_cmdpos;
+#endif
+
+#ifdef USE_ON_FLY_SCROLL
+    dont_scroll = TRUE;	// disallow scrolling here
+#endif
+    putcmdline('"', TRUE);
+    ++no_mapping;
+    ++allow_keys;
+    i = c = plain_vgetc();	// CTRL-R <char>
+    if (i == Ctrl_O)
+	i = Ctrl_R;		// CTRL-R CTRL-O == CTRL-R CTRL-R
+    if (i == Ctrl_R)
+	c = plain_vgetc();	// CTRL-R CTRL-R <char>
+    extra_char = NUL;
+    --no_mapping;
+    --allow_keys;
+#ifdef FEAT_EVAL
+    /*
+     * Insert the result of an expression.
+     */
+    new_cmdpos = -1;
+    if (c == '=')
+    {
+	if (ccline.cmdfirstc == '='  // can't do this recursively
+		|| cmdline_star > 0) // or when typing a password
+	{
+	    beep_flush();
+	    c = ESC;
+	}
+	else
+	    c = get_expr_register();
+    }
+#endif
+    if (c != ESC)	    // use ESC to cancel inserting register
+    {
+	literally = i == Ctrl_R;
+	cmdline_paste(c, literally, FALSE);
+
+#ifdef FEAT_EVAL
+	// When there was a serious error abort getting the
+	// command line.
+	if (aborting())
+	{
+	    *gotesc = TRUE;  // will free ccline.cmdbuff after
+	    // putting it in history
+	    return GOTO_NORMAL_MODE;
+	}
+#endif
+	KeyTyped = FALSE;	// Don't do p_wc completion.
+#ifdef FEAT_EVAL
+	if (new_cmdpos >= 0)
+	{
+	    // set_cmdline_pos() was used
+	    if (new_cmdpos > ccline.cmdlen)
+		ccline.cmdpos = ccline.cmdlen;
+	    else
+		ccline.cmdpos = new_cmdpos;
+	}
+#endif
+    }
+#ifdef FEAT_EVAL
+    new_cmdpos = save_new_cmdpos;
+#endif
+
+    // remove the double quote
+    redrawcmd();
+
+    // With "literally": the command line has already changed.
+    // Else: the text has been stuffed, but the command line didn't change yet.
+    return literally ? CMDLINE_CHANGED : CMDLINE_NOT_CHANGED;
+}
+
+/*
+ * Handle the Left and Right mouse clicks in the command-line mode.
+ */
+    static void
+cmdline_left_right_mouse(int c, int *ignore_drag_release)
+{
+    if (c == K_LEFTRELEASE || c == K_RIGHTRELEASE)
+	*ignore_drag_release = TRUE;
+    else
+	*ignore_drag_release = FALSE;
+# ifdef FEAT_GUI
+    // When GUI is active, also move when 'mouse' is empty
+    if (!gui.in_use)
+# endif
+	if (!mouse_has(MOUSE_COMMAND))
+	    return;
+# ifdef FEAT_CLIPBOARD
+    if (mouse_row < cmdline_row && clip_star.available)
+    {
+	int	    button, is_click, is_drag;
+
+	/*
+	 * Handle modeless selection.
+	 */
+	button = get_mouse_button(KEY2TERMCAP1(c),
+		&is_click, &is_drag);
+	if (mouse_model_popup() && button == MOUSE_LEFT
+		&& (mod_mask & MOD_MASK_SHIFT))
+	{
+	    // Translate shift-left to right button.
+	    button = MOUSE_RIGHT;
+	    mod_mask &= ~MOD_MASK_SHIFT;
+	}
+	clip_modeless(button, is_click, is_drag);
+	return;
+    }
+# endif
+
+    set_cmdspos();
+    for (ccline.cmdpos = 0; ccline.cmdpos < ccline.cmdlen;
+	    ++ccline.cmdpos)
+    {
+	int	i;
+
+	i = cmdline_charsize(ccline.cmdpos);
+	if (mouse_row <= cmdline_row + ccline.cmdspos / Columns
+		&& mouse_col < ccline.cmdspos % Columns + i)
+	    break;
+	if (has_mbyte)
+	{
+	    // Count ">" for double-wide char that doesn't fit.
+	    correct_cmdspos(ccline.cmdpos, i);
+	    ccline.cmdpos += (*mb_ptr2len)(ccline.cmdbuff
+		    + ccline.cmdpos) - 1;
+	}
+	ccline.cmdspos += i;
+    }
+}
+
+/*
+ * Handle the Up, Down, Page Up, Page down, CTRL-N and CTRL-P key in the
+ * command-line mode. The pressed key is in 'c'.
+ * Returns:
+ *  CMDLINE_NOT_CHANGED - if the command line is not changed
+ *  CMDLINE_CHANGED - if the command line is changed
+ *  GOTO_NORMAL_MODE - go back to normal mode
+ */
+    static int
+cmdline_browse_history(
+	int	c,
+	int	firstc,
+	char_u	**curcmdstr,
+	int	histype,
+	int	*hiscnt_p,
+	expand_T *xp)
+{
+    int		i;
+    int		j;
+    char_u	*lookfor = *curcmdstr;
+    int		hiscnt = *hiscnt_p;
+    int		res;
+
+    if (get_hislen() == 0 || firstc == NUL)	// no history
+	return CMDLINE_NOT_CHANGED;
+
+    i = hiscnt;
+
+    // save current command string so it can be restored later
+    if (lookfor == NULL)
+    {
+	if ((lookfor = vim_strsave(ccline.cmdbuff)) == NULL)
+	    return CMDLINE_NOT_CHANGED;
+	lookfor[ccline.cmdpos] = NUL;
+    }
+
+    j = (int)STRLEN(lookfor);
+    for (;;)
+    {
+	// one step backwards
+	if (c == K_UP|| c == K_S_UP || c == Ctrl_P
+		|| c == K_PAGEUP || c == K_KPAGEUP)
+	{
+	    if (hiscnt == get_hislen())	// first time
+		hiscnt = *get_hisidx(histype);
+	    else if (hiscnt == 0 && *get_hisidx(histype)
+		    != get_hislen() - 1)
+		hiscnt = get_hislen() - 1;
+	    else if (hiscnt != *get_hisidx(histype) + 1)
+		--hiscnt;
+	    else			// at top of list
+	    {
+		hiscnt = i;
+		break;
+	    }
+	}
+	else    // one step forwards
+	{
+	    // on last entry, clear the line
+	    if (hiscnt == *get_hisidx(histype))
+	    {
+		hiscnt = get_hislen();
+		break;
+	    }
+
+	    // not on a history line, nothing to do
+	    if (hiscnt == get_hislen())
+		break;
+	    if (hiscnt == get_hislen() - 1)   // wrap around
+		hiscnt = 0;
+	    else
+		++hiscnt;
+	}
+	if (hiscnt < 0 || get_histentry(histype)[hiscnt].hisstr
+		== NULL)
+	{
+	    hiscnt = i;
+	    break;
+	}
+	if ((c != K_UP && c != K_DOWN)
+		|| hiscnt == i
+		|| STRNCMP(get_histentry(histype)[hiscnt].hisstr,
+		    lookfor, (size_t)j) == 0)
+	    break;
+    }
+
+    if (hiscnt != i)	// jumped to other entry
+    {
+	char_u	*p;
+	int		len;
+	int		old_firstc;
+
+	VIM_CLEAR(ccline.cmdbuff);
+	xp->xp_context = EXPAND_NOTHING;
+	if (hiscnt == get_hislen())
+	    p = lookfor;	// back to the old one
+	else
+	    p = get_histentry(histype)[hiscnt].hisstr;
+
+	if (histype == HIST_SEARCH
+		&& p != lookfor
+		&& (old_firstc = p[STRLEN(p) + 1]) != firstc)
+	{
+	    // Correct for the separator character used when
+	    // adding the history entry vs the one used now.
+	    // First loop: count length.
+	    // Second loop: copy the characters.
+	    for (i = 0; i <= 1; ++i)
+	    {
+		len = 0;
+		for (j = 0; p[j] != NUL; ++j)
+		{
+		    // Replace old sep with new sep, unless it is
+		    // escaped.
+		    if (p[j] == old_firstc
+			    && (j == 0 || p[j - 1] != '\\'))
+		    {
+			if (i > 0)
+			    ccline.cmdbuff[len] = firstc;
+		    }
+		    else
+		    {
+			// Escape new sep, unless it is already
+			// escaped.
+			if (p[j] == firstc
+				&& (j == 0 || p[j - 1] != '\\'))
+			{
+			    if (i > 0)
+				ccline.cmdbuff[len] = '\\';
+			    ++len;
+			}
+			if (i > 0)
+			    ccline.cmdbuff[len] = p[j];
+		    }
+		    ++len;
+		}
+		if (i == 0)
+		{
+		    alloc_cmdbuff(len);
+		    if (ccline.cmdbuff == NULL)
+		    {
+			res = GOTO_NORMAL_MODE;
+			goto done;
+		    }
+		}
+	    }
+	    ccline.cmdbuff[len] = NUL;
+	}
+	else
+	{
+	    alloc_cmdbuff((int)STRLEN(p));
+	    if (ccline.cmdbuff == NULL)
+	    {
+		res = GOTO_NORMAL_MODE;
+		goto done;
+	    }
+	    STRCPY(ccline.cmdbuff, p);
+	}
+
+	ccline.cmdpos = ccline.cmdlen = (int)STRLEN(ccline.cmdbuff);
+	redrawcmd();
+	res = CMDLINE_CHANGED;
+	goto done;
+    }
+    beep_flush();
+    res = CMDLINE_NOT_CHANGED;
+
+done:
+    *curcmdstr = lookfor;
+    *hiscnt_p = hiscnt;
+    return res;
+}
+
+/*
+ * Initialize the current command-line info.
+ */
+    static int
+init_ccline(int firstc, int indent)
+{
+    ccline.overstrike = FALSE;		    // always start in insert mode
+
+    /*
+     * set some variables for redrawcmd()
+     */
+    ccline.cmdfirstc = (firstc == '@' ? 0 : firstc);
+    ccline.cmdindent = (firstc > 0 ? indent : 0);
+
+    // alloc initial ccline.cmdbuff
+    alloc_cmdbuff(indent + 50);
+    if (ccline.cmdbuff == NULL)
+	return FAIL;
+    ccline.cmdlen = ccline.cmdpos = 0;
+    ccline.cmdbuff[0] = NUL;
+    sb_text_start_cmdline();
+
+    // autoindent for :insert and :append
+    if (firstc <= 0)
+    {
+	vim_memset(ccline.cmdbuff, ' ', indent);
+	ccline.cmdbuff[indent] = NUL;
+	ccline.cmdpos = indent;
+	ccline.cmdspos = indent;
+	ccline.cmdlen = indent;
+    }
+
+    return OK;
+}
+
+/*
+ * getcmdline() - accept a command line starting with firstc.
+ *
+ * firstc == ':'	    get ":" command line.
+ * firstc == '/' or '?'	    get search pattern
+ * firstc == '='	    get expression
+ * firstc == '@'	    get text for input() function
+ * firstc == '>'	    get text for debug mode
+ * firstc == NUL	    get text for :insert command
+ * firstc == -1		    like NUL, and break on CTRL-C
+ *
+ * The line is collected in ccline.cmdbuff, which is reallocated to fit the
+ * command line.
+ *
+ * Careful: getcmdline() can be called recursively!
+ *
+ * Return pointer to allocated string if there is a commandline, NULL
+ * otherwise.
+ */
+    char_u *
+getcmdline(
+    int		  firstc,
+    long	  count,	// only used for incremental search
+    int		  indent,	// indent for inside conditionals
+    getline_opt_T do_concat UNUSED)
+{
+    return getcmdline_int(firstc, count, indent, TRUE);
+}
+
+    static char_u *
+getcmdline_int(
+    int		firstc,
+    long	count UNUSED,	// only used for incremental search
+    int		indent,		// indent for inside conditionals
+    int		clear_ccline)	// clear ccline first
+{
+    static int	depth = 0;	    // call depth
+    int		c;
+    int		i;
+    int		j;
+    int		gotesc = FALSE;		// TRUE when <ESC> just typed
+    int		do_abbr;		// when TRUE check for abbr.
+    char_u	*lookfor = NULL;	// string to match
+    int		hiscnt;			// current history line in use
+    int		histype;		// history type to be used
+#ifdef FEAT_SEARCH_EXTRA
+    incsearch_state_T	is_state;
+#endif
+    int		did_wild_list = FALSE;	// did wild_list() recently
+    int		wim_index = 0;		// index in wim_flags[]
+    int		res;
+    int		save_msg_scroll = msg_scroll;
+    int		save_State = State;	// remember State when called
+    int		some_key_typed = FALSE;	// one of the keys was typed
+    // mouse drag and release events are ignored, unless they are
+    // preceded with a mouse down event
+    int		ignore_drag_release = TRUE;
+#ifdef FEAT_EVAL
+    int		break_ctrl_c = FALSE;
+#endif
+    expand_T	xpc;
+    long	*b_im_ptr = NULL;
+    buf_T	*b_im_ptr_buf = NULL;	// buffer where b_im_ptr is valid
+    cmdline_info_T save_ccline;
+    int		did_save_ccline = FALSE;
+    int		cmdline_type;
+    int		wild_type;
+
+    // one recursion level deeper
+    ++depth;
+
+    if (ccline.cmdbuff != NULL)
+    {
+	// Being called recursively.  Since ccline is global, we need to save
+	// the current buffer and restore it when returning.
+	save_cmdline(&save_ccline);
+	did_save_ccline = TRUE;
+    }
+    if (clear_ccline)
+	CLEAR_FIELD(ccline);
+
+#ifdef FEAT_EVAL
+    if (firstc == -1)
+    {
+	firstc = NUL;
+	break_ctrl_c = TRUE;
+    }
+#endif
+#ifdef FEAT_RIGHTLEFT
+    // start without Hebrew mapping for a command line
+    if (firstc == ':' || firstc == '=' || firstc == '>')
+	cmd_hkmap = 0;
+#endif
+
+#ifdef FEAT_SEARCH_EXTRA
+    init_incsearch_state(&is_state);
+#endif
+
+    if (init_ccline(firstc, indent) != OK)
+	goto theend;	// out of memory
+
+    if (depth == 50)
+    {
+	// Somehow got into a loop recursively calling getcmdline(), bail out.
+	emsg(_(e_command_too_recursive));
+	goto theend;
+    }
+
+    ExpandInit(&xpc);
+    ccline.xpc = &xpc;
+
+#ifdef FEAT_RIGHTLEFT
+    if (curwin->w_p_rl && *curwin->w_p_rlc == 's'
+					  && (firstc == '/' || firstc == '?'))
+	cmdmsg_rl = TRUE;
+    else
+	cmdmsg_rl = FALSE;
+#endif
+
+    redir_off = TRUE;		// don't redirect the typed command
+    if (!cmd_silent)
+    {
+	i = msg_scrolled;
+	msg_scrolled = 0;		// avoid wait_return() message
+	gotocmdline(TRUE);
+	msg_scrolled += i;
+	redrawcmdprompt();		// draw prompt or indent
+	set_cmdspos();
+    }
+    xpc.xp_context = EXPAND_NOTHING;
+    xpc.xp_backslash = XP_BS_NONE;
+#ifndef BACKSLASH_IN_FILENAME
+    xpc.xp_shell = FALSE;
+#endif
+
+#if defined(FEAT_EVAL)
+    if (ccline.input_fn)
+    {
+	xpc.xp_context = ccline.xp_context;
+	xpc.xp_pattern = ccline.cmdbuff;
+	xpc.xp_arg = ccline.xp_arg;
+    }
+#endif
+
+    /*
+     * Avoid scrolling when called by a recursive do_cmdline(), e.g. when
+     * doing ":@0" when register 0 doesn't contain a CR.
+     */
+    msg_scroll = FALSE;
+
+    State = MODE_CMDLINE;
+
+    if (firstc == '/' || firstc == '?' || firstc == '@')
+    {
+	// Use ":lmap" mappings for search pattern and input().
+	if (curbuf->b_p_imsearch == B_IMODE_USE_INSERT)
+	    b_im_ptr = &curbuf->b_p_iminsert;
+	else
+	    b_im_ptr = &curbuf->b_p_imsearch;
+	b_im_ptr_buf = curbuf;
+	if (*b_im_ptr == B_IMODE_LMAP)
+	    State |= MODE_LANGMAP;
+#ifdef HAVE_INPUT_METHOD
+	im_set_active(*b_im_ptr == B_IMODE_IM);
+#endif
+    }
+#ifdef HAVE_INPUT_METHOD
+    else if (p_imcmdline)
+	im_set_active(TRUE);
+#endif
+
+    setmouse();
+#ifdef CURSOR_SHAPE
+    ui_cursor_shape();		// may show different cursor shape
+#endif
+
+    // When inside an autocommand for writing "exiting" may be set and
+    // terminal mode set to cooked.  Need to set raw mode here then.
+    settmode(TMODE_RAW);
+
+    // Trigger CmdlineEnter autocommands.
+    cmdline_type = firstc == NUL ? '-' : firstc;
+    trigger_cmd_autocmd(cmdline_type, EVENT_CMDLINEENTER);
+#ifdef FEAT_EVAL
+    if (!debug_mode)
+	may_trigger_modechanged();
+#endif
+
+    init_history();
+    hiscnt = get_hislen();	// set hiscnt to impossible history value
+    histype = hist_char2type(firstc);
+
+#ifdef FEAT_DIGRAPHS
+    do_digraph(-1);		// init digraph typeahead
+#endif
+
+    // If something above caused an error, reset the flags, we do want to type
+    // and execute commands. Display may be messed up a bit.
+    if (did_emsg)
+	redrawcmd();
+
+#ifdef FEAT_STL_OPT
+    // Redraw the statusline in case it uses the current mode using the mode()
+    // function.
+    if (!cmd_silent && msg_scrolled == 0)
+    {
+	int	found_one = FALSE;
+	win_T	*wp;
+
+	FOR_ALL_WINDOWS(wp)
+	    if (*p_stl != NUL || *wp->w_p_stl != NUL)
+	    {
+		wp->w_redr_status = TRUE;
+		found_one = TRUE;
+	    }
+
+	if (*p_tal != NUL)
+	{
+	    redraw_tabline = TRUE;
+	    found_one = TRUE;
+	}
+
+	if (found_one)
+	    redraw_statuslines();
+    }
+#endif
+
+    did_emsg = FALSE;
+    got_int = FALSE;
+
+    /*
+     * Collect the command string, handling editing keys.
+     */
+    for (;;)
+    {
+	int trigger_cmdlinechanged = TRUE;
+	int end_wildmenu;
+
+	redir_off = TRUE;	// Don't redirect the typed command.
+				// Repeated, because a ":redir" inside
+				// completion may switch it on.
+#ifdef USE_ON_FLY_SCROLL
+	dont_scroll = FALSE;	// allow scrolling here
+#endif
+	quit_more = FALSE;	// reset after CTRL-D which had a more-prompt
+
+	did_emsg = FALSE;	// There can't really be a reason why an error
+				// that occurs while typing a command should
+				// cause the command not to be executed.
+
+	// Trigger SafeState if nothing is pending.
+	may_trigger_safestate(xpc.xp_numfiles <= 0);
+
+	// Get a character.  Ignore K_IGNORE and K_NOP, they should not do
+	// anything, such as stop completion.
+	do
+	{
+	    cursorcmd();		// set the cursor on the right spot
+	    c = safe_vgetc();
+	} while (c == K_IGNORE || c == K_NOP);
+
+	if (c == K_COMMAND || c == K_SCRIPT_COMMAND)
+	{
+	    int	    clen = ccline.cmdlen;
+	    int	    cc_count = aucmd_cmdline_changed_count;
+
+	    if (do_cmdkey_command(c, DOCMD_NOWAIT) == OK)
+	    {
+		// Do not trigger CmdlineChanged below if:
+		// - the length of the command line didn't change
+		// - the <Cmd> mapping already triggered the event
+		if (clen == ccline.cmdlen
+				    || cc_count != aucmd_cmdline_changed_count)
+		    trigger_cmdlinechanged = FALSE;
+		goto cmdline_changed;
+	    }
+	}
+
+	if (KeyTyped)
+	{
+	    some_key_typed = TRUE;
+#ifdef FEAT_RIGHTLEFT
+	    if (cmd_hkmap)
+		c = hkmap(c);
+	    if (cmdmsg_rl && !KeyStuffed)
+	    {
+		// Invert horizontal movements and operations.  Only when
+		// typed by the user directly, not when the result of a
+		// mapping.
+		switch (c)
+		{
+		    case K_RIGHT:   c = K_LEFT; break;
+		    case K_S_RIGHT: c = K_S_LEFT; break;
+		    case K_C_RIGHT: c = K_C_LEFT; break;
+		    case K_LEFT:    c = K_RIGHT; break;
+		    case K_S_LEFT:  c = K_S_RIGHT; break;
+		    case K_C_LEFT:  c = K_C_RIGHT; break;
+		}
+	    }
+#endif
+	}
+
+	/*
+	 * Ignore got_int when CTRL-C was typed here.
+	 * Don't ignore it in :global, we really need to break then, e.g., for
+	 * ":g/pat/normal /pat" (without the <CR>).
+	 * Don't ignore it for the input() function.
+	 */
+	if ((c == Ctrl_C
+#ifdef UNIX
+		|| c == intr_char
+#endif
+				)
+#if defined(FEAT_EVAL) || defined(FEAT_CRYPT)
+		&& firstc != '@'
+#endif
+#ifdef FEAT_EVAL
+		// do clear got_int in Ex mode to avoid infinite Ctrl-C loop
+		&& (!break_ctrl_c || exmode_active)
+#endif
+		&& !global_busy)
+	    got_int = FALSE;
+
+	// free old command line when finished moving around in the history
+	// list
+	if (lookfor != NULL
+		&& c != K_S_DOWN && c != K_S_UP
+		&& c != K_DOWN && c != K_UP
+		&& c != K_PAGEDOWN && c != K_PAGEUP
+		&& c != K_KPAGEDOWN && c != K_KPAGEUP
+		&& c != K_LEFT && c != K_RIGHT
+		&& (xpc.xp_numfiles > 0 || (c != Ctrl_P && c != Ctrl_N)))
+	    VIM_CLEAR(lookfor);
+
+	/*
+	 * When there are matching completions to select <S-Tab> works like
+	 * CTRL-P (unless 'wc' is <S-Tab>).
+	 */
+	if (c != p_wc && c == K_S_TAB && xpc.xp_numfiles > 0)
+	    c = Ctrl_P;
+
+	if (p_wmnu)
+	    c = wildmenu_translate_key(&ccline, c, &xpc, did_wild_list);
+
+	if (cmdline_pum_active())
+	{
+	    // Ctrl-Y: Accept the current selection and close the popup menu.
+	    // Ctrl-E: cancel the cmdline popup menu and return the original
+	    // text.
+	    if (c == Ctrl_E || c == Ctrl_Y)
+	    {
+		wild_type = (c == Ctrl_E) ? WILD_CANCEL : WILD_APPLY;
+		if (nextwild(&xpc, wild_type, WILD_NO_BEEP,
+							firstc != '@') == FAIL)
+		    break;
+		c = Ctrl_E;
+	    }
+	}
+
+	// The wildmenu is cleared if the pressed key is not used for
+	// navigating the wild menu (i.e. the key is not 'wildchar' or
+	// 'wildcharm' or Ctrl-N or Ctrl-P or Ctrl-A or Ctrl-L).
+	// If the popup menu is displayed, then PageDown and PageUp keys are
+	// also used to navigate the menu.
+	end_wildmenu = (!(c == p_wc && KeyTyped) && c != p_wcm
+		&& c != Ctrl_N && c != Ctrl_P && c != Ctrl_A && c != Ctrl_L);
+	end_wildmenu = end_wildmenu && (!cmdline_pum_active() ||
+			    (c != K_PAGEDOWN && c != K_PAGEUP
+			     && c != K_KPAGEDOWN && c != K_KPAGEUP));
+
+	// free expanded names when finished walking through matches
+	if (end_wildmenu)
+	{
+	    if (cmdline_pum_active())
+		cmdline_pum_remove();
+	    if (xpc.xp_numfiles != -1)
+		(void)ExpandOne(&xpc, NULL, NULL, 0, WILD_FREE);
+	    did_wild_list = FALSE;
+	    if (!p_wmnu || (c != K_UP && c != K_DOWN))
+		xpc.xp_context = EXPAND_NOTHING;
+	    wim_index = 0;
+	    wildmenu_cleanup(&ccline);
+	}
+
+	if (p_wmnu)
+	    c = wildmenu_process_key(&ccline, c, &xpc);
+
+	// CTRL-\ CTRL-N goes to Normal mode, CTRL-\ CTRL-G goes to Insert
+	// mode when 'insertmode' is set, CTRL-\ e prompts for an expression.
+	if (c == Ctrl_BSL)
+	{
+	    res = cmdline_handle_ctrl_bsl(c, &gotesc);
+	    if (res == CMDLINE_CHANGED)
+		goto cmdline_changed;
+	    else if (res == CMDLINE_NOT_CHANGED)
+		goto cmdline_not_changed;
+	    else if (res == GOTO_NORMAL_MODE)
+		goto returncmd;		// back to cmd mode
+	    c = Ctrl_BSL;		// backslash key not processed by
+					// cmdline_handle_ctrl_bsl()
+	}
+
+	if (c == cedit_key || c == K_CMDWIN)
+	{
+	    // TODO: why is ex_normal_busy checked here?
+	    if ((c == K_CMDWIN || ex_normal_busy == 0) && got_int == FALSE)
+	    {
+		/*
+		 * Open a window to edit the command line (and history).
+		 */
+		c = open_cmdwin();
+		some_key_typed = TRUE;
+	    }
+	}
+#ifdef FEAT_DIGRAPHS
+	else
+	    c = do_digraph(c);
+#endif
+
+	if (c == '\n' || c == '\r' || c == K_KENTER || (c == ESC
+			&& (!KeyTyped || vim_strchr(p_cpo, CPO_ESC) != NULL)))
+	{
+	    // In Ex mode a backslash escapes a newline.
+	    if (exmode_active
+		    && c != ESC
+		    && ccline.cmdpos == ccline.cmdlen
+		    && ccline.cmdpos > 0
+		    && ccline.cmdbuff[ccline.cmdpos - 1] == '\\')
+	    {
+		if (c == K_KENTER)
+		    c = '\n';
+	    }
+	    else
+	    {
+		gotesc = FALSE;	// Might have typed ESC previously, don't
+				// truncate the cmdline now.
+		if (ccheck_abbr(c + ABBR_OFF))
+		    goto cmdline_changed;
+		if (!cmd_silent)
+		{
+		    windgoto(msg_row, 0);
+		    out_flush();
+		}
+		break;
+	    }
+	}
+
+	// Completion for 'wildchar' or 'wildcharm' key.
+	if ((c == p_wc && !gotesc && KeyTyped) || c == p_wcm)
+	{
+	    res = cmdline_wildchar_complete(c, firstc != '@', &did_wild_list,
+		    &wim_index, &xpc, &gotesc);
+	    if (res == CMDLINE_CHANGED)
+		goto cmdline_changed;
+	}
+
+	gotesc = FALSE;
+
+	// <S-Tab> goes to last match, in a clumsy way
+	if (c == K_S_TAB && KeyTyped)
+	{
+	    if (nextwild(&xpc, WILD_EXPAND_KEEP, 0, firstc != '@') == OK)
+	    {
+		if (xpc.xp_numfiles > 1
+		    && ((!did_wild_list && (wim_flags[wim_index] & WIM_LIST))
+			    || p_wmnu))
+		{
+		    // Trigger the popup menu when wildoptions=pum
+		    showmatches(&xpc, p_wmnu
+			    && ((wim_flags[wim_index] & WIM_LIST) == 0));
+		}
+		if (nextwild(&xpc, WILD_PREV, 0, firstc != '@') == OK
+			&& nextwild(&xpc, WILD_PREV, 0, firstc != '@') == OK)
+		    goto cmdline_changed;
+	    }
+	}
+
+	if (c == NUL || c == K_ZERO)	    // NUL is stored as NL
+	    c = NL;
+
+	do_abbr = TRUE;		// default: check for abbreviation
+
+	/*
+	 * Big switch for a typed command line character.
+	 */
+	switch (c)
+	{
+	case K_BS:
+	case Ctrl_H:
+	case K_DEL:
+	case K_KDEL:
+	case Ctrl_W:
+	    res = cmdline_erase_chars(c, indent
+#ifdef FEAT_SEARCH_EXTRA
+		    , &is_state
+#endif
+		    );
+	    if (res == CMDLINE_NOT_CHANGED)
+		goto cmdline_not_changed;
+	    else if (res == GOTO_NORMAL_MODE)
+		goto returncmd;		// back to cmd mode
+	    goto cmdline_changed;
+
+	case K_INS:
+	case K_KINS:
+		ccline.overstrike = !ccline.overstrike;
+#ifdef CURSOR_SHAPE
+		ui_cursor_shape();	// may show different cursor shape
+#endif
+		goto cmdline_not_changed;
+
+	case Ctrl_HAT:
+		cmdline_toggle_langmap(
+				    buf_valid(b_im_ptr_buf) ? b_im_ptr : NULL);
+		goto cmdline_not_changed;
+
+//	case '@':   only in very old vi
+	case Ctrl_U:
+		// delete all characters left of the cursor
+		j = ccline.cmdpos;
+		ccline.cmdlen -= j;
+		i = ccline.cmdpos = 0;
+		while (i < ccline.cmdlen)
+		    ccline.cmdbuff[i++] = ccline.cmdbuff[j++];
+		// Truncate at the end, required for multi-byte chars.
+		ccline.cmdbuff[ccline.cmdlen] = NUL;
+#ifdef FEAT_SEARCH_EXTRA
+		if (ccline.cmdlen == 0)
+		    is_state.search_start = is_state.save_cursor;
+#endif
+		redrawcmd();
+		goto cmdline_changed;
+
+#ifdef FEAT_CLIPBOARD
+	case Ctrl_Y:
+		// Copy the modeless selection, if there is one.
+		if (clip_star.state != SELECT_CLEARED)
+		{
+		    if (clip_star.state == SELECT_DONE)
+			clip_copy_modeless_selection(TRUE);
+		    goto cmdline_not_changed;
+		}
+		break;
+#endif
+
+	case ESC:	// get here if p_wc != ESC or when ESC typed twice
+	case Ctrl_C:
+		// In exmode it doesn't make sense to return.  Except when
+		// ":normal" runs out of characters.
+		if (exmode_active
+			       && (ex_normal_busy == 0 || typebuf.tb_len > 0))
+		    goto cmdline_not_changed;
+
+		gotesc = TRUE;		// will free ccline.cmdbuff after
+					// putting it in history
+		goto returncmd;		// back to cmd mode
+
+	case Ctrl_R:			// insert register
+		res = cmdline_insert_reg(&gotesc);
+		if (res == GOTO_NORMAL_MODE)
+		    goto returncmd;
+		if (res == CMDLINE_CHANGED)
+		    goto cmdline_changed;
+		goto cmdline_not_changed;
+
+	case Ctrl_D:
+		if (showmatches(&xpc, FALSE) == EXPAND_NOTHING)
+		    break;	// Use ^D as normal char instead
+
+		redrawcmd();
+		continue;	// don't do incremental search now
+
+	case K_RIGHT:
+	case K_S_RIGHT:
+	case K_C_RIGHT:
+		do
+		{
+		    if (ccline.cmdpos >= ccline.cmdlen)
+			break;
+		    i = cmdline_charsize(ccline.cmdpos);
+		    if (KeyTyped && ccline.cmdspos + i >= Columns * Rows)
+			break;
+		    ccline.cmdspos += i;
+		    if (has_mbyte)
+			ccline.cmdpos += (*mb_ptr2len)(ccline.cmdbuff
+							     + ccline.cmdpos);
+		    else
+			++ccline.cmdpos;
+		}
+		while ((c == K_S_RIGHT || c == K_C_RIGHT
+			       || (mod_mask & (MOD_MASK_SHIFT|MOD_MASK_CTRL)))
+			&& ccline.cmdbuff[ccline.cmdpos] != ' ');
+		if (has_mbyte)
+		    set_cmdspos_cursor();
+		goto cmdline_not_changed;
+
+	case K_LEFT:
+	case K_S_LEFT:
+	case K_C_LEFT:
+		if (ccline.cmdpos == 0)
+		    goto cmdline_not_changed;
+		do
+		{
+		    --ccline.cmdpos;
+		    if (has_mbyte)	// move to first byte of char
+			ccline.cmdpos -= (*mb_head_off)(ccline.cmdbuff,
+					      ccline.cmdbuff + ccline.cmdpos);
+		    ccline.cmdspos -= cmdline_charsize(ccline.cmdpos);
+		}
+		while (ccline.cmdpos > 0
+			&& (c == K_S_LEFT || c == K_C_LEFT
+			       || (mod_mask & (MOD_MASK_SHIFT|MOD_MASK_CTRL)))
+			&& ccline.cmdbuff[ccline.cmdpos - 1] != ' ');
+		if (has_mbyte)
+		    set_cmdspos_cursor();
+		goto cmdline_not_changed;
+
+	case K_IGNORE:
+		// Ignore mouse event or open_cmdwin() result.
+		goto cmdline_not_changed;
+
+#ifdef FEAT_GUI_MSWIN
+	    // On MS-Windows ignore <M-F4>, we get it when closing the window
+	    // was cancelled.
+	case K_F4:
+	    if (mod_mask == MOD_MASK_ALT)
+	    {
+		redrawcmd();	    // somehow the cmdline is cleared
+		goto cmdline_not_changed;
+	    }
+	    break;
+#endif
+
+	case K_MIDDLEDRAG:
+	case K_MIDDLERELEASE:
+		goto cmdline_not_changed;	// Ignore mouse
+
+	case K_MIDDLEMOUSE:
+# ifdef FEAT_GUI
+		// When GUI is active, also paste when 'mouse' is empty
+		if (!gui.in_use)
+# endif
+		    if (!mouse_has(MOUSE_COMMAND))
+			goto cmdline_not_changed;   // Ignore mouse
+# ifdef FEAT_CLIPBOARD
+		if (clip_star.available)
+		    cmdline_paste('*', TRUE, TRUE);
+		else
+# endif
+		    cmdline_paste(0, TRUE, TRUE);
+		redrawcmd();
+		goto cmdline_changed;
+
+# ifdef FEAT_DND
+	case K_DROP:
+		cmdline_paste('~', TRUE, FALSE);
+		redrawcmd();
+		goto cmdline_changed;
+# endif
+
+	case K_LEFTDRAG:
+	case K_LEFTRELEASE:
+	case K_RIGHTDRAG:
+	case K_RIGHTRELEASE:
+		// Ignore drag and release events when the button-down wasn't
+		// seen before.
+		if (ignore_drag_release)
+		    goto cmdline_not_changed;
+		// FALLTHROUGH
+	case K_LEFTMOUSE:
+	case K_RIGHTMOUSE:
+		cmdline_left_right_mouse(c, &ignore_drag_release);
+		goto cmdline_not_changed;
+
+	// Mouse scroll wheel: ignored here
+	case K_MOUSEDOWN:
+	case K_MOUSEUP:
+	case K_MOUSELEFT:
+	case K_MOUSERIGHT:
+	// Alternate buttons ignored here
+	case K_X1MOUSE:
+	case K_X1DRAG:
+	case K_X1RELEASE:
+	case K_X2MOUSE:
+	case K_X2DRAG:
+	case K_X2RELEASE:
+	case K_MOUSEMOVE:
+		goto cmdline_not_changed;
+
+#ifdef FEAT_GUI
+	case K_LEFTMOUSE_NM:	// mousefocus click, ignored
+	case K_LEFTRELEASE_NM:
+		goto cmdline_not_changed;
+
+	case K_VER_SCROLLBAR:
+		if (msg_scrolled == 0)
+		{
+		    gui_do_scroll();
+		    redrawcmd();
+		}
+		goto cmdline_not_changed;
+
+	case K_HOR_SCROLLBAR:
+		if (msg_scrolled == 0)
+		{
+		    do_mousescroll_horiz(scrollbar_value);
+		    redrawcmd();
+		}
+		goto cmdline_not_changed;
+#endif
+#ifdef FEAT_GUI_TABLINE
+	case K_TABLINE:
+	case K_TABMENU:
+		// Don't want to change any tabs here.  Make sure the same tab
+		// is still selected.
+		if (gui_use_tabline())
+		    gui_mch_set_curtab(tabpage_index(curtab));
+		goto cmdline_not_changed;
+#endif
+
+	case K_SELECT:	    // end of Select mode mapping - ignore
+		goto cmdline_not_changed;
+
+	case Ctrl_B:	    // begin of command line
+	case K_HOME:
+	case K_KHOME:
+	case K_S_HOME:
+	case K_C_HOME:
+		ccline.cmdpos = 0;
+		set_cmdspos();
+		goto cmdline_not_changed;
+
+	case Ctrl_E:	    // end of command line
+	case K_END:
+	case K_KEND:
+	case K_S_END:
+	case K_C_END:
+		ccline.cmdpos = ccline.cmdlen;
+		set_cmdspos_cursor();
+		goto cmdline_not_changed;
+
+	case Ctrl_A:	    // all matches
+		if (cmdline_pum_active())
+		    // As Ctrl-A completes all the matches, close the popup
+		    // menu (if present)
+		    cmdline_pum_cleanup(&ccline);
+
+		if (nextwild(&xpc, WILD_ALL, 0, firstc != '@') == FAIL)
+		    break;
+		xpc.xp_context = EXPAND_NOTHING;
+		did_wild_list = FALSE;
+		goto cmdline_changed;
+
+	case Ctrl_L:
+#ifdef FEAT_SEARCH_EXTRA
+		if (may_add_char_to_search(firstc, &c, &is_state) == OK)
+		    goto cmdline_not_changed;
+#endif
+
+		// completion: longest common part
+		if (nextwild(&xpc, WILD_LONGEST, 0, firstc != '@') == FAIL)
+		    break;
+		goto cmdline_changed;
+
+	case Ctrl_N:	    // next match
+	case Ctrl_P:	    // previous match
+		if (xpc.xp_numfiles > 0)
+		{
+		    wild_type = (c == Ctrl_P) ? WILD_PREV : WILD_NEXT;
+		    if (nextwild(&xpc, wild_type, 0, firstc != '@') == FAIL)
+			break;
+		    goto cmdline_changed;
+		}
+		// FALLTHROUGH
+	case K_UP:
+	case K_DOWN:
+	case K_S_UP:
+	case K_S_DOWN:
+	case K_PAGEUP:
+	case K_KPAGEUP:
+	case K_PAGEDOWN:
+	case K_KPAGEDOWN:
+		if (cmdline_pum_active()
+			&& (c == K_PAGEUP || c == K_PAGEDOWN ||
+			    c == K_KPAGEUP || c == K_KPAGEDOWN))
+		{
+		    // If the popup menu is displayed, then PageUp and PageDown
+		    // are used to scroll the menu.
+		    wild_type = WILD_PAGEUP;
+		    if (c == K_PAGEDOWN || c == K_KPAGEDOWN)
+			wild_type = WILD_PAGEDOWN;
+		    if (nextwild(&xpc, wild_type, 0, firstc != '@') == FAIL)
+			break;
+		    goto cmdline_changed;
+		}
+		else
+		{
+		    res = cmdline_browse_history(c, firstc, &lookfor, histype,
+			    &hiscnt, &xpc);
+		    if (res == CMDLINE_CHANGED)
+			goto cmdline_changed;
+		    else if (res == GOTO_NORMAL_MODE)
+			goto returncmd;
+		}
+		goto cmdline_not_changed;
+
+#ifdef FEAT_SEARCH_EXTRA
+	case Ctrl_G:	    // next match
+	case Ctrl_T:	    // previous match
+		if (may_adjust_incsearch_highlighting(
+					  firstc, count, &is_state, c) == FAIL)
+		    goto cmdline_not_changed;
+		break;
+#endif
+
+	case Ctrl_V:
+	case Ctrl_Q:
+		{
+		    ignore_drag_release = TRUE;
+		    putcmdline('^', TRUE);
+
+		    // Get next (two) character(s).  Do not change any
+		    // modifyOtherKeys ESC sequence to a normal key for
+		    // CTRL-SHIFT-V.
+		    c = get_literal(mod_mask & MOD_MASK_SHIFT);
+
+		    do_abbr = FALSE;	    // don't do abbreviation now
+		    extra_char = NUL;
+		    // may need to remove ^ when composing char was typed
+		    if (enc_utf8 && utf_iscomposing(c) && !cmd_silent)
+		    {
+			draw_cmdline(ccline.cmdpos,
+						ccline.cmdlen - ccline.cmdpos);
+			msg_putchar(' ');
+			cursorcmd();
+		    }
+		}
+
+		break;
+
+#ifdef FEAT_DIGRAPHS
+	case Ctrl_K:
+		ignore_drag_release = TRUE;
+		putcmdline('?', TRUE);
+# ifdef USE_ON_FLY_SCROLL
+		dont_scroll = TRUE;	    // disallow scrolling here
+# endif
+		c = get_digraph(TRUE);
+		extra_char = NUL;
+		if (c != NUL)
+		    break;
+
+		redrawcmd();
+		goto cmdline_not_changed;
+#endif // FEAT_DIGRAPHS
+
+#ifdef FEAT_RIGHTLEFT
+	case Ctrl__:	    // CTRL-_: switch language mode
+		if (!p_ari)
+		    break;
+		cmd_hkmap = !cmd_hkmap;
+		goto cmdline_not_changed;
+#endif
+
+	case K_PS:
+		bracketed_paste(PASTE_CMDLINE, FALSE, NULL);
+		goto cmdline_changed;
+
+	default:
+#ifdef UNIX
+		if (c == intr_char)
+		{
+		    gotesc = TRUE;	// will free ccline.cmdbuff after
+					// putting it in history
+		    goto returncmd;	// back to Normal mode
+		}
+#endif
+		/*
+		 * Normal character with no special meaning.  Just set mod_mask
+		 * to 0x0 so that typing Shift-Space in the GUI doesn't enter
+		 * the string <S-Space>.  This should only happen after ^V.
+		 */
+		if (!IS_SPECIAL(c))
+		    mod_mask = 0x0;
+		break;
+	}
+	/*
+	 * End of switch on command line character.
+	 * We come here if we have a normal character.
+	 */
+
+	if (do_abbr && (IS_SPECIAL(c) || !vim_iswordc(c))
+		&& (ccheck_abbr(
+			// Add ABBR_OFF for characters above 0x100, this is
+			// what check_abbr() expects.
+				(has_mbyte && c >= 0x100) ? (c + ABBR_OFF) : c)
+		    || c == Ctrl_RSB))
+	    goto cmdline_changed;
+
+	/*
+	 * put the character in the command line
+	 */
+	if (IS_SPECIAL(c) || mod_mask != 0)
+	    put_on_cmdline(get_special_key_name(c, mod_mask), -1, TRUE);
+	else
+	{
+	    if (has_mbyte)
+	    {
+		j = (*mb_char2bytes)(c, IObuff);
+		IObuff[j] = NUL;	// exclude composing chars
+		put_on_cmdline(IObuff, j, TRUE);
+	    }
+	    else
+	    {
+		IObuff[0] = c;
+		put_on_cmdline(IObuff, 1, TRUE);
+	    }
+	}
+	goto cmdline_changed;
+
+/*
+ * This part implements incremental searches for "/" and "?"
+ * Jump to cmdline_not_changed when a character has been read but the command
+ * line did not change. Then we only search and redraw if something changed in
+ * the past.
+ * Jump to cmdline_changed when the command line did change.
+ * (Sorry for the goto's, I know it is ugly).
+ */
+cmdline_not_changed:
+#ifdef FEAT_SEARCH_EXTRA
+	if (!is_state.incsearch_postponed)
+	    continue;
+#endif
+
+cmdline_changed:
+#ifdef FEAT_SEARCH_EXTRA
+	// If the window changed incremental search state is not valid.
+	if (is_state.winid != curwin->w_id)
+	    init_incsearch_state(&is_state);
+#endif
+	if (trigger_cmdlinechanged)
+	    // Trigger CmdlineChanged autocommands.
+	    trigger_cmd_autocmd(cmdline_type, EVENT_CMDLINECHANGED);
+
+#ifdef FEAT_SEARCH_EXTRA
+	if (xpc.xp_context == EXPAND_NOTHING && (KeyTyped || vpeekc() == NUL))
+	    may_do_incsearch_highlighting(firstc, count, &is_state);
+#endif
+
+#ifdef FEAT_RIGHTLEFT
+	if (cmdmsg_rl
+# ifdef FEAT_ARABIC
+		|| (p_arshape && !p_tbidi
+				       && cmdline_has_arabic(0, ccline.cmdlen))
+# endif
+		)
+	    // Always redraw the whole command line to fix shaping and
+	    // right-left typing.  Not efficient, but it works.
+	    // Do it only when there are no characters left to read
+	    // to avoid useless intermediate redraws.
+	    if (vpeekc() == NUL)
+		redrawcmd();
+#endif
+    }
+
+returncmd:
+
+#ifdef FEAT_RIGHTLEFT
+    cmdmsg_rl = FALSE;
+#endif
+
+    ExpandCleanup(&xpc);
+    ccline.xpc = NULL;
+
+#ifdef FEAT_SEARCH_EXTRA
+    finish_incsearch_highlighting(gotesc, &is_state, FALSE);
+#endif
+
+    if (ccline.cmdbuff != NULL)
+    {
+	/*
+	 * Put line in history buffer (":" and "=" only when it was typed).
+	 */
+	if (ccline.cmdlen && firstc != NUL
+		&& (some_key_typed || histype == HIST_SEARCH))
+	{
+	    add_to_history(histype, ccline.cmdbuff, TRUE,
+				       histype == HIST_SEARCH ? firstc : NUL);
+	    if (firstc == ':')
+	    {
+		vim_free(new_last_cmdline);
+		new_last_cmdline = vim_strsave(ccline.cmdbuff);
+	    }
+	}
+
+	if (gotesc)
+	    abandon_cmdline();
+    }
+
+    /*
+     * If the screen was shifted up, redraw the whole screen (later).
+     * If the line is too long, clear it, so ruler and shown command do
+     * not get printed in the middle of it.
+     */
+    msg_check();
+    msg_scroll = save_msg_scroll;
+    redir_off = FALSE;
+
+    // When the command line was typed, no need for a wait-return prompt.
+    if (some_key_typed)
+	need_wait_return = FALSE;
+
+    // Trigger CmdlineLeave autocommands.
+    trigger_cmd_autocmd(cmdline_type, EVENT_CMDLINELEAVE);
+
+    State = save_State;
+
+#ifdef FEAT_EVAL
+    if (!debug_mode)
+	may_trigger_modechanged();
+#endif
+
+#ifdef HAVE_INPUT_METHOD
+    if (b_im_ptr != NULL && buf_valid(b_im_ptr_buf)
+						  && *b_im_ptr != B_IMODE_LMAP)
+	im_save_status(b_im_ptr);
+    im_set_active(FALSE);
+#endif
+    setmouse();
+#ifdef CURSOR_SHAPE
+    ui_cursor_shape();		// may show different cursor shape
+#endif
+    sb_text_end_cmdline();
+
+theend:
+    {
+	char_u *p = ccline.cmdbuff;
+
+	--depth;
+	if (did_save_ccline)
+	    restore_cmdline(&save_ccline);
+	else
+	    ccline.cmdbuff = NULL;
+	return p;
+    }
+}
+
+#if (defined(FEAT_CRYPT) || defined(FEAT_EVAL)) || defined(PROTO)
+/*
+ * Get a command line with a prompt.
+ * This is prepared to be called recursively from getcmdline() (e.g. by
+ * f_input() when evaluating an expression from CTRL-R =).
+ * Returns the command line in allocated memory, or NULL.
+ */
+    char_u *
+getcmdline_prompt(
+    int		firstc,
+    char_u	*prompt,	// command line prompt
+    int		attr,		// attributes for prompt
+    int		xp_context,	// type of expansion
+    char_u	*xp_arg)	// user-defined expansion argument
+{
+    char_u		*s;
+    cmdline_info_T	save_ccline;
+    int			did_save_ccline = FALSE;
+    int			msg_col_save = msg_col;
+    int			msg_silent_save = msg_silent;
+
+    if (ccline.cmdbuff != NULL)
+    {
+	// Save the values of the current cmdline and restore them below.
+	save_cmdline(&save_ccline);
+	did_save_ccline = TRUE;
+    }
+
+    CLEAR_FIELD(ccline);
+    ccline.cmdprompt = prompt;
+    ccline.cmdattr = attr;
+# ifdef FEAT_EVAL
+    ccline.xp_context = xp_context;
+    ccline.xp_arg = xp_arg;
+    ccline.input_fn = (firstc == '@');
+# endif
+    msg_silent = 0;
+    s = getcmdline_int(firstc, 1L, 0, FALSE);
+
+    if (did_save_ccline)
+	restore_cmdline(&save_ccline);
+
+    msg_silent = msg_silent_save;
+    // Restore msg_col, the prompt from input() may have changed it.
+    // But only if called recursively and the commandline is therefore being
+    // restored to an old one; if not, the input() prompt stays on the screen,
+    // so we need its modified msg_col left intact.
+    if (ccline.cmdbuff != NULL)
+	msg_col = msg_col_save;
+
+    return s;
+}
+#endif
+
+/*
+ * Read the 'wildmode' option, fill wim_flags[].
+ */
+    int
+check_opt_wim(void)
+{
+    char_u	new_wim_flags[4];
+    char_u	*p;
+    int		i;
+    int		idx = 0;
+
+    for (i = 0; i < 4; ++i)
+	new_wim_flags[i] = 0;
+
+    for (p = p_wim; *p; ++p)
+    {
+	for (i = 0; ASCII_ISALPHA(p[i]); ++i)
+	    ;
+	if (p[i] != NUL && p[i] != ',' && p[i] != ':')
+	    return FAIL;
+	if (i == 7 && STRNCMP(p, "longest", 7) == 0)
+	    new_wim_flags[idx] |= WIM_LONGEST;
+	else if (i == 4 && STRNCMP(p, "full", 4) == 0)
+	    new_wim_flags[idx] |= WIM_FULL;
+	else if (i == 4 && STRNCMP(p, "list", 4) == 0)
+	    new_wim_flags[idx] |= WIM_LIST;
+	else if (i == 8 && STRNCMP(p, "lastused", 8) == 0)
+	    new_wim_flags[idx] |= WIM_BUFLASTUSED;
+	else
+	    return FAIL;
+	p += i;
+	if (*p == NUL)
+	    break;
+	if (*p == ',')
+	{
+	    if (idx == 3)
+		return FAIL;
+	    ++idx;
+	}
+    }
+
+    // fill remaining entries with last flag
+    while (idx < 3)
+    {
+	new_wim_flags[idx + 1] = new_wim_flags[idx];
+	++idx;
+    }
+
+    // only when there are no errors, wim_flags[] is changed
+    for (i = 0; i < 4; ++i)
+	wim_flags[i] = new_wim_flags[i];
+    return OK;
+}
+
+/*
+ * Return TRUE when the text must not be changed and we can't switch to
+ * another window or buffer.  TRUE when editing the command line, evaluating
+ * 'balloonexpr', etc.
+ */
+    int
+text_locked(void)
+{
+    if (cmdwin_type != 0)
+	return TRUE;
+    return textlock != 0;
+}
+
+/*
+ * Give an error message for a command that isn't allowed while the cmdline
+ * window is open or editing the cmdline in another way.
+ */
+    void
+text_locked_msg(void)
+{
+    emsg(_(get_text_locked_msg()));
+}
+
+    char *
+get_text_locked_msg(void)
+{
+    if (cmdwin_type != 0)
+	return e_invalid_in_cmdline_window;
+    return e_not_allowed_to_change_text_or_change_window;
+}
+
+/*
+ * Check for text, window or buffer locked.
+ * Give an error message and return TRUE if something is locked.
+ */
+    int
+text_or_buf_locked(void)
+{
+    if (text_locked())
+    {
+	text_locked_msg();
+	return TRUE;
+    }
+    return curbuf_locked();
+}
+
+/*
+ * Check if "curbuf_lock" or "allbuf_lock" is set and return TRUE when it is
+ * and give an error message.
+ */
+    int
+curbuf_locked(void)
+{
+    if (curbuf_lock > 0)
+    {
+	emsg(_(e_not_allowed_to_edit_another_buffer_now));
+	return TRUE;
+    }
+    return allbuf_locked();
+}
+
+/*
+ * Check if "allbuf_lock" is set and return TRUE when it is and give an error
+ * message.
+ */
+    int
+allbuf_locked(void)
+{
+    if (allbuf_lock > 0)
+    {
+	emsg(_(e_not_allowed_to_change_buffer_information_now));
+	return TRUE;
+    }
+    return FALSE;
+}
+
+    static int
+cmdline_charsize(int idx)
+{
+#if defined(FEAT_CRYPT) || defined(FEAT_EVAL)
+    if (cmdline_star > 0)	    // showing '*', always 1 position
+	return 1;
+#endif
+    return ptr2cells(ccline.cmdbuff + idx);
+}
+
+/*
+ * Compute the offset of the cursor on the command line for the prompt and
+ * indent.
+ */
+    static void
+set_cmdspos(void)
+{
+    if (ccline.cmdfirstc != NUL)
+	ccline.cmdspos = 1 + ccline.cmdindent;
+    else
+	ccline.cmdspos = 0 + ccline.cmdindent;
+}
+
+/*
+ * Compute the screen position for the cursor on the command line.
+ */
+    static void
+set_cmdspos_cursor(void)
+{
+    int		i, m, c;
+
+    set_cmdspos();
+    if (KeyTyped)
+    {
+	m = Columns * Rows;
+	if (m < 0)	// overflow, Columns or Rows at weird value
+	    m = MAXCOL;
+    }
+    else
+	m = MAXCOL;
+    for (i = 0; i < ccline.cmdlen && i < ccline.cmdpos; ++i)
+    {
+	c = cmdline_charsize(i);
+	// Count ">" for double-wide multi-byte char that doesn't fit.
+	if (has_mbyte)
+	    correct_cmdspos(i, c);
+	// If the cmdline doesn't fit, show cursor on last visible char.
+	// Don't move the cursor itself, so we can still append.
+	if ((ccline.cmdspos += c) >= m)
+	{
+	    ccline.cmdspos -= c;
+	    break;
+	}
+	if (has_mbyte)
+	    i += (*mb_ptr2len)(ccline.cmdbuff + i) - 1;
+    }
+}
+
+/*
+ * Check if the character at "idx", which is "cells" wide, is a multi-byte
+ * character that doesn't fit, so that a ">" must be displayed.
+ */
+    static void
+correct_cmdspos(int idx, int cells)
+{
+    if ((*mb_ptr2len)(ccline.cmdbuff + idx) > 1
+		&& (*mb_ptr2cells)(ccline.cmdbuff + idx) > 1
+		&& ccline.cmdspos % Columns + cells > Columns)
+	ccline.cmdspos++;
+}
+
+/*
+ * Get an Ex command line for the ":" command.
+ */
+    char_u *
+getexline(
+    int		c,		// normally ':', NUL for ":append"
+    void	*cookie UNUSED,
+    int		indent,		// indent for inside conditionals
+    getline_opt_T options)
+{
+    // When executing a register, remove ':' that's in front of each line.
+    if (exec_from_reg && vpeekc() == ':')
+	(void)vgetc();
+    return getcmdline(c, 1L, indent, options);
+}
+
+/*
+ * Get an Ex command line for Ex mode.
+ * In Ex mode we only use the OS supplied line editing features and no
+ * mappings or abbreviations.
+ * Returns a string in allocated memory or NULL.
+ */
+    char_u *
+getexmodeline(
+    int		promptc,	// normally ':', NUL for ":append" and '?' for
+				// :s prompt
+    void	*cookie UNUSED,
+    int		indent,		// indent for inside conditionals
+    getline_opt_T options UNUSED)
+{
+    garray_T	line_ga;
+    char_u	*pend;
+    int		startcol = 0;
+    int		c1 = 0;
+    int		escaped = FALSE;	// CTRL-V typed
+    int		vcol = 0;
+    char_u	*p;
+    int		prev_char;
+    int		len;
+
+    // Switch cursor on now.  This avoids that it happens after the "\n", which
+    // confuses the system function that computes tabstops.
+    cursor_on();
+
+    // always start in column 0; write a newline if necessary
+    compute_cmdrow();
+    if ((msg_col || msg_didout) && promptc != '?')
+	msg_putchar('\n');
+    if (promptc == ':')
+    {
+	// indent that is only displayed, not in the line itself
+	if (p_prompt)
+	    msg_putchar(':');
+	while (indent-- > 0)
+	    msg_putchar(' ');
+	startcol = msg_col;
+    }
+
+    ga_init2(&line_ga, 1, 30);
+
+    // autoindent for :insert and :append is in the line itself
+    if (promptc <= 0)
+    {
+	vcol = indent;
+	while (indent >= 8)
+	{
+	    ga_append(&line_ga, TAB);
+	    msg_puts("        ");
+	    indent -= 8;
+	}
+	while (indent-- > 0)
+	{
+	    ga_append(&line_ga, ' ');
+	    msg_putchar(' ');
+	}
+    }
+    ++no_mapping;
+    ++allow_keys;
+
+    /*
+     * Get the line, one character at a time.
+     */
+    got_int = FALSE;
+    while (!got_int)
+    {
+	long    sw;
+	char_u *s;
+
+	// May request the keyboard protocol state now.
+	may_send_t_RK();
+
+	if (ga_grow(&line_ga, 40) == FAIL)
+	    break;
+
+	/*
+	 * Get one character at a time.
+	 */
+	prev_char = c1;
+
+	// Check for a ":normal" command and no more characters left.
+	if (ex_normal_busy > 0 && typebuf.tb_len == 0)
+	    c1 = '\n';
+	else
+	    c1 = vgetc();
+
+	/*
+	 * Handle line editing.
+	 * Previously this was left to the system, putting the terminal in
+	 * cooked mode, but then CTRL-D and CTRL-T can't be used properly.
+	 */
+	if (got_int)
+	{
+	    msg_putchar('\n');
+	    break;
+	}
+
+	if (c1 == K_PS)
+	{
+	    bracketed_paste(PASTE_EX, FALSE, &line_ga);
+	    goto redraw;
+	}
+
+	if (!escaped)
+	{
+	    // CR typed means "enter", which is NL
+	    if (c1 == '\r')
+		c1 = '\n';
+
+	    if (c1 == BS || c1 == K_BS
+			  || c1 == DEL || c1 == K_DEL || c1 == K_KDEL)
+	    {
+		if (line_ga.ga_len > 0)
+		{
+		    if (has_mbyte)
+		    {
+			p = (char_u *)line_ga.ga_data;
+			p[line_ga.ga_len] = NUL;
+			len = (*mb_head_off)(p, p + line_ga.ga_len - 1) + 1;
+			line_ga.ga_len -= len;
+		    }
+		    else
+			--line_ga.ga_len;
+		    goto redraw;
+		}
+		continue;
+	    }
+
+	    if (c1 == Ctrl_U)
+	    {
+		msg_col = startcol;
+		msg_clr_eos();
+		line_ga.ga_len = 0;
+		goto redraw;
+	    }
+
+	    if (c1 == Ctrl_T)
+	    {
+		sw = get_sw_value(curbuf);
+		p = (char_u *)line_ga.ga_data;
+		p[line_ga.ga_len] = NUL;
+		indent = get_indent_str(p, 8, FALSE);
+		indent += sw - indent % sw;
+add_indent:
+		while (get_indent_str(p, 8, FALSE) < indent)
+		{
+		    (void)ga_grow(&line_ga, 2);  // one more for the NUL
+		    p = (char_u *)line_ga.ga_data;
+		    s = skipwhite(p);
+		    mch_memmove(s + 1, s, line_ga.ga_len - (s - p) + 1);
+		    *s = ' ';
+		    ++line_ga.ga_len;
+		}
+redraw:
+		// redraw the line
+		msg_col = startcol;
+		vcol = 0;
+		p = (char_u *)line_ga.ga_data;
+		p[line_ga.ga_len] = NUL;
+		while (p < (char_u *)line_ga.ga_data + line_ga.ga_len)
+		{
+		    if (*p == TAB)
+		    {
+			do
+			    msg_putchar(' ');
+			while (++vcol % 8);
+			++p;
+		    }
+		    else
+		    {
+			len = mb_ptr2len(p);
+			msg_outtrans_len(p, len);
+			vcol += ptr2cells(p);
+			p += len;
+		    }
+		}
+		msg_clr_eos();
+		windgoto(msg_row, msg_col);
+		continue;
+	    }
+
+	    if (c1 == Ctrl_D)
+	    {
+		// Delete one shiftwidth.
+		p = (char_u *)line_ga.ga_data;
+		if (prev_char == '0' || prev_char == '^')
+		{
+		    if (prev_char == '^')
+			ex_keep_indent = TRUE;
+		    indent = 0;
+		    p[--line_ga.ga_len] = NUL;
+		}
+		else
+		{
+		    p[line_ga.ga_len] = NUL;
+		    indent = get_indent_str(p, 8, FALSE);
+		    if (indent > 0)
+		    {
+			--indent;
+			indent -= indent % get_sw_value(curbuf);
+		    }
+		}
+		while (get_indent_str(p, 8, FALSE) > indent)
+		{
+		    s = skipwhite(p);
+		    mch_memmove(s - 1, s, line_ga.ga_len - (s - p) + 1);
+		    --line_ga.ga_len;
+		}
+		goto add_indent;
+	    }
+
+	    if (c1 == Ctrl_V || c1 == Ctrl_Q)
+	    {
+		escaped = TRUE;
+		continue;
+	    }
+
+	    // Ignore special key codes: mouse movement, K_IGNORE, etc.
+	    if (IS_SPECIAL(c1))
+		continue;
+	}
+
+	if (IS_SPECIAL(c1))
+	    c1 = '?';
+	if (has_mbyte)
+	    len = (*mb_char2bytes)(c1,
+				  (char_u *)line_ga.ga_data + line_ga.ga_len);
+	else
+	{
+	    len = 1;
+	    ((char_u *)line_ga.ga_data)[line_ga.ga_len] = c1;
+	}
+	if (c1 == '\n')
+	    msg_putchar('\n');
+	else if (c1 == TAB)
+	{
+	    // Don't use chartabsize(), 'ts' can be different
+	    do
+		msg_putchar(' ');
+	    while (++vcol % 8);
+	}
+	else
+	{
+	    msg_outtrans_len(
+		     ((char_u *)line_ga.ga_data) + line_ga.ga_len, len);
+	    vcol += char2cells(c1);
+	}
+	line_ga.ga_len += len;
+	escaped = FALSE;
+
+	windgoto(msg_row, msg_col);
+	pend = (char_u *)(line_ga.ga_data) + line_ga.ga_len;
+
+	// We are done when a NL is entered, but not when it comes after an
+	// odd number of backslashes, that results in a NUL.
+	if (line_ga.ga_len > 0 && pend[-1] == '\n')
+	{
+	    int bcount = 0;
+
+	    while (line_ga.ga_len - 2 >= bcount && pend[-2 - bcount] == '\\')
+		++bcount;
+
+	    if (bcount > 0)
+	    {
+		// Halve the number of backslashes: "\NL" -> "NUL", "\\NL" ->
+		// "\NL", etc.
+		line_ga.ga_len -= (bcount + 1) / 2;
+		pend -= (bcount + 1) / 2;
+		pend[-1] = '\n';
+	    }
+
+	    if ((bcount & 1) == 0)
+	    {
+		--line_ga.ga_len;
+		--pend;
+		*pend = NUL;
+		break;
+	    }
+	}
+    }
+
+    --no_mapping;
+    --allow_keys;
+
+    // make following messages go to the next line
+    msg_didout = FALSE;
+    msg_col = 0;
+    if (msg_row < Rows - 1)
+	++msg_row;
+    emsg_on_display = FALSE;		// don't want ui_delay()
+
+    if (got_int)
+	ga_clear(&line_ga);
+
+    return (char_u *)line_ga.ga_data;
+}
+
+# if defined(MCH_CURSOR_SHAPE) || defined(FEAT_GUI) \
+	|| defined(FEAT_MOUSESHAPE) || defined(PROTO)
+/*
+ * Return TRUE if ccline.overstrike is on.
+ */
+    int
+cmdline_overstrike(void)
+{
+    return ccline.overstrike;
+}
+
+/*
+ * Return TRUE if the cursor is at the end of the cmdline.
+ */
+    int
+cmdline_at_end(void)
+{
+    return (ccline.cmdpos >= ccline.cmdlen);
+}
+#endif
+
+#if (defined(FEAT_XIM) && (defined(FEAT_GUI_GTK))) || defined(PROTO)
+/*
+ * Return the virtual column number at the current cursor position.
+ * This is used by the IM code to obtain the start of the preedit string.
+ */
+    colnr_T
+cmdline_getvcol_cursor(void)
+{
+    if (ccline.cmdbuff == NULL || ccline.cmdpos > ccline.cmdlen)
+	return MAXCOL;
+
+    if (has_mbyte)
+    {
+	colnr_T	col;
+	int	i = 0;
+
+	for (col = 0; i < ccline.cmdpos; ++col)
+	    i += (*mb_ptr2len)(ccline.cmdbuff + i);
+
+	return col;
+    }
+    else
+	return ccline.cmdpos;
+}
+#endif
+
+#if defined(FEAT_XIM) && defined(FEAT_GUI_GTK)
+/*
+ * If part of the command line is an IM preedit string, redraw it with
+ * IM feedback attributes.  The cursor position is restored after drawing.
+ */
+    static void
+redrawcmd_preedit(void)
+{
+    if ((State & MODE_CMDLINE)
+	    && xic != NULL
+	    // && im_get_status()  doesn't work when using SCIM
+	    && !p_imdisable
+	    && im_is_preediting())
+    {
+	int	cmdpos = 0;
+	int	cmdspos;
+	int	old_row;
+	int	old_col;
+	colnr_T	col;
+
+	old_row = msg_row;
+	old_col = msg_col;
+	cmdspos = ((ccline.cmdfirstc != NUL) ? 1 : 0) + ccline.cmdindent;
+
+	if (has_mbyte)
+	{
+	    for (col = 0; col < preedit_start_col
+			  && cmdpos < ccline.cmdlen; ++col)
+	    {
+		cmdspos += (*mb_ptr2cells)(ccline.cmdbuff + cmdpos);
+		cmdpos  += (*mb_ptr2len)(ccline.cmdbuff + cmdpos);
+	    }
+	}
+	else
+	{
+	    cmdspos += preedit_start_col;
+	    cmdpos  += preedit_start_col;
+	}
+
+	msg_row = cmdline_row + (cmdspos / (int)Columns);
+	msg_col = cmdspos % (int)Columns;
+	if (msg_row >= Rows)
+	    msg_row = Rows - 1;
+
+	for (col = 0; cmdpos < ccline.cmdlen; ++col)
+	{
+	    int char_len;
+	    int char_attr;
+
+	    char_attr = im_get_feedback_attr(col);
+	    if (char_attr < 0)
+		break; // end of preedit string
+
+	    if (has_mbyte)
+		char_len = (*mb_ptr2len)(ccline.cmdbuff + cmdpos);
+	    else
+		char_len = 1;
+
+	    msg_outtrans_len_attr(ccline.cmdbuff + cmdpos, char_len, char_attr);
+	    cmdpos += char_len;
+	}
+
+	msg_row = old_row;
+	msg_col = old_col;
+    }
+}
+#endif // FEAT_XIM && FEAT_GUI_GTK
+
+/*
+ * Allocate a new command line buffer.
+ * Assigns the new buffer to ccline.cmdbuff and ccline.cmdbufflen.
+ */
+    static void
+alloc_cmdbuff(int len)
+{
+    /*
+     * give some extra space to avoid having to allocate all the time
+     */
+    if (len < 80)
+	len = 100;
+    else
+	len += 20;
+
+    ccline.cmdbuff = alloc(len);    // caller should check for out-of-memory
+    ccline.cmdbufflen = len;
+}
+
+/*
+ * Re-allocate the command line to length len + something extra.
+ * return FAIL for failure, OK otherwise
+ */
+    int
+realloc_cmdbuff(int len)
+{
+    char_u	*p;
+
+    if (len < ccline.cmdbufflen)
+	return OK;			// no need to resize
+
+    p = ccline.cmdbuff;
+    alloc_cmdbuff(len);			// will get some more
+    if (ccline.cmdbuff == NULL)		// out of memory
+    {
+	ccline.cmdbuff = p;		// keep the old one
+	return FAIL;
+    }
+    // There isn't always a NUL after the command, but it may need to be
+    // there, thus copy up to the NUL and add a NUL.
+    mch_memmove(ccline.cmdbuff, p, (size_t)ccline.cmdlen);
+    ccline.cmdbuff[ccline.cmdlen] = NUL;
+    vim_free(p);
+
+    if (ccline.xpc != NULL
+	    && ccline.xpc->xp_pattern != NULL
+	    && ccline.xpc->xp_context != EXPAND_NOTHING
+	    && ccline.xpc->xp_context != EXPAND_UNSUCCESSFUL)
+    {
+	int i = (int)(ccline.xpc->xp_pattern - p);
+
+	// If xp_pattern points inside the old cmdbuff it needs to be adjusted
+	// to point into the newly allocated memory.
+	if (i >= 0 && i <= ccline.cmdlen)
+	    ccline.xpc->xp_pattern = ccline.cmdbuff + i;
+    }
+
+    return OK;
+}
+
+#if defined(FEAT_ARABIC) || defined(PROTO)
+static char_u	*arshape_buf = NULL;
+
+# if defined(EXITFREE) || defined(PROTO)
+    void
+free_arshape_buf(void)
+{
+    vim_free(arshape_buf);
+}
+# endif
+#endif
+
+/*
+ * Draw part of the cmdline at the current cursor position.  But draw stars
+ * when cmdline_star is TRUE.
+ */
+    static void
+draw_cmdline(int start, int len)
+{
+#if defined(FEAT_CRYPT) || defined(FEAT_EVAL)
+    int		i;
+
+    if (cmdline_star > 0)
+	for (i = 0; i < len; ++i)
+	{
+	    msg_putchar('*');
+	    if (has_mbyte)
+		i += (*mb_ptr2len)(ccline.cmdbuff + start + i) - 1;
+	}
+    else
+#endif
+#ifdef FEAT_ARABIC
+	if (p_arshape && !p_tbidi && cmdline_has_arabic(start, len))
+    {
+	static int	buflen = 0;
+	char_u		*p;
+	int		j;
+	int		newlen = 0;
+	int		mb_l;
+	int		pc, pc1 = 0;
+	int		prev_c = 0;
+	int		prev_c1 = 0;
+	int		u8c;
+	int		u8cc[MAX_MCO];
+	int		nc = 0;
+
+	/*
+	 * Do arabic shaping into a temporary buffer.  This is very
+	 * inefficient!
+	 */
+	if (len * 2 + 2 > buflen)
+	{
+	    // Re-allocate the buffer.  We keep it around to avoid a lot of
+	    // alloc()/free() calls.
+	    vim_free(arshape_buf);
+	    buflen = len * 2 + 2;
+	    arshape_buf = alloc(buflen);
+	    if (arshape_buf == NULL)
+		return;	// out of memory
+	}
+
+	if (utf_iscomposing(utf_ptr2char(ccline.cmdbuff + start)))
+	{
+	    // Prepend a space to draw the leading composing char on.
+	    arshape_buf[0] = ' ';
+	    newlen = 1;
+	}
+
+	for (j = start; j < start + len; j += mb_l)
+	{
+	    p = ccline.cmdbuff + j;
+	    u8c = utfc_ptr2char_len(p, u8cc, start + len - j);
+	    mb_l = utfc_ptr2len_len(p, start + len - j);
+	    if (ARABIC_CHAR(u8c))
+	    {
+		// Do Arabic shaping.
+		if (cmdmsg_rl)
+		{
+		    // displaying from right to left
+		    pc = prev_c;
+		    pc1 = prev_c1;
+		    prev_c1 = u8cc[0];
+		    if (j + mb_l >= start + len)
+			nc = NUL;
+		    else
+			nc = utf_ptr2char(p + mb_l);
+		}
+		else
+		{
+		    // displaying from left to right
+		    if (j + mb_l >= start + len)
+			pc = NUL;
+		    else
+		    {
+			int	pcc[MAX_MCO];
+
+			pc = utfc_ptr2char_len(p + mb_l, pcc,
+						      start + len - j - mb_l);
+			pc1 = pcc[0];
+		    }
+		    nc = prev_c;
+		}
+		prev_c = u8c;
+
+		u8c = arabic_shape(u8c, NULL, &u8cc[0], pc, pc1, nc);
+
+		newlen += (*mb_char2bytes)(u8c, arshape_buf + newlen);
+		if (u8cc[0] != 0)
+		{
+		    newlen += (*mb_char2bytes)(u8cc[0], arshape_buf + newlen);
+		    if (u8cc[1] != 0)
+			newlen += (*mb_char2bytes)(u8cc[1],
+							arshape_buf + newlen);
+		}
+	    }
+	    else
+	    {
+		prev_c = u8c;
+		mch_memmove(arshape_buf + newlen, p, mb_l);
+		newlen += mb_l;
+	    }
+	}
+
+	msg_outtrans_len(arshape_buf, newlen);
+    }
+    else
+#endif
+	msg_outtrans_len(ccline.cmdbuff + start, len);
+}
+
+/*
+ * Put a character on the command line.  Shifts the following text to the
+ * right when "shift" is TRUE.  Used for CTRL-V, CTRL-K, etc.
+ * "c" must be printable (fit in one display cell)!
+ */
+    void
+putcmdline(int c, int shift)
+{
+    if (cmd_silent)
+	return;
+    msg_no_more = TRUE;
+    msg_putchar(c);
+    if (shift)
+	draw_cmdline(ccline.cmdpos, ccline.cmdlen - ccline.cmdpos);
+    msg_no_more = FALSE;
+    cursorcmd();
+    extra_char = c;
+    extra_char_shift = shift;
+}
+
+/*
+ * Undo a putcmdline(c, FALSE).
+ */
+    void
+unputcmdline(void)
+{
+    if (cmd_silent)
+	return;
+    msg_no_more = TRUE;
+    if (ccline.cmdlen == ccline.cmdpos)
+	msg_putchar(' ');
+    else if (has_mbyte)
+	draw_cmdline(ccline.cmdpos,
+			       (*mb_ptr2len)(ccline.cmdbuff + ccline.cmdpos));
+    else
+	draw_cmdline(ccline.cmdpos, 1);
+    msg_no_more = FALSE;
+    cursorcmd();
+    extra_char = NUL;
+}
+
+/*
+ * Put the given string, of the given length, onto the command line.
+ * If len is -1, then STRLEN() is used to calculate the length.
+ * If 'redraw' is TRUE then the new part of the command line, and the remaining
+ * part will be redrawn, otherwise it will not.  If this function is called
+ * twice in a row, then 'redraw' should be FALSE and redrawcmd() should be
+ * called afterwards.
+ */
+    int
+put_on_cmdline(char_u *str, int len, int redraw)
+{
+    int		retval;
+    int		i;
+    int		m;
+    int		c;
+
+    if (len < 0)
+	len = (int)STRLEN(str);
+
+    // Check if ccline.cmdbuff needs to be longer
+    if (ccline.cmdlen + len + 1 >= ccline.cmdbufflen)
+	retval = realloc_cmdbuff(ccline.cmdlen + len + 1);
+    else
+	retval = OK;
+    if (retval == OK)
+    {
+	if (!ccline.overstrike)
+	{
+	    mch_memmove(ccline.cmdbuff + ccline.cmdpos + len,
+					       ccline.cmdbuff + ccline.cmdpos,
+				     (size_t)(ccline.cmdlen - ccline.cmdpos));
+	    ccline.cmdlen += len;
+	}
+	else
+	{
+	    if (has_mbyte)
+	    {
+		// Count nr of characters in the new string.
+		m = 0;
+		for (i = 0; i < len; i += (*mb_ptr2len)(str + i))
+		    ++m;
+		// Count nr of bytes in cmdline that are overwritten by these
+		// characters.
+		for (i = ccline.cmdpos; i < ccline.cmdlen && m > 0;
+				 i += (*mb_ptr2len)(ccline.cmdbuff + i))
+		    --m;
+		if (i < ccline.cmdlen)
+		{
+		    mch_memmove(ccline.cmdbuff + ccline.cmdpos + len,
+			    ccline.cmdbuff + i, (size_t)(ccline.cmdlen - i));
+		    ccline.cmdlen += ccline.cmdpos + len - i;
+		}
+		else
+		    ccline.cmdlen = ccline.cmdpos + len;
+	    }
+	    else if (ccline.cmdpos + len > ccline.cmdlen)
+		ccline.cmdlen = ccline.cmdpos + len;
+	}
+	mch_memmove(ccline.cmdbuff + ccline.cmdpos, str, (size_t)len);
+	ccline.cmdbuff[ccline.cmdlen] = NUL;
+
+	if (enc_utf8)
+	{
+	    // When the inserted text starts with a composing character,
+	    // backup to the character before it.  There could be two of them.
+	    i = 0;
+	    c = utf_ptr2char(ccline.cmdbuff + ccline.cmdpos);
+	    while (ccline.cmdpos > 0 && utf_iscomposing(c))
+	    {
+		i = (*mb_head_off)(ccline.cmdbuff,
+				      ccline.cmdbuff + ccline.cmdpos - 1) + 1;
+		ccline.cmdpos -= i;
+		len += i;
+		c = utf_ptr2char(ccline.cmdbuff + ccline.cmdpos);
+	    }
+#ifdef FEAT_ARABIC
+	    if (i == 0 && ccline.cmdpos > 0 && arabic_maycombine(c))
+	    {
+		// Check the previous character for Arabic combining pair.
+		i = (*mb_head_off)(ccline.cmdbuff,
+				      ccline.cmdbuff + ccline.cmdpos - 1) + 1;
+		if (arabic_combine(utf_ptr2char(ccline.cmdbuff
+						     + ccline.cmdpos - i), c))
+		{
+		    ccline.cmdpos -= i;
+		    len += i;
+		}
+		else
+		    i = 0;
+	    }
+#endif
+	    if (i != 0)
+	    {
+		// Also backup the cursor position.
+		i = ptr2cells(ccline.cmdbuff + ccline.cmdpos);
+		ccline.cmdspos -= i;
+		msg_col -= i;
+		if (msg_col < 0)
+		{
+		    msg_col += Columns;
+		    --msg_row;
+		}
+	    }
+	}
+
+	if (redraw && !cmd_silent)
+	{
+	    msg_no_more = TRUE;
+	    i = cmdline_row;
+	    cursorcmd();
+	    draw_cmdline(ccline.cmdpos, ccline.cmdlen - ccline.cmdpos);
+	    // Avoid clearing the rest of the line too often.
+	    if (cmdline_row != i || ccline.overstrike)
+		msg_clr_eos();
+	    msg_no_more = FALSE;
+	}
+	if (KeyTyped)
+	{
+	    m = Columns * Rows;
+	    if (m < 0)	// overflow, Columns or Rows at weird value
+		m = MAXCOL;
+	}
+	else
+	    m = MAXCOL;
+	for (i = 0; i < len; ++i)
+	{
+	    c = cmdline_charsize(ccline.cmdpos);
+	    // count ">" for a double-wide char that doesn't fit.
+	    if (has_mbyte)
+		correct_cmdspos(ccline.cmdpos, c);
+	    // Stop cursor at the end of the screen, but do increment the
+	    // insert position, so that entering a very long command
+	    // works, even though you can't see it.
+	    if (ccline.cmdspos + c < m)
+		ccline.cmdspos += c;
+
+	    if (has_mbyte)
+	    {
+		c = (*mb_ptr2len)(ccline.cmdbuff + ccline.cmdpos) - 1;
+		if (c > len - i - 1)
+		    c = len - i - 1;
+		ccline.cmdpos += c;
+		i += c;
+	    }
+	    ++ccline.cmdpos;
+	}
+    }
+    if (redraw)
+	msg_check();
+    return retval;
+}
+
+static cmdline_info_T	prev_ccline;
+static int		prev_ccline_used = FALSE;
+
+/*
+ * Save ccline, because obtaining the "=" register may execute "normal :cmd"
+ * and overwrite it.  But get_cmdline_str() may need it, thus make it
+ * available globally in prev_ccline.
+ */
+    static void
+save_cmdline(cmdline_info_T *ccp)
+{
+    if (!prev_ccline_used)
+    {
+	CLEAR_FIELD(prev_ccline);
+	prev_ccline_used = TRUE;
+    }
+    *ccp = prev_ccline;
+    prev_ccline = ccline;
+    ccline.cmdbuff = NULL;  // signal that ccline is not in use
+}
+
+/*
+ * Restore ccline after it has been saved with save_cmdline().
+ */
+    static void
+restore_cmdline(cmdline_info_T *ccp)
+{
+    ccline = prev_ccline;
+    prev_ccline = *ccp;
+}
+
+/*
+ * Paste a yank register into the command line.
+ * Used by CTRL-R command in command-line mode.
+ * insert_reg() can't be used here, because special characters from the
+ * register contents will be interpreted as commands.
+ *
+ * Return FAIL for failure, OK otherwise.
+ */
+    static int
+cmdline_paste(
+    int regname,
+    int literally,	// Insert text literally instead of "as typed"
+    int remcr)		// remove trailing CR
+{
+    long		i;
+    char_u		*arg;
+    char_u		*p;
+    int			allocated;
+
+    // check for valid regname; also accept special characters for CTRL-R in
+    // the command line
+    if (regname != Ctrl_F && regname != Ctrl_P && regname != Ctrl_W
+	    && regname != Ctrl_A && regname != Ctrl_L
+	    && !valid_yank_reg(regname, FALSE))
+	return FAIL;
+
+    // A register containing CTRL-R can cause an endless loop.  Allow using
+    // CTRL-C to break the loop.
+    line_breakcheck();
+    if (got_int)
+	return FAIL;
+
+#ifdef FEAT_CLIPBOARD
+    regname = may_get_selection(regname);
+#endif
+
+    // Need to set "textlock" to avoid nasty things like going to another
+    // buffer when evaluating an expression.
+    ++textlock;
+    i = get_spec_reg(regname, &arg, &allocated, TRUE);
+    --textlock;
+
+    if (i)
+    {
+	// Got the value of a special register in "arg".
+	if (arg == NULL)
+	    return FAIL;
+
+	// When 'incsearch' is set and CTRL-R CTRL-W used: skip the duplicate
+	// part of the word.
+	p = arg;
+	if (p_is && regname == Ctrl_W)
+	{
+	    char_u  *w;
+	    int	    len;
+
+	    // Locate start of last word in the cmd buffer.
+	    for (w = ccline.cmdbuff + ccline.cmdpos; w > ccline.cmdbuff; )
+	    {
+		if (has_mbyte)
+		{
+		    len = (*mb_head_off)(ccline.cmdbuff, w - 1) + 1;
+		    if (!vim_iswordc(mb_ptr2char(w - len)))
+			break;
+		    w -= len;
+		}
+		else
+		{
+		    if (!vim_iswordc(w[-1]))
+			break;
+		    --w;
+		}
+	    }
+	    len = (int)((ccline.cmdbuff + ccline.cmdpos) - w);
+	    if (p_ic ? STRNICMP(w, arg, len) == 0 : STRNCMP(w, arg, len) == 0)
+		p += len;
+	}
+
+	cmdline_paste_str(p, literally);
+	if (allocated)
+	    vim_free(arg);
+	return OK;
+    }
+
+    return cmdline_paste_reg(regname, literally, remcr);
+}
+
+/*
+ * Put a string on the command line.
+ * When "literally" is TRUE, insert literally.
+ * When "literally" is FALSE, insert as typed, but don't leave the command
+ * line.
+ */
+    void
+cmdline_paste_str(char_u *s, int literally)
+{
+    int		c, cv;
+
+    if (literally)
+	put_on_cmdline(s, -1, TRUE);
+    else
+	while (*s != NUL)
+	{
+	    cv = *s;
+	    if (cv == Ctrl_V && s[1])
+		++s;
+	    if (has_mbyte)
+		c = mb_cptr2char_adv(&s);
+	    else
+		c = *s++;
+	    if (cv == Ctrl_V || c == ESC || c == Ctrl_C
+		    || c == CAR || c == NL || c == Ctrl_L
+#ifdef UNIX
+		    || c == intr_char
+#endif
+		    || (c == Ctrl_BSL && *s == Ctrl_N))
+		stuffcharReadbuff(Ctrl_V);
+	    stuffcharReadbuff(c);
+	}
+}
+
+/*
+ * This function is called when the screen size changes and with incremental
+ * search and in other situations where the command line may have been
+ * overwritten.
+ */
+    void
+redrawcmdline(void)
+{
+    redrawcmdline_ex(TRUE);
+}
+
+/*
+ * When "do_compute_cmdrow" is TRUE the command line is redrawn at the bottom.
+ * If FALSE cmdline_row is used, which should redraw in the same place.
+ */
+    void
+redrawcmdline_ex(int do_compute_cmdrow)
+{
+    if (cmd_silent)
+	return;
+    need_wait_return = FALSE;
+    if (do_compute_cmdrow)
+	compute_cmdrow();
+    redrawcmd();
+    cursorcmd();
+}
+
+    static void
+redrawcmdprompt(void)
+{
+    int		i;
+
+    if (cmd_silent)
+	return;
+    if (ccline.cmdfirstc != NUL)
+	msg_putchar(ccline.cmdfirstc);
+    if (ccline.cmdprompt != NULL)
+    {
+	msg_puts_attr((char *)ccline.cmdprompt, ccline.cmdattr);
+	ccline.cmdindent = msg_col + (msg_row - cmdline_row) * Columns;
+	// do the reverse of set_cmdspos()
+	if (ccline.cmdfirstc != NUL)
+	    --ccline.cmdindent;
+    }
+    else
+	for (i = ccline.cmdindent; i > 0; --i)
+	    msg_putchar(' ');
+}
+
+/*
+ * Redraw what is currently on the command line.
+ */
+    void
+redrawcmd(void)
+{
+    int save_in_echowindow = in_echowindow;
+
+    if (cmd_silent)
+	return;
+
+    // when 'incsearch' is set there may be no command line while redrawing
+    if (ccline.cmdbuff == NULL)
+    {
+	windgoto(cmdline_row, 0);
+	msg_clr_eos();
+	return;
+    }
+
+    // Do not put this in the message window.
+    in_echowindow = FALSE;
+
+    sb_text_restart_cmdline();
+    msg_start();
+    redrawcmdprompt();
+
+    // Don't use more prompt, truncate the cmdline if it doesn't fit.
+    msg_no_more = TRUE;
+    draw_cmdline(0, ccline.cmdlen);
+    msg_clr_eos();
+    msg_no_more = FALSE;
+
+    set_cmdspos_cursor();
+    if (extra_char != NUL)
+	putcmdline(extra_char, extra_char_shift);
+
+    /*
+     * An emsg() before may have set msg_scroll. This is used in normal mode,
+     * in cmdline mode we can reset them now.
+     */
+    msg_scroll = FALSE;		// next message overwrites cmdline
+
+    // Typing ':' at the more prompt may set skip_redraw.  We don't want this
+    // in cmdline mode
+    skip_redraw = FALSE;
+
+    in_echowindow = save_in_echowindow;
+}
+
+    void
+compute_cmdrow(void)
+{
+    // ignore "msg_scrolled" in update_screen(), it will be reset soon.
+    if (exmode_active || (msg_scrolled != 0 && !updating_screen))
+	cmdline_row = Rows - 1;
+    else
+	cmdline_row = W_WINROW(lastwin) + lastwin->w_height
+						    + lastwin->w_status_height;
+}
+
+    void
+cursorcmd(void)
+{
+    if (cmd_silent)
+	return;
+
+#ifdef FEAT_RIGHTLEFT
+    if (cmdmsg_rl)
+    {
+	msg_row = cmdline_row  + (ccline.cmdspos / (int)(Columns - 1));
+	msg_col = (int)Columns - (ccline.cmdspos % (int)(Columns - 1)) - 1;
+	if (msg_row <= 0)
+	    msg_row = Rows - 1;
+    }
+    else
+#endif
+    {
+	msg_row = cmdline_row + (ccline.cmdspos / (int)Columns);
+	msg_col = ccline.cmdspos % (int)Columns;
+	if (msg_row >= Rows)
+	    msg_row = Rows - 1;
+    }
+
+    windgoto(msg_row, msg_col);
+#if defined(FEAT_XIM) && defined(FEAT_GUI_GTK)
+    if (p_imst == IM_ON_THE_SPOT)
+	redrawcmd_preedit();
+#endif
+#ifdef MCH_CURSOR_SHAPE
+    mch_update_cursor();
+#endif
+}
+
+    void
+gotocmdline(int clr)
+{
+    msg_start();
+#ifdef FEAT_RIGHTLEFT
+    if (cmdmsg_rl)
+	msg_col = Columns - 1;
+    else
+#endif
+	msg_col = 0;	    // always start in column 0
+    if (clr)		    // clear the bottom line(s)
+	msg_clr_eos();	    // will reset clear_cmdline
+    windgoto(cmdline_row, 0);
+}
+
+/*
+ * Check the word in front of the cursor for an abbreviation.
+ * Called when the non-id character "c" has been entered.
+ * When an abbreviation is recognized it is removed from the text with
+ * backspaces and the replacement string is inserted, followed by "c".
+ */
+    static int
+ccheck_abbr(int c)
+{
+    int spos = 0;
+
+    if (p_paste || no_abbr)	    // no abbreviations or in paste mode
+	return FALSE;
+
+    // Do not consider '<,'> be part of the mapping, skip leading whitespace.
+    // Actually accepts any mark.
+    while (VIM_ISWHITE(ccline.cmdbuff[spos]) && spos < ccline.cmdlen)
+	spos++;
+    if (ccline.cmdlen - spos > 5
+	    && ccline.cmdbuff[spos] == '\''
+	    && ccline.cmdbuff[spos + 2] == ','
+	    && ccline.cmdbuff[spos + 3] == '\'')
+	spos += 5;
+    else
+	// check abbreviation from the beginning of the commandline
+	spos = 0;
+
+    return check_abbr(c, ccline.cmdbuff, ccline.cmdpos, spos);
+}
+
+/*
+ * Escape special characters in "fname", depending on "what":
+ * VSE_NONE: for when used as a file name argument after a Vim command.
+ * VSE_SHELL: for a shell command.
+ * VSE_BUFFER: for the ":buffer" command.
+ * Returns the result in allocated memory.
+ */
+    char_u *
+vim_strsave_fnameescape(char_u *fname, int what)
+{
+    char_u	*p;
+#ifdef BACKSLASH_IN_FILENAME
+    char_u	buf[20];
+    int		j = 0;
+
+    // Don't escape '[', '{' and '!' if they are in 'isfname' and for the
+    // ":buffer" command.
+    for (p = what == VSE_BUFFER ? BUFFER_ESC_CHARS : PATH_ESC_CHARS;
+								*p != NUL; ++p)
+	if ((*p != '[' && *p != '{' && *p != '!') || !vim_isfilec(*p))
+	    buf[j++] = *p;
+    buf[j] = NUL;
+    p = vim_strsave_escaped(fname, buf);
+#else
+    p = vim_strsave_escaped(fname, what == VSE_SHELL ? SHELL_ESC_CHARS
+		    : what == VSE_BUFFER ? BUFFER_ESC_CHARS : PATH_ESC_CHARS);
+    if (what == VSE_SHELL && csh_like_shell() && p != NULL)
+    {
+	char_u	    *s;
+
+	// For csh and similar shells need to put two backslashes before '!'.
+	// One is taken by Vim, one by the shell.
+	s = vim_strsave_escaped(p, (char_u *)"!");
+	vim_free(p);
+	p = s;
+    }
+#endif
+
+    // '>' and '+' are special at the start of some commands, e.g. ":edit" and
+    // ":write".  "cd -" has a special meaning.
+    if (p != NULL && (*p == '>' || *p == '+' || (*p == '-' && p[1] == NUL)))
+	escape_fname(&p);
+
+    return p;
+}
+
+/*
+ * Put a backslash before the file name in "pp", which is in allocated memory.
+ */
+    void
+escape_fname(char_u **pp)
+{
+    char_u	*p;
+
+    p = alloc(STRLEN(*pp) + 2);
+    if (p == NULL)
+	return;
+
+    p[0] = '\\';
+    STRCPY(p + 1, *pp);
+    vim_free(*pp);
+    *pp = p;
+}
+
+/*
+ * For each file name in files[num_files]:
+ * If 'orig_pat' starts with "~/", replace the home directory with "~".
+ */
+    void
+tilde_replace(
+    char_u  *orig_pat,
+    int	    num_files,
+    char_u  **files)
+{
+    int	    i;
+    char_u  *p;
+
+    if (orig_pat[0] == '~' && vim_ispathsep(orig_pat[1]))
+    {
+	for (i = 0; i < num_files; ++i)
+	{
+	    p = home_replace_save(NULL, files[i]);
+	    if (p != NULL)
+	    {
+		vim_free(files[i]);
+		files[i] = p;
+	    }
+	}
+    }
+}
+
+/*
+ * Get a pointer to the current command line info.
+ */
+    cmdline_info_T *
+get_cmdline_info(void)
+{
+    return &ccline;
+}
+
+/*
+ * Get pointer to the command line info to use. save_cmdline() may clear
+ * ccline and put the previous value in prev_ccline.
+ */
+    static cmdline_info_T *
+get_ccline_ptr(void)
+{
+    if ((State & MODE_CMDLINE) == 0)
+	return NULL;
+    if (ccline.cmdbuff != NULL)
+	return &ccline;
+    if (prev_ccline_used && prev_ccline.cmdbuff != NULL)
+	return &prev_ccline;
+    return NULL;
+}
+
+/*
+ * Get the current command-line type.
+ * Returns ':' or '/' or '?' or '@' or '>' or '-'
+ * Only works when the command line is being edited.
+ * Returns NUL when something is wrong.
+ */
+    static int
+get_cmdline_type(void)
+{
+    cmdline_info_T *p = get_ccline_ptr();
+
+    if (p == NULL)
+	return NUL;
+    if (p->cmdfirstc == NUL)
+	return
+# ifdef FEAT_EVAL
+	    (p->input_fn) ? '@' :
+# endif
+	    '-';
+    return p->cmdfirstc;
+}
+
+#if defined(FEAT_EVAL) || defined(PROTO)
+/*
+ * Get the current command line in allocated memory.
+ * Only works when the command line is being edited.
+ * Returns NULL when something is wrong.
+ */
+    static char_u *
+get_cmdline_str(void)
+{
+    cmdline_info_T *p;
+
+    if (cmdline_star > 0)
+	return NULL;
+    p = get_ccline_ptr();
+    if (p == NULL)
+	return NULL;
+    return vim_strnsave(p->cmdbuff, p->cmdlen);
+}
+
+/*
+ * Get the current command-line completion type.
+ */
+    static char_u *
+get_cmdline_completion(void)
+{
+    cmdline_info_T *p;
+
+    if (cmdline_star > 0)
+	return NULL;
+
+    p = get_ccline_ptr();
+    if (p == NULL || p->xpc == NULL)
+	return NULL;
+
+    char_u *cmd_compl;
+
+    set_expand_context(p->xpc);
+
+    cmd_compl = cmdcomplete_type_to_str(p->xpc->xp_context);
+    if (cmd_compl != NULL)
+	return vim_strsave(cmd_compl);
+
+    return NULL;
+}
+
+/*
+ * "getcmdcompltype()" function
+ */
+    void
+f_getcmdcompltype(typval_T *argvars UNUSED, typval_T *rettv)
+{
+    rettv->v_type = VAR_STRING;
+    rettv->vval.v_string = get_cmdline_completion();
+}
+
+/*
+ * "getcmdline()" function
+ */
+    void
+f_getcmdline(typval_T *argvars UNUSED, typval_T *rettv)
+{
+    rettv->v_type = VAR_STRING;
+    rettv->vval.v_string = get_cmdline_str();
+}
+
+/*
+ * "getcmdpos()" function
+ */
+    void
+f_getcmdpos(typval_T *argvars UNUSED, typval_T *rettv)
+{
+    cmdline_info_T *p = get_ccline_ptr();
+
+    rettv->vval.v_number = p != NULL ? p->cmdpos + 1 : 0;
+}
+
+/*
+ * "getcmdscreenpos()" function
+ */
+    void
+f_getcmdscreenpos(typval_T *argvars UNUSED, typval_T *rettv)
+{
+    cmdline_info_T *p = get_ccline_ptr();
+
+    rettv->vval.v_number = p != NULL ? p->cmdspos + 1 : 0;
+}
+
+/*
+ * "getcmdtype()" function
+ */
+    void
+f_getcmdtype(typval_T *argvars UNUSED, typval_T *rettv)
+{
+    rettv->v_type = VAR_STRING;
+    rettv->vval.v_string = alloc(2);
+    if (rettv->vval.v_string == NULL)
+	return;
+
+    rettv->vval.v_string[0] = get_cmdline_type();
+    rettv->vval.v_string[1] = NUL;
+}
+
+// Set the command line str to "str".
+// Returns 1 when failed, 0 when OK.
+    static int
+set_cmdline_str(char_u *str, int pos)
+{
+    cmdline_info_T  *p = get_ccline_ptr();
+    int		    len;
+
+    if (p == NULL)
+	return 1;
+
+    len = (int)STRLEN(str);
+    realloc_cmdbuff(len + 1);
+    p->cmdlen = len;
+    STRCPY(p->cmdbuff, str);
+
+    p->cmdpos = pos < 0 || pos > p->cmdlen ? p->cmdlen : pos;
+    new_cmdpos = p->cmdpos;
+
+    redrawcmd();
+
+    // Trigger CmdlineChanged autocommands.
+    trigger_cmd_autocmd(get_cmdline_type(), EVENT_CMDLINECHANGED);
+
+    return 0;
+}
+
+/*
+ * Set the command line byte position to "pos".  Zero is the first position.
+ * Only works when the command line is being edited.
+ * Returns 1 when failed, 0 when OK.
+ */
+    static int
+set_cmdline_pos(
+    int		pos)
+{
+    cmdline_info_T *p = get_ccline_ptr();
+
+    if (p == NULL)
+	return 1;
+
+    // The position is not set directly but after CTRL-\ e or CTRL-R = has
+    // changed the command line.
+    if (pos < 0)
+	new_cmdpos = 0;
+    else
+	new_cmdpos = pos;
+    return 0;
+}
+
+// "setcmdline()" function
+    void
+f_setcmdline(typval_T *argvars, typval_T *rettv)
+{
+    int pos = -1;
+
+    if (check_for_string_arg(argvars, 0) == FAIL
+	    || check_for_opt_number_arg(argvars, 1) == FAIL)
+	return;
+
+    if (argvars[1].v_type != VAR_UNKNOWN)
+    {
+	int error = FALSE;
+
+	pos = (int)tv_get_number_chk(&argvars[1], &error) - 1;
+	if (error)
+	    return;
+	if (pos < 0)
+	{
+	    emsg(_(e_argument_must_be_positive));
+	    return;
+	}
+    }
+
+    rettv->vval.v_number = set_cmdline_str(argvars[0].vval.v_string, pos);
+}
+
+/*
+ * "setcmdpos()" function
+ */
+    void
+f_setcmdpos(typval_T *argvars, typval_T *rettv)
+{
+    int		pos;
+
+    if (in_vim9script() && check_for_number_arg(argvars, 0) == FAIL)
+	return;
+
+    pos = (int)tv_get_number(&argvars[0]) - 1;
+    if (pos >= 0)
+	rettv->vval.v_number = set_cmdline_pos(pos);
+}
+#endif
+
+/*
+ * Return the first character of the current command line.
+ */
+    int
+get_cmdline_firstc(void)
+{
+    return ccline.cmdfirstc;
+}
+
+/*
+ * Get indices "num1,num2" that specify a range within a list (not a range of
+ * text lines in a buffer!) from a string.  Used for ":history" and ":clist".
+ * Returns OK if parsed successfully, otherwise FAIL.
+ */
+    int
+get_list_range(char_u **str, int *num1, int *num2)
+{
+    int		len;
+    int		first = FALSE;
+    varnumber_T	num;
+
+    *str = skipwhite(*str);
+    if (**str == '-' || vim_isdigit(**str))  // parse "from" part of range
+    {
+	vim_str2nr(*str, NULL, &len, 0, &num, NULL, 0, FALSE);
+	*str += len;
+	*num1 = (int)num;
+	first = TRUE;
+    }
+    *str = skipwhite(*str);
+    if (**str == ',')			// parse "to" part of range
+    {
+	*str = skipwhite(*str + 1);
+	vim_str2nr(*str, NULL, &len, 0, &num, NULL, 0, FALSE);
+	if (len > 0)
+	{
+	    *num2 = (int)num;
+	    *str = skipwhite(*str + len);
+	}
+	else if (!first)		// no number given at all
+	    return FAIL;
+    }
+    else if (first)			// only one number given
+	*num2 = *num1;
+    return OK;
+}
+
+/*
+ * Check value of 'cedit' and set cedit_key.
+ * Returns NULL if value is OK, error message otherwise.
+ */
+    char *
+did_set_cedit(optset_T *args UNUSED)
+{
+    int n;
+
+    if (*p_cedit == NUL)
+	cedit_key = -1;
+    else
+    {
+	n = string_to_key(p_cedit, FALSE);
+	if (vim_isprintc(n))
+	    return e_invalid_argument;
+	cedit_key = n;
+    }
+    return NULL;
+}
+
+/*
+ * Open a window on the current command line and history.  Allow editing in
+ * the window.  Returns when the window is closed.
+ * Returns:
+ *	CR	 if the command is to be executed
+ *	Ctrl_C	 if it is to be abandoned
+ *	K_IGNORE if editing continues
+ */
+    static int
+open_cmdwin(void)
+{
+    bufref_T		old_curbuf;
+    win_T		*old_curwin = curwin;
+    bufref_T		bufref;
+    win_T		*wp;
+    int			i;
+    linenr_T		lnum;
+    int			histtype;
+    garray_T		winsizes;
+    int			save_restart_edit = restart_edit;
+    int			save_State = State;
+    int			save_exmode = exmode_active;
+#ifdef FEAT_RIGHTLEFT
+    int			save_cmdmsg_rl = cmdmsg_rl;
+#endif
+#ifdef FEAT_FOLDING
+    int			save_KeyTyped;
+#endif
+
+    // Can't do this when text or buffer is locked.
+    // Can't do this recursively.  Can't do it when typing a password.
+    if (text_or_buf_locked()
+	    || cmdwin_type != 0
+# if defined(FEAT_CRYPT) || defined(FEAT_EVAL)
+	    || cmdline_star > 0
+# endif
+	    )
+    {
+	beep_flush();
+	return K_IGNORE;
+    }
+    set_bufref(&old_curbuf, curbuf);
+
+    // Save current window sizes.
+    win_size_save(&winsizes);
+
+    // When using completion in Insert mode with <C-R>=<C-F> one can open the
+    // command line window, but we don't want the popup menu then.
+    pum_undisplay();
+
+    // don't use a new tab page
+    cmdmod.cmod_tab = 0;
+    cmdmod.cmod_flags |= CMOD_NOSWAPFILE;
+
+    // Create a window for the command-line buffer.
+    if (win_split((int)p_cwh, WSP_BOT) == FAIL)
+    {
+	beep_flush();
+	ga_clear(&winsizes);
+	return K_IGNORE;
+    }
+    // Don't let quitting the More prompt make this fail.
+    got_int = FALSE;
+
+    // Set "cmdwin_type" before any autocommands may mess things up.
+    cmdwin_type = get_cmdline_type();
+
+    // Create the command-line buffer empty.
+    if (do_ecmd(0, NULL, NULL, NULL, ECMD_ONE, ECMD_HIDE, NULL) == FAIL)
+    {
+	// Some autocommand messed it up?
+	win_close(curwin, TRUE);
+	ga_clear(&winsizes);
+	cmdwin_type = 0;
+	return Ctrl_C;
+    }
+
+    apply_autocmds(EVENT_BUFFILEPRE, NULL, NULL, FALSE, curbuf);
+    (void)setfname(curbuf, (char_u *)_("[Command Line]"), NULL, TRUE);
+    apply_autocmds(EVENT_BUFFILEPOST, NULL, NULL, FALSE, curbuf);
+    set_option_value_give_err((char_u *)"bt",
+					    0L, (char_u *)"nofile", OPT_LOCAL);
+    curbuf->b_p_ma = TRUE;
+#ifdef FEAT_FOLDING
+    curwin->w_p_fen = FALSE;
+#endif
+# ifdef FEAT_RIGHTLEFT
+    curwin->w_p_rl = cmdmsg_rl;
+    cmdmsg_rl = FALSE;
+# endif
+    RESET_BINDING(curwin);
+
+    // Don't allow switching to another buffer.
+    ++curbuf_lock;
+
+    // Showing the prompt may have set need_wait_return, reset it.
+    need_wait_return = FALSE;
+
+    histtype = hist_char2type(cmdwin_type);
+    if (histtype == HIST_CMD || histtype == HIST_DEBUG)
+    {
+	if (p_wc == TAB)
+	{
+	    add_map((char_u *)"<buffer> <Tab> <C-X><C-V>", MODE_INSERT, TRUE);
+	    add_map((char_u *)"<buffer> <Tab> a<C-X><C-V>", MODE_NORMAL, TRUE);
+	}
+	set_option_value_give_err((char_u *)"ft",
+					       0L, (char_u *)"vim", OPT_LOCAL);
+    }
+    --curbuf_lock;
+
+    // Reset 'textwidth' after setting 'filetype' (the Vim filetype plugin
+    // sets 'textwidth' to 78).
+    curbuf->b_p_tw = 0;
+
+    // Fill the buffer with the history.
+    init_history();
+    if (get_hislen() > 0)
+    {
+	i = *get_hisidx(histtype);
+	if (i >= 0)
+	{
+	    lnum = 0;
+	    do
+	    {
+		if (++i == get_hislen())
+		    i = 0;
+		if (get_histentry(histtype)[i].hisstr != NULL)
+		    ml_append(lnum++, get_histentry(histtype)[i].hisstr,
+							   (colnr_T)0, FALSE);
+	    }
+	    while (i != *get_hisidx(histtype));
+	}
+    }
+
+    // Replace the empty last line with the current command-line and put the
+    // cursor there.
+    ml_replace(curbuf->b_ml.ml_line_count, ccline.cmdbuff, TRUE);
+    curwin->w_cursor.lnum = curbuf->b_ml.ml_line_count;
+    curwin->w_cursor.col = ccline.cmdpos;
+    changed_line_abv_curs();
+    invalidate_botline();
+    redraw_later(UPD_SOME_VALID);
+
+    // No Ex mode here!
+    exmode_active = 0;
+
+    State = MODE_NORMAL;
+    setmouse();
+
+    // Reset here so it can be set by a CmdWinEnter autocommand.
+    cmdwin_result = 0;
+
+    // Trigger CmdwinEnter autocommands.
+    trigger_cmd_autocmd(cmdwin_type, EVENT_CMDWINENTER);
+    if (restart_edit != 0)	// autocmd with ":startinsert"
+	stuffcharReadbuff(K_NOP);
+
+    i = RedrawingDisabled;
+    RedrawingDisabled = 0;
+
+    /*
+     * Call the main loop until <CR> or CTRL-C is typed.
+     */
+    main_loop(TRUE, FALSE);
+
+    RedrawingDisabled = i;
+
+# ifdef FEAT_FOLDING
+    save_KeyTyped = KeyTyped;
+# endif
+
+    // Trigger CmdwinLeave autocommands.
+    trigger_cmd_autocmd(cmdwin_type, EVENT_CMDWINLEAVE);
+
+# ifdef FEAT_FOLDING
+    // Restore KeyTyped in case it is modified by autocommands
+    KeyTyped = save_KeyTyped;
+# endif
+
+    cmdwin_type = 0;
+    exmode_active = save_exmode;
+
+    // Safety check: The old window or buffer was deleted: It's a bug when
+    // this happens!
+    if (!win_valid(old_curwin) || !bufref_valid(&old_curbuf))
+    {
+	cmdwin_result = Ctrl_C;
+	emsg(_(e_active_window_or_buffer_deleted));
+    }
+    else
+    {
+# if defined(FEAT_EVAL)
+	// autocmds may abort script processing
+	if (aborting() && cmdwin_result != K_IGNORE)
+	    cmdwin_result = Ctrl_C;
+# endif
+	// Set the new command line from the cmdline buffer.
+	vim_free(ccline.cmdbuff);
+	if (cmdwin_result == K_XF1 || cmdwin_result == K_XF2) // :qa[!] typed
+	{
+	    char *p = (cmdwin_result == K_XF2) ? "qa" : "qa!";
+
+	    if (histtype == HIST_CMD)
+	    {
+		// Execute the command directly.
+		ccline.cmdbuff = vim_strsave((char_u *)p);
+		cmdwin_result = CAR;
+	    }
+	    else
+	    {
+		// First need to cancel what we were doing.
+		ccline.cmdbuff = NULL;
+		stuffcharReadbuff(':');
+		stuffReadbuff((char_u *)p);
+		stuffcharReadbuff(CAR);
+	    }
+	}
+	else if (cmdwin_result == K_XF2)	// :qa typed
+	{
+	    ccline.cmdbuff = vim_strsave((char_u *)"qa");
+	    cmdwin_result = CAR;
+	}
+	else if (cmdwin_result == Ctrl_C)
+	{
+	    // :q or :close, don't execute any command
+	    // and don't modify the cmd window.
+	    ccline.cmdbuff = NULL;
+	}
+	else
+	    ccline.cmdbuff = vim_strsave(ml_get_curline());
+	if (ccline.cmdbuff == NULL)
+	{
+	    ccline.cmdbuff = vim_strsave((char_u *)"");
+	    ccline.cmdlen = 0;
+	    ccline.cmdbufflen = 1;
+	    ccline.cmdpos = 0;
+	    cmdwin_result = Ctrl_C;
+	}
+	else
+	{
+	    ccline.cmdlen = (int)STRLEN(ccline.cmdbuff);
+	    ccline.cmdbufflen = ccline.cmdlen + 1;
+	    ccline.cmdpos = curwin->w_cursor.col;
+	    // If the cursor is on the last character, it probably should be
+	    // after it.
+	    if (ccline.cmdpos == ccline.cmdlen - 1
+		    || ccline.cmdpos > ccline.cmdlen)
+		ccline.cmdpos = ccline.cmdlen;
+	}
+
+# ifdef FEAT_CONCEAL
+	// Avoid command-line window first character being concealed.
+	curwin->w_p_cole = 0;
+# endif
+	// First go back to the original window.
+	wp = curwin;
+	set_bufref(&bufref, curbuf);
+
+	skip_win_fix_cursor = TRUE;
+	win_goto(old_curwin);
+
+	// win_goto() may trigger an autocommand that already closes the
+	// cmdline window.
+	if (win_valid(wp) && wp != curwin)
+	    win_close(wp, TRUE);
+
+	// win_close() may have already wiped the buffer when 'bh' is
+	// set to 'wipe', autocommands may have closed other windows
+	if (bufref_valid(&bufref) && bufref.br_buf != curbuf)
+	    close_buffer(NULL, bufref.br_buf, DOBUF_WIPE, FALSE, FALSE);
+
+	// Restore window sizes.
+	win_size_restore(&winsizes);
+	skip_win_fix_cursor = FALSE;
+
+	if (cmdwin_result == K_IGNORE)
+	{
+	    // It can be confusing that the cmdwin still shows, redraw the
+	    // screen.
+	    update_screen(UPD_VALID);
+	    set_cmdspos_cursor();
+	    redrawcmd();
+	}
+    }
+
+    ga_clear(&winsizes);
+    restart_edit = save_restart_edit;
+# ifdef FEAT_RIGHTLEFT
+    cmdmsg_rl = save_cmdmsg_rl;
+# endif
+
+    State = save_State;
+    may_trigger_modechanged();
+    setmouse();
+
+    return cmdwin_result;
+}
+
+/*
+ * Return TRUE if in the cmdwin, not editing the command line.
+ */
+    int
+is_in_cmdwin(void)
+{
+    return cmdwin_type != 0 && get_cmdline_type() == NUL;
+}
+
+/*
+ * Used for commands that either take a simple command string argument, or:
+ *	cmd << endmarker
+ *	  {script}
+ *	endmarker
+ * Returns a pointer to allocated memory with {script} or NULL.
+ */
+    char_u *
+script_get(exarg_T *eap UNUSED, char_u *cmd UNUSED)
+{
+#ifdef FEAT_EVAL
+    list_T	*l;
+    listitem_T	*li;
+    char_u	*s;
+    garray_T	ga;
+
+    if (cmd[0] != '<' || cmd[1] != '<' || eap->getline == NULL)
+	return NULL;
+    cmd += 2;
+
+    l = heredoc_get(eap, cmd, TRUE, FALSE);
+    if (l == NULL)
+	return NULL;
+
+    ga_init2(&ga, 1, 0x400);
+
+    FOR_ALL_LIST_ITEMS(l, li)
+    {
+	s = tv_get_string(&li->li_tv);
+	ga_concat(&ga, s);
+	ga_append(&ga, '\n');
+    }
+    ga_append(&ga, NUL);
+
+    list_free(l);
+    return (char_u *)ga.ga_data;
+#else
+    return NULL;
+#endif
+}
+
+#if defined(FEAT_EVAL) || defined(PROTO)
+/*
+ * This function is used by f_input() and f_inputdialog() functions. The third
+ * argument to f_input() specifies the type of completion to use at the
+ * prompt. The third argument to f_inputdialog() specifies the value to return
+ * when the user cancels the prompt.
+ */
+    void
+get_user_input(
+    typval_T	*argvars,
+    typval_T	*rettv,
+    int		inputdialog,
+    int		secret)
+{
+    char_u	*prompt;
+    char_u	*p = NULL;
+    int		c;
+    char_u	buf[NUMBUFLEN];
+    int		cmd_silent_save = cmd_silent;
+    char_u	*defstr = (char_u *)"";
+    int		xp_type = EXPAND_NOTHING;
+    char_u	*xp_arg = NULL;
+
+    rettv->v_type = VAR_STRING;
+    rettv->vval.v_string = NULL;
+    if (input_busy)
+	return;  // this doesn't work recursively.
+
+    if (in_vim9script()
+	    && (check_for_string_arg(argvars, 0) == FAIL
+		|| check_for_opt_string_arg(argvars, 1) == FAIL
+		|| (argvars[1].v_type != VAR_UNKNOWN
+		    && check_for_opt_string_arg(argvars, 2) == FAIL)))
+	return;
+
+    prompt = tv_get_string_chk(&argvars[0]);
+
+#ifdef NO_CONSOLE_INPUT
+    // While starting up, there is no place to enter text. When running tests
+    // with --not-a-term we assume feedkeys() will be used.
+    if (no_console_input() && !is_not_a_term())
+	return;
+#endif
+
+    cmd_silent = FALSE;		// Want to see the prompt.
+    if (prompt != NULL)
+    {
+	// Only the part of the message after the last NL is considered as
+	// prompt for the command line
+	p = vim_strrchr(prompt, '\n');
+	if (p == NULL)
+	    p = prompt;
+	else
+	{
+	    ++p;
+	    c = *p;
+	    *p = NUL;
+	    msg_start();
+	    msg_clr_eos();
+	    msg_puts_attr((char *)prompt, get_echo_attr());
+	    msg_didout = FALSE;
+	    msg_starthere();
+	    *p = c;
+	}
+	cmdline_row = msg_row;
+
+	if (argvars[1].v_type != VAR_UNKNOWN)
+	{
+	    defstr = tv_get_string_buf_chk(&argvars[1], buf);
+	    if (defstr != NULL)
+		stuffReadbuffSpec(defstr);
+
+	    if (!inputdialog && argvars[2].v_type != VAR_UNKNOWN)
+	    {
+		char_u	*xp_name;
+		int	xp_namelen;
+		long	argt = 0;
+
+		// input() with a third argument: completion
+		rettv->vval.v_string = NULL;
+
+		xp_name = tv_get_string_buf_chk(&argvars[2], buf);
+		if (xp_name == NULL)
+		    return;
+
+		xp_namelen = (int)STRLEN(xp_name);
+
+		if (parse_compl_arg(xp_name, xp_namelen, &xp_type, &argt,
+							     &xp_arg) == FAIL)
+		    return;
+	    }
+	}
+
+	if (defstr != NULL)
+	{
+	    int save_ex_normal_busy = ex_normal_busy;
+	    int save_vgetc_busy = vgetc_busy;
+	    int save_input_busy = input_busy;
+
+	    input_busy |= vgetc_busy;
+	    ex_normal_busy = 0;
+	    vgetc_busy = 0;
+	    rettv->vval.v_string =
+		getcmdline_prompt(secret ? NUL : '@', p, get_echo_attr(),
+							      xp_type, xp_arg);
+	    ex_normal_busy = save_ex_normal_busy;
+	    vgetc_busy = save_vgetc_busy;
+	    input_busy = save_input_busy;
+	}
+	if (inputdialog && rettv->vval.v_string == NULL
+		&& argvars[1].v_type != VAR_UNKNOWN
+		&& argvars[2].v_type != VAR_UNKNOWN)
+	    rettv->vval.v_string = vim_strsave(tv_get_string_buf(
+							   &argvars[2], buf));
+
+	vim_free(xp_arg);
+
+	// since the user typed this, no need to wait for return
+	need_wait_return = FALSE;
+	msg_didout = FALSE;
+    }
+    cmd_silent = cmd_silent_save;
+}
+#endif