vim: src/cmdexpand.c annotate

annotate src/cmdexpand.c @ 17779:87a8760babec v8.1.1886

patch 8.1.1886: command line expansion code is spread out commit https://github.com/vim/vim/commit/66b51420e0c8d49bcf6786b792c938d6099e3393 Author: Bram Moolenaar <Bram@vim.org> Date: Sun Aug 18 21:44:12 2019 +0200 patch 8.1.1886: command line expansion code is spread out Problem: Command line expansion code is spread out. Solution: Move the code to cmdexpand.c. (Yegappan Lakshmanan, closes https://github.com/vim/vim/issues/4831)

author	Bram Moolenaar <Bram@vim.org>
date	Sun, 18 Aug 2019 21:45:03 +0200
parents
children	04245f071792

rev	line source
17779 87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1 /* vi:set ts=8 sts=4 sw=4 noet:
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	2 *
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	3 * VIM - Vi IMproved by Bram Moolenaar
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	4 *
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	5 * Do ":help uganda" in Vim to read copying and usage conditions.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	6 * Do ":help credits" in Vim to see a list of people who contributed.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	7 * See README.txt for an overview of the Vim source code.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	8 */
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	9
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	10 /*
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	11 * cmdexpand.c: functions for command-line completion
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	12 */
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	13
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	14 #include "vim.h"
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	15
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	16 static int cmd_showtail; // Only show path tail in lists ?
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	17
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	18 static void set_expand_context(expand_T *xp);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	19 static int ExpandFromContext(expand_T xp, char_u , int , char_u **, int);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	20 static int expand_showtail(expand_T *xp);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	21 #ifdef FEAT_CMDL_COMPL
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	22 static int expand_shellcmd(char_u filepat, int num_file, char_u ***file, int flagsarg);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	23 static int ExpandRTDir(char_u pat, int flags, int num_file, char_u **file, char dirname[]);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	24 static int ExpandPackAddDir(char_u pat, int num_file, char_u ***file);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	25 # if defined(FEAT_EVAL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	26 static int ExpandUserDefined(expand_T xp, regmatch_T regmatch, int num_file, char_u **file);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	27 static int ExpandUserList(expand_T xp, int num_file, char_u ***file);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	28 # endif
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	29 #endif
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	30
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	31 #if defined(FEAT_CMDL_COMPL) \|\| defined(PROTO)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	32 static int
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	33 sort_func_compare(const void s1, const void s2)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	34 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	35 char_u p1 = (char_u **)s1;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	36 char_u p2 = (char_u **)s2;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	37
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	38 if (p1 != '<' && p2 == '<') return -1;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	39 if (p1 == '<' && p2 != '<') return 1;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	40 return STRCMP(p1, p2);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	41 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	42 #endif
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	43
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	44 static void
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	45 ExpandEscape(
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	46 expand_T *xp,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	47 char_u *str,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	48 int numfiles,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	49 char_u **files,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	50 int options)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	51 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	52 int i;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	53 char_u *p;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	54
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	55 // May change home directory back to "~"
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	56 if (options & WILD_HOME_REPLACE)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	57 tilde_replace(str, numfiles, files);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	58
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	59 if (options & WILD_ESCAPE)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	60 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	61 if (xp->xp_context == EXPAND_FILES
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	62 \|\| xp->xp_context == EXPAND_FILES_IN_PATH
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	63 \|\| xp->xp_context == EXPAND_SHELLCMD
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	64 \|\| xp->xp_context == EXPAND_BUFFERS
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	65 \|\| xp->xp_context == EXPAND_DIRECTORIES)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	66 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	67 // Insert a backslash into a file name before a space, \, %, #
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	68 // and wildmatch characters, except '~'.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	69 for (i = 0; i < numfiles; ++i)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	70 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	71 // for ":set path=" we need to escape spaces twice
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	72 if (xp->xp_backslash == XP_BS_THREE)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	73 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	74 p = vim_strsave_escaped(files[i], (char_u *)" ");
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	75 if (p != NULL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	76 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	77 vim_free(files[i]);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	78 files[i] = p;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	79 #if defined(BACKSLASH_IN_FILENAME)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	80 p = vim_strsave_escaped(files[i], (char_u *)" ");
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	81 if (p != NULL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	82 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	83 vim_free(files[i]);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	84 files[i] = p;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	85 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	86 #endif
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	87 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	88 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	89 #ifdef BACKSLASH_IN_FILENAME
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	90 p = vim_strsave_fnameescape(files[i], FALSE);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	91 #else
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	92 p = vim_strsave_fnameescape(files[i], xp->xp_shell);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	93 #endif
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	94 if (p != NULL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	95 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	96 vim_free(files[i]);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	97 files[i] = p;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	98 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	99
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	100 // If 'str' starts with "\~", replace "~" at start of
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	101 // files[i] with "\~".
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	102 if (str[0] == '\\' && str[1] == '~' && files[i][0] == '~')
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	103 escape_fname(&files[i]);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	104 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	105 xp->xp_backslash = XP_BS_NONE;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	106
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	107 // If the first file starts with a '+' escape it. Otherwise it
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	108 // could be seen as "+cmd".
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	109 if (*files[0] == '+')
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	110 escape_fname(&files[0]);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	111 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	112 else if (xp->xp_context == EXPAND_TAGS)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	113 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	114 // Insert a backslash before characters in a tag name that
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	115 // would terminate the ":tag" command.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	116 for (i = 0; i < numfiles; ++i)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	117 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	118 p = vim_strsave_escaped(files[i], (char_u *)"\\\|\"");
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	119 if (p != NULL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	120 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	121 vim_free(files[i]);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	122 files[i] = p;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	123 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	124 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	125 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	126 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	127 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	128
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	129 /*
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	130 * Return FAIL if this is not an appropriate context in which to do
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	131 * completion of anything, return OK if it is (even if there are no matches).
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	132 * For the caller, this means that the character is just passed through like a
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	133 * normal character (instead of being expanded). This allows :s/^I^D etc.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	134 */
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	135 int
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	136 nextwild(
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	137 expand_T *xp,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	138 int type,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	139 int options, // extra options for ExpandOne()
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	140 int escape) // if TRUE, escape the returned matches
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	141 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	142 cmdline_info_T *ccline = get_cmdline_info();
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	143 int i, j;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	144 char_u *p1;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	145 char_u *p2;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	146 int difflen;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	147 int v;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	148
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	149 if (xp->xp_numfiles == -1)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	150 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	151 set_expand_context(xp);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	152 cmd_showtail = expand_showtail(xp);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	153 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	154
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	155 if (xp->xp_context == EXPAND_UNSUCCESSFUL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	156 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	157 beep_flush();
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	158 return OK; // Something illegal on command line
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	159 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	160 if (xp->xp_context == EXPAND_NOTHING)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	161 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	162 // Caller can use the character as a normal char instead
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	163 return FAIL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	164 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	165
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	166 msg_puts("..."); // show that we are busy
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	167 out_flush();
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	168
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	169 i = (int)(xp->xp_pattern - ccline->cmdbuff);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	170 xp->xp_pattern_len = ccline->cmdpos - i;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	171
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	172 if (type == WILD_NEXT \|\| type == WILD_PREV)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	173 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	174 // Get next/previous match for a previous expanded pattern.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	175 p2 = ExpandOne(xp, NULL, NULL, 0, type);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	176 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	177 else
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	178 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	179 // Translate string into pattern and expand it.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	180 if ((p1 = addstar(xp->xp_pattern, xp->xp_pattern_len,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	181 xp->xp_context)) == NULL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	182 p2 = NULL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	183 else
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	184 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	185 int use_options = options \|
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	186 WILD_HOME_REPLACE\|WILD_ADD_SLASH\|WILD_SILENT;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	187 if (escape)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	188 use_options \|= WILD_ESCAPE;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	189
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	190 if (p_wic)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	191 use_options += WILD_ICASE;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	192 p2 = ExpandOne(xp, p1,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	193 vim_strnsave(&ccline->cmdbuff[i], xp->xp_pattern_len),
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	194 use_options, type);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	195 vim_free(p1);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	196 // longest match: make sure it is not shorter, happens with :help
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	197 if (p2 != NULL && type == WILD_LONGEST)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	198 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	199 for (j = 0; j < xp->xp_pattern_len; ++j)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	200 if (ccline->cmdbuff[i + j] == '*'
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	201 \|\| ccline->cmdbuff[i + j] == '?')
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	202 break;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	203 if ((int)STRLEN(p2) < j)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	204 VIM_CLEAR(p2);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	205 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	206 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	207 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	208
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	209 if (p2 != NULL && !got_int)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	210 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	211 difflen = (int)STRLEN(p2) - xp->xp_pattern_len;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	212 if (ccline->cmdlen + difflen + 4 > ccline->cmdbufflen)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	213 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	214 v = realloc_cmdbuff(ccline->cmdlen + difflen + 4);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	215 xp->xp_pattern = ccline->cmdbuff + i;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	216 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	217 else
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	218 v = OK;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	219 if (v == OK)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	220 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	221 mch_memmove(&ccline->cmdbuff[ccline->cmdpos + difflen],
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	222 &ccline->cmdbuff[ccline->cmdpos],
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	223 (size_t)(ccline->cmdlen - ccline->cmdpos + 1));
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	224 mch_memmove(&ccline->cmdbuff[i], p2, STRLEN(p2));
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	225 ccline->cmdlen += difflen;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	226 ccline->cmdpos += difflen;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	227 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	228 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	229 vim_free(p2);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	230
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	231 redrawcmd();
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	232 cursorcmd();
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	233
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	234 // When expanding a ":map" command and no matches are found, assume that
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	235 // the key is supposed to be inserted literally
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	236 if (xp->xp_context == EXPAND_MAPPINGS && p2 == NULL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	237 return FAIL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	238
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	239 if (xp->xp_numfiles <= 0 && p2 == NULL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	240 beep_flush();
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	241 else if (xp->xp_numfiles == 1)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	242 // free expanded pattern
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	243 (void)ExpandOne(xp, NULL, NULL, 0, WILD_FREE);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	244
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	245 return OK;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	246 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	247
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	248 /*
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	249 * Do wildcard expansion on the string 'str'.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	250 * Chars that should not be expanded must be preceded with a backslash.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	251 * Return a pointer to allocated memory containing the new string.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	252 * Return NULL for failure.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	253 *
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	254 * "orig" is the originally expanded string, copied to allocated memory. It
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	255 * should either be kept in orig_save or freed. When "mode" is WILD_NEXT or
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	256 * WILD_PREV "orig" should be NULL.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	257 *
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	258 * Results are cached in xp->xp_files and xp->xp_numfiles, except when "mode"
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	259 * is WILD_EXPAND_FREE or WILD_ALL.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	260 *
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	261 * mode = WILD_FREE: just free previously expanded matches
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	262 * mode = WILD_EXPAND_FREE: normal expansion, do not keep matches
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	263 * mode = WILD_EXPAND_KEEP: normal expansion, keep matches
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	264 * mode = WILD_NEXT: use next match in multiple match, wrap to first
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	265 * mode = WILD_PREV: use previous match in multiple match, wrap to first
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	266 * mode = WILD_ALL: return all matches concatenated
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	267 * mode = WILD_LONGEST: return longest matched part
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	268 * mode = WILD_ALL_KEEP: get all matches, keep matches
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	269 *
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	270 * options = WILD_LIST_NOTFOUND: list entries without a match
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	271 * options = WILD_HOME_REPLACE: do home_replace() for buffer names
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	272 * options = WILD_USE_NL: Use '\n' for WILD_ALL
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	273 * options = WILD_NO_BEEP: Don't beep for multiple matches
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	274 * options = WILD_ADD_SLASH: add a slash after directory names
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	275 * options = WILD_KEEP_ALL: don't remove 'wildignore' entries
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	276 * options = WILD_SILENT: don't print warning messages
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	277 * options = WILD_ESCAPE: put backslash before special chars
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	278 * options = WILD_ICASE: ignore case for files
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	279 *
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	280 * The variables xp->xp_context and xp->xp_backslash must have been set!
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	281 */
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	282 char_u *
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	283 ExpandOne(
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	284 expand_T *xp,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	285 char_u *str,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	286 char_u *orig, // allocated copy of original of expanded string
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	287 int options,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	288 int mode)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	289 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	290 char_u *ss = NULL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	291 static int findex;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	292 static char_u *orig_save = NULL; // kept value of orig
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	293 int orig_saved = FALSE;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	294 int i;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	295 long_u len;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	296 int non_suf_match; // number without matching suffix
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	297
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	298 // first handle the case of using an old match
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	299 if (mode == WILD_NEXT \|\| mode == WILD_PREV)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	300 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	301 if (xp->xp_numfiles > 0)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	302 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	303 if (mode == WILD_PREV)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	304 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	305 if (findex == -1)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	306 findex = xp->xp_numfiles;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	307 --findex;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	308 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	309 else // mode == WILD_NEXT
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	310 ++findex;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	311
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	312 // When wrapping around, return the original string, set findex to
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	313 // -1.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	314 if (findex < 0)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	315 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	316 if (orig_save == NULL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	317 findex = xp->xp_numfiles - 1;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	318 else
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	319 findex = -1;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	320 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	321 if (findex >= xp->xp_numfiles)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	322 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	323 if (orig_save == NULL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	324 findex = 0;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	325 else
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	326 findex = -1;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	327 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	328 #ifdef FEAT_WILDMENU
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	329 if (p_wmnu)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	330 win_redr_status_matches(xp, xp->xp_numfiles, xp->xp_files,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	331 findex, cmd_showtail);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	332 #endif
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	333 if (findex == -1)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	334 return vim_strsave(orig_save);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	335 return vim_strsave(xp->xp_files[findex]);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	336 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	337 else
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	338 return NULL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	339 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	340
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	341 // free old names
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	342 if (xp->xp_numfiles != -1 && mode != WILD_ALL && mode != WILD_LONGEST)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	343 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	344 FreeWild(xp->xp_numfiles, xp->xp_files);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	345 xp->xp_numfiles = -1;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	346 VIM_CLEAR(orig_save);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	347 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	348 findex = 0;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	349
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	350 if (mode == WILD_FREE) // only release file name
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	351 return NULL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	352
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	353 if (xp->xp_numfiles == -1)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	354 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	355 vim_free(orig_save);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	356 orig_save = orig;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	357 orig_saved = TRUE;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	358
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	359 // Do the expansion.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	360 if (ExpandFromContext(xp, str, &xp->xp_numfiles, &xp->xp_files,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	361 options) == FAIL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	362 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	363 #ifdef FNAME_ILLEGAL
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	364 // Illegal file name has been silently skipped. But when there
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	365 // are wildcards, the real problem is that there was no match,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	366 // causing the pattern to be added, which has illegal characters.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	367 if (!(options & WILD_SILENT) && (options & WILD_LIST_NOTFOUND))
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	368 semsg(_(e_nomatch2), str);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	369 #endif
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	370 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	371 else if (xp->xp_numfiles == 0)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	372 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	373 if (!(options & WILD_SILENT))
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	374 semsg(_(e_nomatch2), str);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	375 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	376 else
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	377 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	378 // Escape the matches for use on the command line.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	379 ExpandEscape(xp, str, xp->xp_numfiles, xp->xp_files, options);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	380
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	381 // Check for matching suffixes in file names.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	382 if (mode != WILD_ALL && mode != WILD_ALL_KEEP
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	383 && mode != WILD_LONGEST)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	384 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	385 if (xp->xp_numfiles)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	386 non_suf_match = xp->xp_numfiles;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	387 else
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	388 non_suf_match = 1;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	389 if ((xp->xp_context == EXPAND_FILES
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	390 \|\| xp->xp_context == EXPAND_DIRECTORIES)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	391 && xp->xp_numfiles > 1)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	392 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	393 // More than one match; check suffix.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	394 // The files will have been sorted on matching suffix in
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	395 // expand_wildcards, only need to check the first two.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	396 non_suf_match = 0;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	397 for (i = 0; i < 2; ++i)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	398 if (match_suffix(xp->xp_files[i]))
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	399 ++non_suf_match;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	400 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	401 if (non_suf_match != 1)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	402 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	403 // Can we ever get here unless it's while expanding
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	404 // interactively? If not, we can get rid of this all
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	405 // together. Don't really want to wait for this message
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	406 // (and possibly have to hit return to continue!).
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	407 if (!(options & WILD_SILENT))
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	408 emsg(_(e_toomany));
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	409 else if (!(options & WILD_NO_BEEP))
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	410 beep_flush();
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	411 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	412 if (!(non_suf_match != 1 && mode == WILD_EXPAND_FREE))
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	413 ss = vim_strsave(xp->xp_files[0]);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	414 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	415 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	416 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	417
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	418 // Find longest common part
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	419 if (mode == WILD_LONGEST && xp->xp_numfiles > 0)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	420 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	421 int mb_len = 1;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	422 int c0, ci;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	423
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	424 for (len = 0; xp->xp_files[0][len]; len += mb_len)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	425 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	426 if (has_mbyte)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	427 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	428 mb_len = (*mb_ptr2len)(&xp->xp_files[0][len]);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	429 c0 =(* mb_ptr2char)(&xp->xp_files[0][len]);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	430 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	431 else
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	432 c0 = xp->xp_files[0][len];
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	433 for (i = 1; i < xp->xp_numfiles; ++i)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	434 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	435 if (has_mbyte)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	436 ci =(* mb_ptr2char)(&xp->xp_files[i][len]);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	437 else
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	438 ci = xp->xp_files[i][len];
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	439 if (p_fic && (xp->xp_context == EXPAND_DIRECTORIES
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	440 \|\| xp->xp_context == EXPAND_FILES
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	441 \|\| xp->xp_context == EXPAND_SHELLCMD
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	442 \|\| xp->xp_context == EXPAND_BUFFERS))
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	443 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	444 if (MB_TOLOWER(c0) != MB_TOLOWER(ci))
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	445 break;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	446 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	447 else if (c0 != ci)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	448 break;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	449 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	450 if (i < xp->xp_numfiles)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	451 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	452 if (!(options & WILD_NO_BEEP))
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	453 vim_beep(BO_WILD);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	454 break;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	455 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	456 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	457
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	458 ss = alloc(len + 1);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	459 if (ss)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	460 vim_strncpy(ss, xp->xp_files[0], (size_t)len);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	461 findex = -1; // next p_wc gets first one
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	462 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	463
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	464 // Concatenate all matching names
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	465 if (mode == WILD_ALL && xp->xp_numfiles > 0)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	466 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	467 len = 0;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	468 for (i = 0; i < xp->xp_numfiles; ++i)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	469 len += (long_u)STRLEN(xp->xp_files[i]) + 1;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	470 ss = alloc(len);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	471 if (ss != NULL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	472 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	473 *ss = NUL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	474 for (i = 0; i < xp->xp_numfiles; ++i)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	475 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	476 STRCAT(ss, xp->xp_files[i]);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	477 if (i != xp->xp_numfiles - 1)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	478 STRCAT(ss, (options & WILD_USE_NL) ? "\n" : " ");
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	479 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	480 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	481 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	482
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	483 if (mode == WILD_EXPAND_FREE \|\| mode == WILD_ALL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	484 ExpandCleanup(xp);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	485
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	486 // Free "orig" if it wasn't stored in "orig_save".
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	487 if (!orig_saved)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	488 vim_free(orig);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	489
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	490 return ss;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	491 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	492
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	493 /*
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	494 * Prepare an expand structure for use.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	495 */
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	496 void
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	497 ExpandInit(expand_T *xp)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	498 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	499 xp->xp_pattern = NULL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	500 xp->xp_pattern_len = 0;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	501 xp->xp_backslash = XP_BS_NONE;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	502 #ifndef BACKSLASH_IN_FILENAME
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	503 xp->xp_shell = FALSE;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	504 #endif
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	505 xp->xp_numfiles = -1;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	506 xp->xp_files = NULL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	507 #if defined(FEAT_EVAL) && defined(FEAT_CMDL_COMPL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	508 xp->xp_arg = NULL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	509 #endif
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	510 xp->xp_line = NULL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	511 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	512
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	513 /*
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	514 * Cleanup an expand structure after use.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	515 */
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	516 void
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	517 ExpandCleanup(expand_T *xp)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	518 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	519 if (xp->xp_numfiles >= 0)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	520 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	521 FreeWild(xp->xp_numfiles, xp->xp_files);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	522 xp->xp_numfiles = -1;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	523 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	524 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	525
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	526 /*
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	527 * Show all matches for completion on the command line.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	528 * Returns EXPAND_NOTHING when the character that triggered expansion should
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	529 * be inserted like a normal character.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	530 */
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	531 int
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	532 showmatches(expand_T *xp, int wildmenu UNUSED)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	533 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	534 cmdline_info_T *ccline = get_cmdline_info();
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	535 #define L_SHOWFILE(m) (showtail ? sm_gettail(files_found[m]) : files_found[m])
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	536 int num_files;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	537 char_u **files_found;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	538 int i, j, k;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	539 int maxlen;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	540 int lines;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	541 int columns;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	542 char_u *p;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	543 int lastlen;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	544 int attr;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	545 int showtail;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	546
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	547 if (xp->xp_numfiles == -1)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	548 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	549 set_expand_context(xp);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	550 i = expand_cmdline(xp, ccline->cmdbuff, ccline->cmdpos,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	551 &num_files, &files_found);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	552 showtail = expand_showtail(xp);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	553 if (i != EXPAND_OK)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	554 return i;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	555
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	556 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	557 else
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	558 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	559 num_files = xp->xp_numfiles;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	560 files_found = xp->xp_files;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	561 showtail = cmd_showtail;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	562 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	563
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	564 #ifdef FEAT_WILDMENU
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	565 if (!wildmenu)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	566 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	567 #endif
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	568 msg_didany = FALSE; // lines_left will be set
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	569 msg_start(); // prepare for paging
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	570 msg_putchar('\n');
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	571 out_flush();
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	572 cmdline_row = msg_row;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	573 msg_didany = FALSE; // lines_left will be set again
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	574 msg_start(); // prepare for paging
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	575 #ifdef FEAT_WILDMENU
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	576 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	577 #endif
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	578
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	579 if (got_int)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	580 got_int = FALSE; // only int. the completion, not the cmd line
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	581 #ifdef FEAT_WILDMENU
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	582 else if (wildmenu)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	583 win_redr_status_matches(xp, num_files, files_found, -1, showtail);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	584 #endif
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	585 else
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	586 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	587 // find the length of the longest file name
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	588 maxlen = 0;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	589 for (i = 0; i < num_files; ++i)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	590 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	591 if (!showtail && (xp->xp_context == EXPAND_FILES
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	592 \|\| xp->xp_context == EXPAND_SHELLCMD
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	593 \|\| xp->xp_context == EXPAND_BUFFERS))
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	594 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	595 home_replace(NULL, files_found[i], NameBuff, MAXPATHL, TRUE);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	596 j = vim_strsize(NameBuff);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	597 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	598 else
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	599 j = vim_strsize(L_SHOWFILE(i));
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	600 if (j > maxlen)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	601 maxlen = j;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	602 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	603
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	604 if (xp->xp_context == EXPAND_TAGS_LISTFILES)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	605 lines = num_files;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	606 else
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	607 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	608 // compute the number of columns and lines for the listing
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	609 maxlen += 2; // two spaces between file names
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	610 columns = ((int)Columns + 2) / maxlen;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	611 if (columns < 1)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	612 columns = 1;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	613 lines = (num_files + columns - 1) / columns;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	614 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	615
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	616 attr = HL_ATTR(HLF_D); // find out highlighting for directories
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	617
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	618 if (xp->xp_context == EXPAND_TAGS_LISTFILES)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	619 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	620 msg_puts_attr(_("tagname"), HL_ATTR(HLF_T));
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	621 msg_clr_eos();
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	622 msg_advance(maxlen - 3);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	623 msg_puts_attr(_(" kind file\n"), HL_ATTR(HLF_T));
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	624 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	625
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	626 // list the files line by line
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	627 for (i = 0; i < lines; ++i)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	628 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	629 lastlen = 999;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	630 for (k = i; k < num_files; k += lines)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	631 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	632 if (xp->xp_context == EXPAND_TAGS_LISTFILES)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	633 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	634 msg_outtrans_attr(files_found[k], HL_ATTR(HLF_D));
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	635 p = files_found[k] + STRLEN(files_found[k]) + 1;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	636 msg_advance(maxlen + 1);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	637 msg_puts((char *)p);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	638 msg_advance(maxlen + 3);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	639 msg_outtrans_long_attr(p + 2, HL_ATTR(HLF_D));
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	640 break;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	641 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	642 for (j = maxlen - lastlen; --j >= 0; )
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	643 msg_putchar(' ');
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	644 if (xp->xp_context == EXPAND_FILES
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	645 \|\| xp->xp_context == EXPAND_SHELLCMD
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	646 \|\| xp->xp_context == EXPAND_BUFFERS)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	647 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	648 // highlight directories
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	649 if (xp->xp_numfiles != -1)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	650 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	651 char_u *halved_slash;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	652 char_u *exp_path;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	653
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	654 // Expansion was done before and special characters
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	655 // were escaped, need to halve backslashes. Also
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	656 // $HOME has been replaced with ~/.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	657 exp_path = expand_env_save_opt(files_found[k], TRUE);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	658 halved_slash = backslash_halve_save(
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	659 exp_path != NULL ? exp_path : files_found[k]);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	660 j = mch_isdir(halved_slash != NULL ? halved_slash
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	661 : files_found[k]);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	662 vim_free(exp_path);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	663 vim_free(halved_slash);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	664 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	665 else
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	666 // Expansion was done here, file names are literal.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	667 j = mch_isdir(files_found[k]);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	668 if (showtail)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	669 p = L_SHOWFILE(k);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	670 else
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	671 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	672 home_replace(NULL, files_found[k], NameBuff, MAXPATHL,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	673 TRUE);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	674 p = NameBuff;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	675 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	676 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	677 else
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	678 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	679 j = FALSE;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	680 p = L_SHOWFILE(k);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	681 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	682 lastlen = msg_outtrans_attr(p, j ? attr : 0);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	683 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	684 if (msg_col > 0) // when not wrapped around
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	685 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	686 msg_clr_eos();
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	687 msg_putchar('\n');
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	688 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	689 out_flush(); // show one line at a time
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	690 if (got_int)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	691 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	692 got_int = FALSE;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	693 break;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	694 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	695 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	696
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	697 // we redraw the command below the lines that we have just listed
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	698 // This is a bit tricky, but it saves a lot of screen updating.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	699 cmdline_row = msg_row; // will put it back later
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	700 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	701
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	702 if (xp->xp_numfiles == -1)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	703 FreeWild(num_files, files_found);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	704
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	705 return EXPAND_OK;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	706 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	707
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	708 /*
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	709 * Private gettail for showmatches() (and win_redr_status_matches()):
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	710 * Find tail of file name path, but ignore trailing "/".
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	711 */
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	712 char_u *
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	713 sm_gettail(char_u *s)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	714 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	715 char_u *p;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	716 char_u *t = s;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	717 int had_sep = FALSE;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	718
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	719 for (p = s; *p != NUL; )
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	720 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	721 if (vim_ispathsep(*p)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	722 #ifdef BACKSLASH_IN_FILENAME
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	723 && !rem_backslash(p)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	724 #endif
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	725 )
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	726 had_sep = TRUE;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	727 else if (had_sep)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	728 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	729 t = p;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	730 had_sep = FALSE;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	731 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	732 MB_PTR_ADV(p);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	733 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	734 return t;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	735 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	736
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	737 /*
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	738 * Return TRUE if we only need to show the tail of completion matches.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	739 * When not completing file names or there is a wildcard in the path FALSE is
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	740 * returned.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	741 */
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	742 static int
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	743 expand_showtail(expand_T *xp)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	744 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	745 char_u *s;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	746 char_u *end;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	747
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	748 // When not completing file names a "/" may mean something different.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	749 if (xp->xp_context != EXPAND_FILES
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	750 && xp->xp_context != EXPAND_SHELLCMD
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	751 && xp->xp_context != EXPAND_DIRECTORIES)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	752 return FALSE;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	753
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	754 end = gettail(xp->xp_pattern);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	755 if (end == xp->xp_pattern) // there is no path separator
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	756 return FALSE;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	757
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	758 for (s = xp->xp_pattern; s < end; s++)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	759 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	760 // Skip escaped wildcards. Only when the backslash is not a path
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	761 // separator, on DOS the '' "path\\file" must not be skipped.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	762 if (rem_backslash(s))
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	763 ++s;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	764 else if (vim_strchr((char_u )"?[", *s) != NULL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	765 return FALSE;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	766 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	767 return TRUE;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	768 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	769
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	770 /*
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	771 * Prepare a string for expansion.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	772 * When expanding file names: The string will be used with expand_wildcards().
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	773 * Copy "fname[len]" into allocated memory and add a '*' at the end.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	774 * When expanding other names: The string will be used with regcomp(). Copy
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	775 * the name into allocated memory and prepend "^".
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	776 */
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	777 char_u *
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	778 addstar(
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	779 char_u *fname,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	780 int len,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	781 int context) // EXPAND_FILES etc.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	782 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	783 char_u *retval;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	784 int i, j;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	785 int new_len;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	786 char_u *tail;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	787 int ends_in_star;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	788
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	789 if (context != EXPAND_FILES
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	790 && context != EXPAND_FILES_IN_PATH
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	791 && context != EXPAND_SHELLCMD
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	792 && context != EXPAND_DIRECTORIES)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	793 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	794 // Matching will be done internally (on something other than files).
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	795 // So we convert the file-matching-type wildcards into our kind for
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	796 // use with vim_regcomp(). First work out how long it will be:
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	797
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	798 // For help tags the translation is done in find_help_tags().
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	799 // For a tag pattern starting with "/" no translation is needed.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	800 if (context == EXPAND_HELP
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	801 \|\| context == EXPAND_COLORS
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	802 \|\| context == EXPAND_COMPILER
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	803 \|\| context == EXPAND_OWNSYNTAX
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	804 \|\| context == EXPAND_FILETYPE
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	805 \|\| context == EXPAND_PACKADD
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	806 \|\| ((context == EXPAND_TAGS_LISTFILES
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	807 \|\| context == EXPAND_TAGS)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	808 && fname[0] == '/'))
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	809 retval = vim_strnsave(fname, len);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	810 else
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	811 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	812 new_len = len + 2; // +2 for '^' at start, NUL at end
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	813 for (i = 0; i < len; i++)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	814 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	815 if (fname[i] == '*' \|\| fname[i] == '~')
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	816 new_len++; // '' needs to be replaced by "."
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	817 // '~' needs to be replaced by "\~"
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	818
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	819 // Buffer names are like file names. "." should be literal
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	820 if (context == EXPAND_BUFFERS && fname[i] == '.')
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	821 new_len++; // "." becomes "\."
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	822
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	823 // Custom expansion takes care of special things, match
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	824 // backslashes literally (perhaps also for other types?)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	825 if ((context == EXPAND_USER_DEFINED
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	826 \|\| context == EXPAND_USER_LIST) && fname[i] == '\\')
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	827 new_len++; // '\' becomes "\\"
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	828 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	829 retval = alloc(new_len);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	830 if (retval != NULL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	831 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	832 retval[0] = '^';
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	833 j = 1;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	834 for (i = 0; i < len; i++, j++)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	835 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	836 // Skip backslash. But why? At least keep it for custom
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	837 // expansion.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	838 if (context != EXPAND_USER_DEFINED
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	839 && context != EXPAND_USER_LIST
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	840 && fname[i] == '\\'
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	841 && ++i == len)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	842 break;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	843
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	844 switch (fname[i])
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	845 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	846 case '*': retval[j++] = '.';
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	847 break;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	848 case '~': retval[j++] = '\\';
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	849 break;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	850 case '?': retval[j] = '.';
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	851 continue;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	852 case '.': if (context == EXPAND_BUFFERS)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	853 retval[j++] = '\\';
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	854 break;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	855 case '\\': if (context == EXPAND_USER_DEFINED
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	856 \|\| context == EXPAND_USER_LIST)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	857 retval[j++] = '\\';
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	858 break;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	859 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	860 retval[j] = fname[i];
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	861 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	862 retval[j] = NUL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	863 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	864 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	865 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	866 else
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	867 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	868 retval = alloc(len + 4);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	869 if (retval != NULL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	870 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	871 vim_strncpy(retval, fname, len);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	872
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	873 // Don't add a star to *, ~, ~user, $var or `cmd`.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	874 // * would become **, which walks the whole tree.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	875 // ~ would be at the start of the file name, but not the tail.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	876 // $ could be anywhere in the tail.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	877 // ` could be anywhere in the file name.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	878 // When the name ends in '$' don't add a star, remove the '$'.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	879 tail = gettail(retval);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	880 ends_in_star = (len > 0 && retval[len - 1] == '*');
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	881 #ifndef BACKSLASH_IN_FILENAME
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	882 for (i = len - 2; i >= 0; --i)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	883 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	884 if (retval[i] != '\\')
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	885 break;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	886 ends_in_star = !ends_in_star;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	887 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	888 #endif
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	889 if ((*retval != '~' \|\| tail != retval)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	890 && !ends_in_star
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	891 && vim_strchr(tail, '$') == NULL
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	892 && vim_strchr(retval, '`') == NULL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	893 retval[len++] = '*';
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	894 else if (len > 0 && retval[len - 1] == '$')
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	895 --len;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	896 retval[len] = NUL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	897 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	898 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	899 return retval;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	900 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	901
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	902 /*
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	903 * Must parse the command line so far to work out what context we are in.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	904 * Completion can then be done based on that context.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	905 * This routine sets the variables:
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	906 * xp->xp_pattern The start of the pattern to be expanded within
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	907 * the command line (ends at the cursor).
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	908 * xp->xp_context The type of thing to expand. Will be one of:
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	909 *
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	910 * EXPAND_UNSUCCESSFUL Used sometimes when there is something illegal on
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	911 * the command line, like an unknown command. Caller
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	912 * should beep.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	913 * EXPAND_NOTHING Unrecognised context for completion, use char like
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	914 * a normal char, rather than for completion. eg
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	915 * :s/^I/
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	916 * EXPAND_COMMANDS Cursor is still touching the command, so complete
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	917 * it.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	918 * EXPAND_BUFFERS Complete file names for :buf and :sbuf commands.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	919 * EXPAND_FILES After command with EX_XFILE set, or after setting
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	920 * with P_EXPAND set. eg :e ^I, :w>>^I
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	921 * EXPAND_DIRECTORIES In some cases this is used instead of the latter
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	922 * when we know only directories are of interest. eg
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	923 * :set dir=^I
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	924 * EXPAND_SHELLCMD After ":!cmd", ":r !cmd" or ":w !cmd".
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	925 * EXPAND_SETTINGS Complete variable names. eg :set d^I
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	926 * EXPAND_BOOL_SETTINGS Complete boolean variables only, eg :set no^I
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	927 * EXPAND_TAGS Complete tags from the files in p_tags. eg :ta a^I
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	928 * EXPAND_TAGS_LISTFILES As above, but list filenames on ^D, after :tselect
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	929 * EXPAND_HELP Complete tags from the file 'helpfile'/tags
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	930 * EXPAND_EVENTS Complete event names
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	931 * EXPAND_SYNTAX Complete :syntax command arguments
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	932 * EXPAND_HIGHLIGHT Complete highlight (syntax) group names
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	933 * EXPAND_AUGROUP Complete autocommand group names
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	934 * EXPAND_USER_VARS Complete user defined variable names, eg :unlet a^I
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	935 * EXPAND_MAPPINGS Complete mapping and abbreviation names,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	936 * eg :unmap a^I , :cunab x^I
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	937 * EXPAND_FUNCTIONS Complete internal or user defined function names,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	938 * eg :call sub^I
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	939 * EXPAND_USER_FUNC Complete user defined function names, eg :delf F^I
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	940 * EXPAND_EXPRESSION Complete internal or user defined function/variable
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	941 * names in expressions, eg :while s^I
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	942 * EXPAND_ENV_VARS Complete environment variable names
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	943 * EXPAND_USER Complete user names
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	944 */
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	945 static void
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	946 set_expand_context(expand_T *xp)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	947 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	948 cmdline_info_T *ccline = get_cmdline_info();
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	949
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	950 // only expansion for ':', '>' and '=' command-lines
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	951 if (ccline->cmdfirstc != ':'
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	952 #ifdef FEAT_EVAL
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	953 && ccline->cmdfirstc != '>' && ccline->cmdfirstc != '='
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	954 && !ccline->input_fn
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	955 #endif
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	956 )
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	957 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	958 xp->xp_context = EXPAND_NOTHING;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	959 return;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	960 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	961 set_cmd_context(xp, ccline->cmdbuff, ccline->cmdlen, ccline->cmdpos, TRUE);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	962 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	963
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	964 void
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	965 set_cmd_context(
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	966 expand_T *xp,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	967 char_u *str, // start of command line
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	968 int len, // length of command line (excl. NUL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	969 int col, // position of cursor
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	970 int use_ccline UNUSED) // use ccline for info
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	971 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	972 #ifdef FEAT_EVAL
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	973 cmdline_info_T *ccline = get_cmdline_info();
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	974 #endif
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	975 int old_char = NUL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	976 char_u *nextcomm;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	977
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	978 // Avoid a UMR warning from Purify, only save the character if it has been
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	979 // written before.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	980 if (col < len)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	981 old_char = str[col];
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	982 str[col] = NUL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	983 nextcomm = str;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	984
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	985 #ifdef FEAT_EVAL
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	986 if (use_ccline && ccline->cmdfirstc == '=')
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	987 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	988 # ifdef FEAT_CMDL_COMPL
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	989 // pass CMD_SIZE because there is no real command
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	990 set_context_for_expression(xp, str, CMD_SIZE);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	991 # endif
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	992 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	993 else if (use_ccline && ccline->input_fn)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	994 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	995 xp->xp_context = ccline->xp_context;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	996 xp->xp_pattern = ccline->cmdbuff;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	997 # if defined(FEAT_CMDL_COMPL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	998 xp->xp_arg = ccline->xp_arg;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	999 # endif
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1000 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1001 else
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1002 #endif
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1003 while (nextcomm != NULL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1004 nextcomm = set_one_cmd_context(xp, nextcomm);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1005
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1006 // Store the string here so that call_user_expand_func() can get to them
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1007 // easily.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1008 xp->xp_line = str;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1009 xp->xp_col = col;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1010
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1011 str[col] = old_char;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1012 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1013
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1014 /*
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1015 * Expand the command line "str" from context "xp".
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1016 * "xp" must have been set by set_cmd_context().
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1017 * xp->xp_pattern points into "str", to where the text that is to be expanded
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1018 * starts.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1019 * Returns EXPAND_UNSUCCESSFUL when there is something illegal before the
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1020 * cursor.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1021 * Returns EXPAND_NOTHING when there is nothing to expand, might insert the
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1022 * key that triggered expansion literally.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1023 * Returns EXPAND_OK otherwise.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1024 */
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1025 int
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1026 expand_cmdline(
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1027 expand_T *xp,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1028 char_u *str, // start of command line
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1029 int col, // position of cursor
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1030 int *matchcount, // return: nr of matches
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1031 char_u ***matches) // return: array of pointers to matches
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1032 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1033 char_u *file_str = NULL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1034 int options = WILD_ADD_SLASH\|WILD_SILENT;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1035
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1036 if (xp->xp_context == EXPAND_UNSUCCESSFUL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1037 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1038 beep_flush();
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1039 return EXPAND_UNSUCCESSFUL; // Something illegal on command line
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1040 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1041 if (xp->xp_context == EXPAND_NOTHING)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1042 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1043 // Caller can use the character as a normal char instead
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1044 return EXPAND_NOTHING;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1045 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1046
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1047 // add star to file name, or convert to regexp if not exp. files.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1048 xp->xp_pattern_len = (int)(str + col - xp->xp_pattern);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1049 file_str = addstar(xp->xp_pattern, xp->xp_pattern_len, xp->xp_context);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1050 if (file_str == NULL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1051 return EXPAND_UNSUCCESSFUL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1052
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1053 if (p_wic)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1054 options += WILD_ICASE;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1055
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1056 // find all files that match the description
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1057 if (ExpandFromContext(xp, file_str, matchcount, matches, options) == FAIL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1058 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1059 *matchcount = 0;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1060 *matches = NULL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1061 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1062 vim_free(file_str);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1063
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1064 return EXPAND_OK;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1065 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1066
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1067 #ifdef FEAT_MULTI_LANG
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1068 /*
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1069 * Cleanup matches for help tags:
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1070 * Remove "@ab" if the top of 'helplang' is "ab" and the language of the first
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1071 * tag matches it. Otherwise remove "@en" if "en" is the only language.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1072 */
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1073 static void
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1074 cleanup_help_tags(int num_file, char_u **file)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1075 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1076 int i, j;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1077 int len;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1078 char_u buf[4];
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1079 char_u *p = buf;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1080
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1081 if (p_hlg[0] != NUL && (p_hlg[0] != 'e' \|\| p_hlg[1] != 'n'))
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1082 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1083 *p++ = '@';
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1084 *p++ = p_hlg[0];
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1085 *p++ = p_hlg[1];
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1086 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1087 *p = NUL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1088
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1089 for (i = 0; i < num_file; ++i)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1090 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1091 len = (int)STRLEN(file[i]) - 3;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1092 if (len <= 0)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1093 continue;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1094 if (STRCMP(file[i] + len, "@en") == 0)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1095 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1096 // Sorting on priority means the same item in another language may
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1097 // be anywhere. Search all items for a match up to the "@en".
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1098 for (j = 0; j < num_file; ++j)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1099 if (j != i && (int)STRLEN(file[j]) == len + 3
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1100 && STRNCMP(file[i], file[j], len + 1) == 0)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1101 break;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1102 if (j == num_file)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1103 // item only exists with @en, remove it
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1104 file[i][len] = NUL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1105 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1106 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1107
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1108 if (*buf != NUL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1109 for (i = 0; i < num_file; ++i)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1110 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1111 len = (int)STRLEN(file[i]) - 3;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1112 if (len <= 0)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1113 continue;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1114 if (STRCMP(file[i] + len, buf) == 0)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1115 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1116 // remove the default language
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1117 file[i][len] = NUL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1118 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1119 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1120 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1121 #endif
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1122
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1123 /*
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1124 * Do the expansion based on xp->xp_context and "pat".
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1125 */
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1126 static int
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1127 ExpandFromContext(
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1128 expand_T *xp,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1129 char_u *pat,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1130 int *num_file,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1131 char_u ***file,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1132 int options) // WILD_ flags
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1133 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1134 #ifdef FEAT_CMDL_COMPL
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1135 regmatch_T regmatch;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1136 #endif
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1137 int ret;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1138 int flags;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1139
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1140 flags = EW_DIR; // include directories
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1141 if (options & WILD_LIST_NOTFOUND)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1142 flags \|= EW_NOTFOUND;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1143 if (options & WILD_ADD_SLASH)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1144 flags \|= EW_ADDSLASH;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1145 if (options & WILD_KEEP_ALL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1146 flags \|= EW_KEEPALL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1147 if (options & WILD_SILENT)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1148 flags \|= EW_SILENT;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1149 if (options & WILD_ALLLINKS)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1150 flags \|= EW_ALLLINKS;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1151
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1152 if (xp->xp_context == EXPAND_FILES
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1153 \|\| xp->xp_context == EXPAND_DIRECTORIES
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1154 \|\| xp->xp_context == EXPAND_FILES_IN_PATH)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1155 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1156 // Expand file or directory names.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1157 int free_pat = FALSE;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1158 int i;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1159
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1160 // for ":set path=" and ":set tags=" halve backslashes for escaped
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1161 // space
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1162 if (xp->xp_backslash != XP_BS_NONE)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1163 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1164 free_pat = TRUE;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1165 pat = vim_strsave(pat);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1166 for (i = 0; pat[i]; ++i)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1167 if (pat[i] == '\\')
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1168 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1169 if (xp->xp_backslash == XP_BS_THREE
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1170 && pat[i + 1] == '\\'
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1171 && pat[i + 2] == '\\'
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1172 && pat[i + 3] == ' ')
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1173 STRMOVE(pat + i, pat + i + 3);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1174 if (xp->xp_backslash == XP_BS_ONE
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1175 && pat[i + 1] == ' ')
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1176 STRMOVE(pat + i, pat + i + 1);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1177 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1178 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1179
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1180 if (xp->xp_context == EXPAND_FILES)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1181 flags \|= EW_FILE;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1182 else if (xp->xp_context == EXPAND_FILES_IN_PATH)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1183 flags \|= (EW_FILE \| EW_PATH);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1184 else
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1185 flags = (flags \| EW_DIR) & ~EW_FILE;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1186 if (options & WILD_ICASE)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1187 flags \|= EW_ICASE;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1188
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1189 // Expand wildcards, supporting %:h and the like.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1190 ret = expand_wildcards_eval(&pat, num_file, file, flags);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1191 if (free_pat)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1192 vim_free(pat);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1193 #ifdef BACKSLASH_IN_FILENAME
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1194 if (p_csl[0] != NUL && (options & WILD_IGNORE_COMPLETESLASH) == 0)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1195 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1196 int i;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1197
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1198 for (i = 0; i < *num_file; ++i)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1199 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1200 char_u ptr = (file)[i];
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1201
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1202 while (*ptr != NUL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1203 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1204 if (p_csl[0] == 's' && *ptr == '\\')
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1205 *ptr = '/';
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1206 else if (p_csl[0] == 'b' && *ptr == '/')
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1207 *ptr = '\\';
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1208 ptr += (*mb_ptr2len)(ptr);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1209 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1210 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1211 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1212 #endif
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1213 return ret;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1214 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1215
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1216 file = (char_u *)"";
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1217 *num_file = 0;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1218 if (xp->xp_context == EXPAND_HELP)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1219 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1220 // With an empty argument we would get all the help tags, which is
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1221 // very slow. Get matches for "help" instead.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1222 if (find_help_tags(pat == NUL ? (char_u )"help" : pat,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1223 num_file, file, FALSE) == OK)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1224 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1225 #ifdef FEAT_MULTI_LANG
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1226 cleanup_help_tags(num_file, file);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1227 #endif
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1228 return OK;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1229 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1230 return FAIL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1231 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1232
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1233 #ifndef FEAT_CMDL_COMPL
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1234 return FAIL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1235 #else
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1236 if (xp->xp_context == EXPAND_SHELLCMD)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1237 return expand_shellcmd(pat, num_file, file, flags);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1238 if (xp->xp_context == EXPAND_OLD_SETTING)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1239 return ExpandOldSetting(num_file, file);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1240 if (xp->xp_context == EXPAND_BUFFERS)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1241 return ExpandBufnames(pat, num_file, file, options);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1242 if (xp->xp_context == EXPAND_TAGS
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1243 \|\| xp->xp_context == EXPAND_TAGS_LISTFILES)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1244 return expand_tags(xp->xp_context == EXPAND_TAGS, pat, num_file, file);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1245 if (xp->xp_context == EXPAND_COLORS)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1246 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1247 char *directories[] = {"colors", NULL};
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1248 return ExpandRTDir(pat, DIP_START + DIP_OPT, num_file, file,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1249 directories);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1250 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1251 if (xp->xp_context == EXPAND_COMPILER)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1252 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1253 char *directories[] = {"compiler", NULL};
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1254 return ExpandRTDir(pat, 0, num_file, file, directories);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1255 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1256 if (xp->xp_context == EXPAND_OWNSYNTAX)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1257 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1258 char *directories[] = {"syntax", NULL};
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1259 return ExpandRTDir(pat, 0, num_file, file, directories);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1260 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1261 if (xp->xp_context == EXPAND_FILETYPE)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1262 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1263 char *directories[] = {"syntax", "indent", "ftplugin", NULL};
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1264 return ExpandRTDir(pat, 0, num_file, file, directories);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1265 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1266 # if defined(FEAT_EVAL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1267 if (xp->xp_context == EXPAND_USER_LIST)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1268 return ExpandUserList(xp, num_file, file);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1269 # endif
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1270 if (xp->xp_context == EXPAND_PACKADD)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1271 return ExpandPackAddDir(pat, num_file, file);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1272
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1273 regmatch.regprog = vim_regcomp(pat, p_magic ? RE_MAGIC : 0);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1274 if (regmatch.regprog == NULL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1275 return FAIL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1276
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1277 // set ignore-case according to p_ic, p_scs and pat
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1278 regmatch.rm_ic = ignorecase(pat);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1279
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1280 if (xp->xp_context == EXPAND_SETTINGS
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1281 \|\| xp->xp_context == EXPAND_BOOL_SETTINGS)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1282 ret = ExpandSettings(xp, &regmatch, num_file, file);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1283 else if (xp->xp_context == EXPAND_MAPPINGS)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1284 ret = ExpandMappings(&regmatch, num_file, file);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1285 # if defined(FEAT_EVAL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1286 else if (xp->xp_context == EXPAND_USER_DEFINED)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1287 ret = ExpandUserDefined(xp, &regmatch, num_file, file);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1288 # endif
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1289 else
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1290 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1291 static struct expgen
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1292 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1293 int context;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1294 char_u ((func)(expand_T *, int));
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1295 int ic;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1296 int escaped;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1297 } tab[] =
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1298 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1299 {EXPAND_COMMANDS, get_command_name, FALSE, TRUE},
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1300 {EXPAND_BEHAVE, get_behave_arg, TRUE, TRUE},
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1301 {EXPAND_MAPCLEAR, get_mapclear_arg, TRUE, TRUE},
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1302 {EXPAND_MESSAGES, get_messages_arg, TRUE, TRUE},
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1303 {EXPAND_HISTORY, get_history_arg, TRUE, TRUE},
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1304 {EXPAND_USER_COMMANDS, get_user_commands, FALSE, TRUE},
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1305 {EXPAND_USER_ADDR_TYPE, get_user_cmd_addr_type, FALSE, TRUE},
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1306 {EXPAND_USER_CMD_FLAGS, get_user_cmd_flags, FALSE, TRUE},
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1307 {EXPAND_USER_NARGS, get_user_cmd_nargs, FALSE, TRUE},
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1308 {EXPAND_USER_COMPLETE, get_user_cmd_complete, FALSE, TRUE},
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1309 # ifdef FEAT_EVAL
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1310 {EXPAND_USER_VARS, get_user_var_name, FALSE, TRUE},
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1311 {EXPAND_FUNCTIONS, get_function_name, FALSE, TRUE},
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1312 {EXPAND_USER_FUNC, get_user_func_name, FALSE, TRUE},
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1313 {EXPAND_EXPRESSION, get_expr_name, FALSE, TRUE},
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1314 # endif
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1315 # ifdef FEAT_MENU
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1316 {EXPAND_MENUS, get_menu_name, FALSE, TRUE},
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1317 {EXPAND_MENUNAMES, get_menu_names, FALSE, TRUE},
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1318 # endif
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1319 # ifdef FEAT_SYN_HL
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1320 {EXPAND_SYNTAX, get_syntax_name, TRUE, TRUE},
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1321 # endif
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1322 # ifdef FEAT_PROFILE
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1323 {EXPAND_SYNTIME, get_syntime_arg, TRUE, TRUE},
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1324 # endif
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1325 {EXPAND_HIGHLIGHT, get_highlight_name, TRUE, TRUE},
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1326 {EXPAND_EVENTS, get_event_name, TRUE, TRUE},
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1327 {EXPAND_AUGROUP, get_augroup_name, TRUE, TRUE},
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1328 # ifdef FEAT_CSCOPE
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1329 {EXPAND_CSCOPE, get_cscope_name, TRUE, TRUE},
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1330 # endif
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1331 # ifdef FEAT_SIGNS
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1332 {EXPAND_SIGN, get_sign_name, TRUE, TRUE},
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1333 # endif
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1334 # ifdef FEAT_PROFILE
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1335 {EXPAND_PROFILE, get_profile_name, TRUE, TRUE},
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1336 # endif
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1337 # if defined(HAVE_LOCALE_H) \|\| defined(X_LOCALE)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1338 {EXPAND_LANGUAGE, get_lang_arg, TRUE, FALSE},
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1339 {EXPAND_LOCALES, get_locales, TRUE, FALSE},
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1340 # endif
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1341 {EXPAND_ENV_VARS, get_env_name, TRUE, TRUE},
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1342 {EXPAND_USER, get_users, TRUE, FALSE},
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1343 {EXPAND_ARGLIST, get_arglist_name, TRUE, FALSE},
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1344 };
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1345 int i;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1346
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1347 // Find a context in the table and call the ExpandGeneric() with the
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1348 // right function to do the expansion.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1349 ret = FAIL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1350 for (i = 0; i < (int)(sizeof(tab) / sizeof(struct expgen)); ++i)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1351 if (xp->xp_context == tab[i].context)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1352 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1353 if (tab[i].ic)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1354 regmatch.rm_ic = TRUE;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1355 ret = ExpandGeneric(xp, &regmatch, num_file, file,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1356 tab[i].func, tab[i].escaped);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1357 break;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1358 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1359 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1360
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1361 vim_regfree(regmatch.regprog);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1362
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1363 return ret;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1364 #endif // FEAT_CMDL_COMPL
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1365 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1366
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1367 #if defined(FEAT_CMDL_COMPL) \|\| defined(PROTO)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1368 /*
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1369 * Expand a list of names.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1370 *
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1371 * Generic function for command line completion. It calls a function to
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1372 * obtain strings, one by one. The strings are matched against a regexp
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1373 * program. Matching strings are copied into an array, which is returned.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1374 *
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1375 * Returns OK when no problems encountered, FAIL for error (out of memory).
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1376 */
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1377 int
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1378 ExpandGeneric(
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1379 expand_T *xp,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1380 regmatch_T *regmatch,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1381 int *num_file,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1382 char_u ***file,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1383 char_u ((func)(expand_T *, int)),
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1384 // returns a string from the list
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1385 int escaped)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1386 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1387 int i;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1388 int count = 0;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1389 int round;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1390 char_u *str;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1391
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1392 // do this loop twice:
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1393 // round == 0: count the number of matching names
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1394 // round == 1: copy the matching names into allocated memory
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1395 for (round = 0; round <= 1; ++round)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1396 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1397 for (i = 0; ; ++i)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1398 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1399 str = (*func)(xp, i);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1400 if (str == NULL) // end of list
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1401 break;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1402 if (*str == NUL) // skip empty strings
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1403 continue;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1404
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1405 if (vim_regexec(regmatch, str, (colnr_T)0))
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1406 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1407 if (round)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1408 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1409 if (escaped)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1410 str = vim_strsave_escaped(str, (char_u *)" \t\\.");
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1411 else
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1412 str = vim_strsave(str);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1413 (*file)[count] = str;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1414 # ifdef FEAT_MENU
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1415 if (func == get_menu_names && str != NULL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1416 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1417 // test for separator added by get_menu_names()
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1418 str += STRLEN(str) - 1;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1419 if (*str == '\001')
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1420 *str = '.';
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1421 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1422 # endif
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1423 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1424 ++count;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1425 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1426 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1427 if (round == 0)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1428 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1429 if (count == 0)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1430 return OK;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1431 *num_file = count;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1432 file = ALLOC_MULT(char_u , count);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1433 if (*file == NULL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1434 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1435 file = (char_u *)"";
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1436 return FAIL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1437 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1438 count = 0;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1439 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1440 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1441
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1442 // Sort the results. Keep menu's in the specified order.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1443 if (xp->xp_context != EXPAND_MENUNAMES && xp->xp_context != EXPAND_MENUS)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1444 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1445 if (xp->xp_context == EXPAND_EXPRESSION
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1446 \|\| xp->xp_context == EXPAND_FUNCTIONS
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1447 \|\| xp->xp_context == EXPAND_USER_FUNC)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1448 // <SNR> functions should be sorted to the end.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1449 qsort((void )file, (size_t)num_file, sizeof(char_u ),
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1450 sort_func_compare);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1451 else
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1452 sort_strings(file, num_file);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1453 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1454
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1455 # ifdef FEAT_CMDL_COMPL
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1456 // Reset the variables used for special highlight names expansion, so that
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1457 // they don't show up when getting normal highlight names by ID.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1458 reset_expand_highlight();
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1459 # endif
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1460
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1461 return OK;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1462 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1463
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1464 /*
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1465 * Complete a shell command.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1466 * Returns FAIL or OK;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1467 */
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1468 static int
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1469 expand_shellcmd(
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1470 char_u *filepat, // pattern to match with command names
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1471 int *num_file, // return: number of matches
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1472 char_u ***file, // return: array with matches
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1473 int flagsarg) // EW_ flags
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1474 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1475 char_u *pat;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1476 int i;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1477 char_u *path = NULL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1478 int mustfree = FALSE;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1479 garray_T ga;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1480 char_u *buf = alloc(MAXPATHL);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1481 size_t l;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1482 char_u s, e;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1483 int flags = flagsarg;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1484 int ret;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1485 int did_curdir = FALSE;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1486 hashtab_T found_ht;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1487 hashitem_T *hi;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1488 hash_T hash;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1489
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1490 if (buf == NULL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1491 return FAIL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1492
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1493 // for ":set path=" and ":set tags=" halve backslashes for escaped
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1494 // space
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1495 pat = vim_strsave(filepat);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1496 for (i = 0; pat[i]; ++i)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1497 if (pat[i] == '\\' && pat[i + 1] == ' ')
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1498 STRMOVE(pat + i, pat + i + 1);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1499
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1500 flags \|= EW_FILE \| EW_EXEC \| EW_SHELLCMD;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1501
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1502 if (pat[0] == '.' && (vim_ispathsep(pat[1])
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1503 \|\| (pat[1] == '.' && vim_ispathsep(pat[2]))))
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1504 path = (char_u *)".";
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1505 else
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1506 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1507 // For an absolute name we don't use $PATH.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1508 if (!mch_isFullName(pat))
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1509 path = vim_getenv((char_u *)"PATH", &mustfree);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1510 if (path == NULL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1511 path = (char_u *)"";
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1512 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1513
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1514 // Go over all directories in $PATH. Expand matches in that directory and
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1515 // collect them in "ga". When "." is not in $PATH also expand for the
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1516 // current directory, to find "subdir/cmd".
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1517 ga_init2(&ga, (int)sizeof(char *), 10);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1518 hash_init(&found_ht);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1519 for (s = path; ; s = e)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1520 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1521 # if defined(MSWIN)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1522 e = vim_strchr(s, ';');
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1523 # else
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1524 e = vim_strchr(s, ':');
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1525 # endif
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1526 if (e == NULL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1527 e = s + STRLEN(s);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1528
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1529 if (*s == NUL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1530 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1531 if (did_curdir)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1532 break;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1533 // Find directories in the current directory, path is empty.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1534 did_curdir = TRUE;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1535 flags \|= EW_DIR;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1536 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1537 else if (STRNCMP(s, ".", (int)(e - s)) == 0)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1538 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1539 did_curdir = TRUE;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1540 flags \|= EW_DIR;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1541 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1542 else
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1543 // Do not match directories inside a $PATH item.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1544 flags &= ~EW_DIR;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1545
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1546 l = e - s;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1547 if (l > MAXPATHL - 5)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1548 break;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1549 vim_strncpy(buf, s, l);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1550 add_pathsep(buf);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1551 l = STRLEN(buf);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1552 vim_strncpy(buf + l, pat, MAXPATHL - 1 - l);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1553
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1554 // Expand matches in one directory of $PATH.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1555 ret = expand_wildcards(1, &buf, num_file, file, flags);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1556 if (ret == OK)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1557 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1558 if (ga_grow(&ga, *num_file) == FAIL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1559 FreeWild(num_file, file);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1560 else
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1561 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1562 for (i = 0; i < *num_file; ++i)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1563 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1564 char_u name = (file)[i];
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1565
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1566 if (STRLEN(name) > l)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1567 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1568 // Check if this name was already found.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1569 hash = hash_hash(name + l);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1570 hi = hash_lookup(&found_ht, name + l, hash);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1571 if (HASHITEM_EMPTY(hi))
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1572 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1573 // Remove the path that was prepended.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1574 STRMOVE(name, name + l);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1575 ((char_u **)ga.ga_data)[ga.ga_len++] = name;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1576 hash_add_item(&found_ht, hi, name, hash);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1577 name = NULL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1578 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1579 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1580 vim_free(name);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1581 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1582 vim_free(*file);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1583 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1584 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1585 if (*e != NUL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1586 ++e;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1587 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1588 *file = ga.ga_data;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1589 *num_file = ga.ga_len;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1590
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1591 vim_free(buf);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1592 vim_free(pat);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1593 if (mustfree)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1594 vim_free(path);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1595 hash_clear(&found_ht);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1596 return OK;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1597 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1598
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1599 # if defined(FEAT_EVAL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1600 /*
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1601 * Call "user_expand_func()" to invoke a user defined Vim script function and
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1602 * return the result (either a string or a List).
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1603 */
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1604 static void *
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1605 call_user_expand_func(
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1606 void (user_expand_func)(char_u , int, typval_T ),
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1607 expand_T *xp,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1608 int *num_file,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1609 char_u ***file)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1610 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1611 cmdline_info_T *ccline = get_cmdline_info();
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1612 int keep = 0;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1613 typval_T args[4];
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1614 sctx_T save_current_sctx = current_sctx;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1615 char_u *pat = NULL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1616 void *ret;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1617
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1618 if (xp->xp_arg == NULL \|\| xp->xp_arg[0] == '\0' \|\| xp->xp_line == NULL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1619 return NULL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1620 *num_file = 0;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1621 *file = NULL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1622
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1623 if (ccline->cmdbuff != NULL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1624 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1625 keep = ccline->cmdbuff[ccline->cmdlen];
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1626 ccline->cmdbuff[ccline->cmdlen] = 0;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1627 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1628
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1629 pat = vim_strnsave(xp->xp_pattern, xp->xp_pattern_len);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1630
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1631 args[0].v_type = VAR_STRING;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1632 args[0].vval.v_string = pat;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1633 args[1].v_type = VAR_STRING;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1634 args[1].vval.v_string = xp->xp_line;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1635 args[2].v_type = VAR_NUMBER;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1636 args[2].vval.v_number = xp->xp_col;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1637 args[3].v_type = VAR_UNKNOWN;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1638
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1639 current_sctx = xp->xp_script_ctx;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1640
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1641 ret = user_expand_func(xp->xp_arg, 3, args);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1642
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1643 current_sctx = save_current_sctx;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1644 if (ccline->cmdbuff != NULL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1645 ccline->cmdbuff[ccline->cmdlen] = keep;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1646
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1647 vim_free(pat);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1648 return ret;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1649 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1650
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1651 /*
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1652 * Expand names with a function defined by the user.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1653 */
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1654 static int
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1655 ExpandUserDefined(
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1656 expand_T *xp,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1657 regmatch_T *regmatch,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1658 int *num_file,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1659 char_u ***file)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1660 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1661 char_u *retstr;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1662 char_u *s;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1663 char_u *e;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1664 int keep;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1665 garray_T ga;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1666 int skip;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1667
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1668 retstr = call_user_expand_func(call_func_retstr, xp, num_file, file);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1669 if (retstr == NULL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1670 return FAIL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1671
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1672 ga_init2(&ga, (int)sizeof(char *), 3);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1673 for (s = retstr; *s != NUL; s = e)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1674 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1675 e = vim_strchr(s, '\n');
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1676 if (e == NULL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1677 e = s + STRLEN(s);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1678 keep = *e;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1679 *e = NUL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1680
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1681 skip = xp->xp_pattern[0] && vim_regexec(regmatch, s, (colnr_T)0) == 0;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1682 *e = keep;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1683
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1684 if (!skip)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1685 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1686 if (ga_grow(&ga, 1) == FAIL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1687 break;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1688 ((char_u **)ga.ga_data)[ga.ga_len] = vim_strnsave(s, (int)(e - s));
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1689 ++ga.ga_len;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1690 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1691
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1692 if (*e != NUL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1693 ++e;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1694 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1695 vim_free(retstr);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1696 *file = ga.ga_data;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1697 *num_file = ga.ga_len;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1698 return OK;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1699 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1700
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1701 /*
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1702 * Expand names with a list returned by a function defined by the user.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1703 */
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1704 static int
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1705 ExpandUserList(
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1706 expand_T *xp,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1707 int *num_file,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1708 char_u ***file)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1709 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1710 list_T *retlist;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1711 listitem_T *li;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1712 garray_T ga;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1713
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1714 retlist = call_user_expand_func(call_func_retlist, xp, num_file, file);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1715 if (retlist == NULL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1716 return FAIL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1717
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1718 ga_init2(&ga, (int)sizeof(char *), 3);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1719 // Loop over the items in the list.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1720 for (li = retlist->lv_first; li != NULL; li = li->li_next)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1721 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1722 if (li->li_tv.v_type != VAR_STRING \|\| li->li_tv.vval.v_string == NULL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1723 continue; // Skip non-string items and empty strings
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1724
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1725 if (ga_grow(&ga, 1) == FAIL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1726 break;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1727
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1728 ((char_u **)ga.ga_data)[ga.ga_len] =
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1729 vim_strsave(li->li_tv.vval.v_string);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1730 ++ga.ga_len;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1731 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1732 list_unref(retlist);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1733
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1734 *file = ga.ga_data;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1735 *num_file = ga.ga_len;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1736 return OK;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1737 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1738 # endif
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1739
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1740 /*
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1741 * Expand color scheme, compiler or filetype names.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1742 * Search from 'runtimepath':
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1743 * 'runtimepath'/{dirnames}/{pat}.vim
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1744 * When "flags" has DIP_START: search also from 'start' of 'packpath':
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1745 * 'packpath'/pack/ * /start/ * /{dirnames}/{pat}.vim
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1746 * When "flags" has DIP_OPT: search also from 'opt' of 'packpath':
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1747 * 'packpath'/pack/ * /opt/ * /{dirnames}/{pat}.vim
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1748 * "dirnames" is an array with one or more directory names.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1749 */
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1750 static int
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1751 ExpandRTDir(
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1752 char_u *pat,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1753 int flags,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1754 int *num_file,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1755 char_u ***file,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1756 char *dirnames[])
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1757 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1758 char_u *s;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1759 char_u *e;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1760 char_u *match;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1761 garray_T ga;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1762 int i;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1763 int pat_len;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1764
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1765 *num_file = 0;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1766 *file = NULL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1767 pat_len = (int)STRLEN(pat);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1768 ga_init2(&ga, (int)sizeof(char *), 10);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1769
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1770 for (i = 0; dirnames[i] != NULL; ++i)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1771 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1772 s = alloc(STRLEN(dirnames[i]) + pat_len + 7);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1773 if (s == NULL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1774 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1775 ga_clear_strings(&ga);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1776 return FAIL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1777 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1778 sprintf((char )s, "%s/%s.vim", dirnames[i], pat);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1779 globpath(p_rtp, s, &ga, 0);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1780 vim_free(s);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1781 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1782
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1783 if (flags & DIP_START) {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1784 for (i = 0; dirnames[i] != NULL; ++i)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1785 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1786 s = alloc(STRLEN(dirnames[i]) + pat_len + 22);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1787 if (s == NULL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1788 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1789 ga_clear_strings(&ga);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1790 return FAIL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1791 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1792 sprintf((char )s, "pack//start//%s/%s.vim", dirnames[i], pat);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1793 globpath(p_pp, s, &ga, 0);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1794 vim_free(s);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1795 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1796 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1797
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1798 if (flags & DIP_OPT) {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1799 for (i = 0; dirnames[i] != NULL; ++i)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1800 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1801 s = alloc(STRLEN(dirnames[i]) + pat_len + 20);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1802 if (s == NULL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1803 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1804 ga_clear_strings(&ga);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1805 return FAIL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1806 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1807 sprintf((char )s, "pack//opt//%s/%s.vim", dirnames[i], pat);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1808 globpath(p_pp, s, &ga, 0);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1809 vim_free(s);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1810 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1811 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1812
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1813 for (i = 0; i < ga.ga_len; ++i)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1814 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1815 match = ((char_u **)ga.ga_data)[i];
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1816 s = match;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1817 e = s + STRLEN(s);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1818 if (e - 4 > s && STRNICMP(e - 4, ".vim", 4) == 0)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1819 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1820 e -= 4;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1821 for (s = e; s > match; MB_PTR_BACK(match, s))
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1822 if (s < match \|\| vim_ispathsep(*s))
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1823 break;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1824 ++s;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1825 *e = NUL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1826 mch_memmove(match, s, e - s + 1);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1827 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1828 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1829
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1830 if (ga.ga_len == 0)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1831 return FAIL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1832
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1833 // Sort and remove duplicates which can happen when specifying multiple
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1834 // directories in dirnames.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1835 remove_duplicates(&ga);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1836
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1837 *file = ga.ga_data;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1838 *num_file = ga.ga_len;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1839 return OK;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1840 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1841
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1842 /*
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1843 * Expand loadplugin names:
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1844 * 'packpath'/pack/ * /opt/{pat}
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1845 */
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1846 static int
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1847 ExpandPackAddDir(
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1848 char_u *pat,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1849 int *num_file,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1850 char_u ***file)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1851 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1852 char_u *s;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1853 char_u *e;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1854 char_u *match;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1855 garray_T ga;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1856 int i;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1857 int pat_len;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1858
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1859 *num_file = 0;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1860 *file = NULL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1861 pat_len = (int)STRLEN(pat);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1862 ga_init2(&ga, (int)sizeof(char *), 10);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1863
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1864 s = alloc(pat_len + 26);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1865 if (s == NULL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1866 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1867 ga_clear_strings(&ga);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1868 return FAIL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1869 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1870 sprintf((char )s, "pack//opt/%s*", pat);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1871 globpath(p_pp, s, &ga, 0);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1872 vim_free(s);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1873
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1874 for (i = 0; i < ga.ga_len; ++i)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1875 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1876 match = ((char_u **)ga.ga_data)[i];
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1877 s = gettail(match);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1878 e = s + STRLEN(s);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1879 mch_memmove(match, s, e - s + 1);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1880 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1881
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1882 if (ga.ga_len == 0)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1883 return FAIL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1884
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1885 // Sort and remove duplicates which can happen when specifying multiple
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1886 // directories in dirnames.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1887 remove_duplicates(&ga);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1888
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1889 *file = ga.ga_data;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1890 *num_file = ga.ga_len;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1891 return OK;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1892 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1893 #endif
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1894
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1895 #if defined(FEAT_CMDL_COMPL) \|\| defined(FEAT_EVAL) \|\| defined(PROTO)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1896 /*
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1897 * Expand "file" for all comma-separated directories in "path".
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1898 * Adds the matches to "ga". Caller must init "ga".
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1899 */
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1900 void
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1901 globpath(
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1902 char_u *path,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1903 char_u *file,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1904 garray_T *ga,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1905 int expand_options)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1906 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1907 expand_T xpc;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1908 char_u *buf;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1909 int i;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1910 int num_p;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1911 char_u **p;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1912
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1913 buf = alloc(MAXPATHL);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1914 if (buf == NULL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1915 return;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1916
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1917 ExpandInit(&xpc);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1918 xpc.xp_context = EXPAND_FILES;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1919
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1920 // Loop over all entries in {path}.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1921 while (*path != NUL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1922 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1923 // Copy one item of the path to buf[] and concatenate the file name.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1924 copy_option_part(&path, buf, MAXPATHL, ",");
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1925 if (STRLEN(buf) + STRLEN(file) + 2 < MAXPATHL)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1926 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1927 # if defined(MSWIN)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1928 // Using the platform's path separator (\) makes vim incorrectly
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1929 // treat it as an escape character, use '/' instead.
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1930 if (*buf != NUL && !after_pathsep(buf, buf + STRLEN(buf)))
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1931 STRCAT(buf, "/");
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1932 # else
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1933 add_pathsep(buf);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1934 # endif
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1935 STRCAT(buf, file);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1936 if (ExpandFromContext(&xpc, buf, &num_p, &p,
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1937 WILD_SILENT\|expand_options) != FAIL && num_p > 0)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1938 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1939 ExpandEscape(&xpc, buf, num_p, p, WILD_SILENT\|expand_options);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1940
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1941 if (ga_grow(ga, num_p) == OK)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1942 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1943 for (i = 0; i < num_p; ++i)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1944 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1945 ((char_u **)ga->ga_data)[ga->ga_len] =
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1946 vim_strnsave(p[i], (int)STRLEN(p[i]));
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1947 ++ga->ga_len;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1948 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1949 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1950
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1951 FreeWild(num_p, p);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1952 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1953 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1954 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1955
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1956 vim_free(buf);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1957 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1958 #endif
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1959
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1960 #if defined(FEAT_CMDL_COMPL) \| defined(PROTO)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1961 /*
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1962 * "getcompletion()" function
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1963 */
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1964 void
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1965 f_getcompletion(typval_T argvars, typval_T rettv)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1966 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1967 char_u *pat;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1968 expand_T xpc;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1969 int filtered = FALSE;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1970 int options = WILD_SILENT \| WILD_USE_NL \| WILD_ADD_SLASH
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1971 \| WILD_NO_BEEP;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1972
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1973 if (argvars[2].v_type != VAR_UNKNOWN)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1974 filtered = tv_get_number_chk(&argvars[2], NULL);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1975
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1976 if (p_wic)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1977 options \|= WILD_ICASE;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1978
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1979 // For filtered results, 'wildignore' is used
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1980 if (!filtered)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1981 options \|= WILD_KEEP_ALL;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1982
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1983 ExpandInit(&xpc);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1984 xpc.xp_pattern = tv_get_string(&argvars[0]);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1985 xpc.xp_pattern_len = (int)STRLEN(xpc.xp_pattern);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1986 xpc.xp_context = cmdcomplete_str_to_type(tv_get_string(&argvars[1]));
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1987 if (xpc.xp_context == EXPAND_NOTHING)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1988 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1989 if (argvars[1].v_type == VAR_STRING)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1990 semsg(_(e_invarg2), argvars[1].vval.v_string);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1991 else
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1992 emsg(_(e_invarg));
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1993 return;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1994 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1995
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1996 # if defined(FEAT_MENU)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1997 if (xpc.xp_context == EXPAND_MENUS)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1998 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	1999 set_context_in_menu_cmd(&xpc, (char_u *)"menu", xpc.xp_pattern, FALSE);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	2000 xpc.xp_pattern_len = (int)STRLEN(xpc.xp_pattern);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	2001 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	2002 # endif
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	2003 # ifdef FEAT_CSCOPE
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	2004 if (xpc.xp_context == EXPAND_CSCOPE)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	2005 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	2006 set_context_in_cscope_cmd(&xpc, xpc.xp_pattern, CMD_cscope);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	2007 xpc.xp_pattern_len = (int)STRLEN(xpc.xp_pattern);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	2008 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	2009 # endif
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	2010 # ifdef FEAT_SIGNS
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	2011 if (xpc.xp_context == EXPAND_SIGN)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	2012 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	2013 set_context_in_sign_cmd(&xpc, xpc.xp_pattern);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	2014 xpc.xp_pattern_len = (int)STRLEN(xpc.xp_pattern);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	2015 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	2016 # endif
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	2017
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	2018 pat = addstar(xpc.xp_pattern, xpc.xp_pattern_len, xpc.xp_context);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	2019 if ((rettv_list_alloc(rettv) != FAIL) && (pat != NULL))
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	2020 {
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	2021 int i;
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	2022
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	2023 ExpandOne(&xpc, pat, NULL, options, WILD_ALL_KEEP);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	2024
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	2025 for (i = 0; i < xpc.xp_numfiles; i++)
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	2026 list_append_string(rettv->vval.v_list, xpc.xp_files[i], -1);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	2027 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	2028 vim_free(pat);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	2029 ExpandCleanup(&xpc);
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	2030 }
87a8760babec patch 8.1.1886: command line expansion code is spread out Bram Moolenaar <Bram@vim.org> parents: diff changeset	2031 #endif // FEAT_CMDL_COMPL

Mercurial > vim

annotate src/cmdexpand.c @ 17779:87a8760babec v8.1.1886