[packages/vim.git] / 7.1.299

To: vim-dev@vim.org
Subject: Patch 7.1.299
Fcc: outbox
From: Bram Moolenaar <Bram@moolenaar.net>
Mime-Version: 1.0
Content-Type: text/plain; charset=ISO-8859-1
Content-Transfer-Encoding: 8bit
------------

Patch 7.1.299
Problem:    Filetype detection doesn't work properly for file names ending in
	    a part that is ignored and contain a space or other special
	    characters.
Solution:   Escape the special characters using the new fnameescape function.
Files:	    runtime/doc/eval.txt, runtime/filetype.vim, src/eval.c,
	    src/ex_getln.c, src/proto/ex_getln.pro, src/vim.h


*** ../vim-7.1.298/runtime/doc/eval.txt	Wed Feb 20 20:09:44 2008
--- runtime/doc/eval.txt	Wed May 28 16:42:42 2008
***************
*** 1,4 ****
! *eval.txt*      For Vim version 7.1.  Last change: 2008 Feb 20
  
  
  		  VIM REFERENCE MANUAL    by Bram Moolenaar
--- 1,4 ----
! *eval.txt*      For Vim version 7.1.  Last change: 2008 May 28
  
  
  		  VIM REFERENCE MANUAL    by Bram Moolenaar
***************
*** 1609,1614 ****
--- 1652,1658 ----
  				String	find directory {name} in {path}
  findfile( {name}[, {path}[, {count}]])
  				String	find file {name} in {path}
+ fnameescape( {fname})		String	escape special characters in {fname}
  fnamemodify( {fname}, {mods})	String	modify file name
  foldclosed( {lnum})		Number	first line of fold at {lnum} if closed
  foldclosedend( {lnum})		Number	last line of fold at {lnum} if closed
***************
*** 2620,2625 ****
--- 2669,2687 ----
  <		Searches from the directory of the current file upwards until
  		it finds the file "tags.vim".
  
+ fnameescape({string})					*fnameescape()*
+ 		Escape {string} for use as file name command argument.  All
+ 		characters that have a special meaning, such as '%' and '|'
+ 		are escaped with a backslash.
+ 		For most systems the characters escaped are "".  For systems
+ 		where a backslash appears in a filename, it depends on the
+ 		value of 'isfname'.
+ 		Example: >
+ 			:let fname = 'some str%nge|name'
+ 			:exe "edit " . fnameescape(fname)
+ <		results in executing: >
+ 			edit some\ str\%nge\|name
+ 
  fnamemodify({fname}, {mods})				*fnamemodify()*
  		Modify file name {fname} according to {mods}.  {mods} is a
  		string of characters like it is used for file names on the
*** ../vim-7.1.298/runtime/filetype.vim	Tue May 15 09:14:33 2007
--- runtime/filetype.vim	Wed May 28 16:39:09 2008
***************
*** 16,35 ****
  augroup filetypedetect
  
  " Ignored extensions
  au BufNewFile,BufRead ?\+.orig,?\+.bak,?\+.old,?\+.new,?\+.rpmsave,?\+.rpmnew
! 	\ exe "doau filetypedetect BufRead " . expand("<afile>:r")
  au BufNewFile,BufRead *~
  	\ let s:name = expand("<afile>") |
  	\ let s:short = substitute(s:name, '\~$', '', '') |
  	\ if s:name != s:short && s:short != "" |
! 	\   exe "doau filetypedetect BufRead " . s:short |
  	\ endif |
! 	\ unlet s:name |
! 	\ unlet s:short
  au BufNewFile,BufRead ?\+.in
  	\ if expand("<afile>:t") != "configure.in" |
! 	\   exe "doau filetypedetect BufRead " . expand("<afile>:r") |
  	\ endif
  
  " Pattern used to match file names which should not be inspected.
  " Currently finds compressed files.
--- 16,38 ----
  augroup filetypedetect
  
  " Ignored extensions
+ if exists("*fnameescape")
  au BufNewFile,BufRead ?\+.orig,?\+.bak,?\+.old,?\+.new,?\+.rpmsave,?\+.rpmnew
! 	\ exe "doau filetypedetect BufRead " . fnameescape(expand("<afile>:r"))
  au BufNewFile,BufRead *~
  	\ let s:name = expand("<afile>") |
  	\ let s:short = substitute(s:name, '\~$', '', '') |
  	\ if s:name != s:short && s:short != "" |
! 	\   exe "doau filetypedetect BufRead " . fnameescape(s:short) |
  	\ endif |
! 	\ unlet s:name s:short
  au BufNewFile,BufRead ?\+.in
  	\ if expand("<afile>:t") != "configure.in" |
! 	\   exe "doau filetypedetect BufRead " . fnameescape(expand("<afile>:r")) |
  	\ endif
+ elseif &verbose > 0
+   echomsg "Warning: some filetypes will not be recognized because this version of Vim does not have fnameescape()"
+ endif
  
  " Pattern used to match file names which should not be inspected.
  " Currently finds compressed files.
*** ../vim-7.1.298/src/eval.c	Tue Apr  1 13:10:45 2008
--- src/eval.c	Wed May 28 16:35:51 2008
***************
*** 507,512 ****
--- 516,522 ----
  static void f_filter __ARGS((typval_T *argvars, typval_T *rettv));
  static void f_finddir __ARGS((typval_T *argvars, typval_T *rettv));
  static void f_findfile __ARGS((typval_T *argvars, typval_T *rettv));
+ static void f_fnameescape __ARGS((typval_T *argvars, typval_T *rettv));
  static void f_fnamemodify __ARGS((typval_T *argvars, typval_T *rettv));
  static void f_foldclosed __ARGS((typval_T *argvars, typval_T *rettv));
  static void f_foldclosedend __ARGS((typval_T *argvars, typval_T *rettv));
***************
*** 7107,7112 ****
--- 7437,7443 ----
      {"filter",		2, 2, f_filter},
      {"finddir",		1, 3, f_finddir},
      {"findfile",	1, 3, f_findfile},
+     {"fnameescape",	1, 1, f_fnameescape},
      {"fnamemodify",	2, 2, f_fnamemodify},
      {"foldclosed",	1, 1, f_foldclosed},
      {"foldclosedend",	1, 1, f_foldclosedend},
***************
*** 9465,9470 ****
--- 9804,9822 ----
  }
  
  /*
+  * "fnameescape({string})" function
+  */
+     static void
+ f_fnameescape(argvars, rettv)
+     typval_T	*argvars;
+     typval_T	*rettv;
+ {
+     rettv->vval.v_string = vim_strsave_fnameescape(
+ 					   get_tv_string(&argvars[0]), FALSE);
+     rettv->v_type = VAR_STRING;
+ }
+ 
+ /*
   * "fnamemodify({fname}, {mods})" function
   */
      static void
*** ../vim-7.1.298/src/ex_getln.c	Tue Jan 22 12:44:03 2008
--- src/ex_getln.c	Mon May 26 22:14:51 2008
***************
*** 3656,3677 ****
  #endif
  		    }
  		}
! #ifdef BACKSLASH_IN_FILENAME
! 		{
! 		    char_u	buf[20];
! 		    int		j = 0;
! 
! 		    /* Don't escape '[' and '{' if they are in 'isfname'. */
! 		    for (p = PATH_ESC_CHARS; *p != NUL; ++p)
! 			if ((*p != '[' && *p != '{') || !vim_isfilec(*p))
! 			    buf[j++] = *p;
! 		    buf[j] = NUL;
! 		    p = vim_strsave_escaped(files[i], buf);
! 		}
! #else
! 		p = vim_strsave_escaped(files[i],
! 			     xp->xp_shell ? SHELL_ESC_CHARS : PATH_ESC_CHARS);
! #endif
  		if (p != NULL)
  		{
  		    vim_free(files[i]);
--- 3656,3662 ----
  #endif
  		    }
  		}
! 		p = vim_strsave_fnameescape(files[i], xp->xp_shell);
  		if (p != NULL)
  		{
  		    vim_free(files[i]);
***************
*** 3710,3715 ****
--- 3695,3725 ----
  }
  
  /*
+  * Escape special characters in "fname" for when used as a file name argument
+  * after a Vim command, or, when "shell" is non-zero, a shell command.
+  * Returns the result in allocated memory.
+  */
+     char_u *
+ vim_strsave_fnameescape(fname, shell)
+     char_u *fname;
+     int    shell;
+ {
+ #ifdef BACKSLASH_IN_FILENAME
+     char_u	buf[20];
+     int		j = 0;
+ 
+     /* Don't escape '[' and '{' if they are in 'isfname'. */
+     for (p = PATH_ESC_CHARS; *p != NUL; ++p)
+ 	if ((*p != '[' && *p != '{') || !vim_isfilec(*p))
+ 	    buf[j++] = *p;
+     buf[j] = NUL;
+     return vim_strsave_escaped(fname, buf);
+ #else
+     return vim_strsave_escaped(fname, shell ? SHELL_ESC_CHARS : PATH_ESC_CHARS);
+ #endif
+ }
+ 
+ /*
   * Put a backslash before the file name in "pp", which is in allocated memory.
   */
      static void
*** ../vim-7.1.298/src/proto/ex_getln.pro	Sat May  5 19:24:48 2007
--- src/proto/ex_getln.pro	Mon May 26 22:14:41 2008
***************
*** 24,29 ****
--- 24,30 ----
  void ExpandInit __ARGS((expand_T *xp));
  void ExpandCleanup __ARGS((expand_T *xp));
  void ExpandEscape __ARGS((expand_T *xp, char_u *str, int numfiles, char_u **files, int options));
+ char_u *vim_strsave_fnameescape __ARGS((char_u *fname, int shell));
  void tilde_replace __ARGS((char_u *orig_pat, int num_files, char_u **files));
  char_u *sm_gettail __ARGS((char_u *s));
  char_u *addstar __ARGS((char_u *fname, int len, int context));
*** ../vim-7.1.298/src/vim.h	Sun Mar 16 16:02:47 2008
--- src/vim.h	Wed May 28 16:37:50 2008
***************
*** 336,345 ****
  # endif
  #endif
  #ifdef BACKSLASH_IN_FILENAME
! # define PATH_ESC_CHARS ((char_u *)" \t*?[{`%#")
  #else
! # define PATH_ESC_CHARS ((char_u *)" \t*?[{`$\\%#'\"|")
! # define SHELL_ESC_CHARS ((char_u *)" \t*?[{`$\\%#'\"|<>();&!")
  #endif
  
  #define NUMBUFLEN 30	    /* length of a buffer to store a number in ASCII */
--- 336,345 ----
  # endif
  #endif
  #ifdef BACKSLASH_IN_FILENAME
! # define PATH_ESC_CHARS ((char_u *)" \t\n*?[{`%#'\"|!<")
  #else
! # define PATH_ESC_CHARS ((char_u *)" \t\n*?[{`$\\%#'\"|!<")
! # define SHELL_ESC_CHARS ((char_u *)" \t\n*?[{`$\\%#'\"|!<>();&")
  #endif
  
  #define NUMBUFLEN 30	    /* length of a buffer to store a number in ASCII */
*** ../vim-7.1.298/src/version.c	Sat May 10 21:37:56 2008
--- src/version.c	Wed May 28 16:40:11 2008
***************
*** 668,669 ****
--- 673,676 ----
  {   /* Add new patch number below this line */
+ /**/
+     299,
  /**/

-- 
FIRST SOLDIER:  So they wouldn't be able to bring a coconut back anyway.
SECOND SOLDIER: Wait a minute! Suppose two swallows carried it together?
FIRST SOLDIER:  No, they'd have to have it on a line.
                 "Monty Python and the Holy Grail" PYTHON (MONTY) PICTURES LTD

 /// Bram Moolenaar -- Bram@Moolenaar.net -- http://www.Moolenaar.net   \\\
///        sponsor Vim, vote for features -- http://www.Vim.org/sponsor/ \\\
\\\        download, build and distribute -- http://www.A-A-P.org        ///
 \\\            help me help AIDS victims -- http://ICCF-Holland.org    ///
Commit	Line	Data
3ab71051 ER	1	To: vim-dev@vim.org
	2	Subject: Patch 7.1.299
	3	Fcc: outbox
	4	From: Bram Moolenaar <Bram@moolenaar.net>
	5	Mime-Version: 1.0
	6	Content-Type: text/plain; charset=ISO-8859-1
	7	Content-Transfer-Encoding: 8bit
	8	------------
	9
	10	Patch 7.1.299
	11	Problem: Filetype detection doesn't work properly for file names ending in
	12	a part that is ignored and contain a space or other special
	13	characters.
	14	Solution: Escape the special characters using the new fnameescape function.
	15	Files: runtime/doc/eval.txt, runtime/filetype.vim, src/eval.c,
	16	src/ex_getln.c, src/proto/ex_getln.pro, src/vim.h
	17
	18
	19	*** ../vim-7.1.298/runtime/doc/eval.txt Wed Feb 20 20:09:44 2008
	20	--- runtime/doc/eval.txt Wed May 28 16:42:42 2008
	21	***************
	22	* 1,4 **
	23	! eval.txt For Vim version 7.1. Last change: 2008 Feb 20
	24
	25
	26	VIM REFERENCE MANUAL by Bram Moolenaar
	27	--- 1,4 ----
	28	! eval.txt For Vim version 7.1. Last change: 2008 May 28
	29
	30
	31	VIM REFERENCE MANUAL by Bram Moolenaar
	32	***************
	33	* 1609,1614 **
	34	--- 1652,1658 ----
	35	String find directory {name} in {path}
	36	findfile( {name}[, {path}[, {count}]])
	37	String find file {name} in {path}
	38	+ fnameescape( {fname}) String escape special characters in {fname}
	39	fnamemodify( {fname}, {mods}) String modify file name
	40	foldclosed( {lnum}) Number first line of fold at {lnum} if closed
	41	foldclosedend( {lnum}) Number last line of fold at {lnum} if closed
	42	***************
	43	* 2620,2625 **
	44	--- 2669,2687 ----
	45	< Searches from the directory of the current file upwards until
	46	it finds the file "tags.vim".
	47
	48	+ fnameescape({string}) fnameescape()
	49	+ Escape {string} for use as file name command argument. All
	50	+ characters that have a special meaning, such as '%' and '\|'
	51	+ are escaped with a backslash.
	52	+ For most systems the characters escaped are "". For systems
	53	+ where a backslash appears in a filename, it depends on the
	54	+ value of 'isfname'.
	55	+ Example: >
	56	+ :let fname = 'some str%nge\|name'
	57	+ :exe "edit " . fnameescape(fname)
	58	+ < results in executing: >
	59	+ edit some\ str\%nge\\|name
	60	+
	61	fnamemodify({fname}, {mods}) fnamemodify()
	62	Modify file name {fname} according to {mods}. {mods} is a
	63	string of characters like it is used for file names on the
	64	*** ../vim-7.1.298/runtime/filetype.vim Tue May 15 09:14:33 2007
65	--- runtime/filetype.vim Wed May 28 16:39:09 2008
66	***************
67	* 16,35 **
68	augroup filetypedetect
69
70	" Ignored extensions
71	au BufNewFile,BufRead ?\+.orig,?\+.bak,?\+.old,?\+.new,?\+.rpmsave,?\+.rpmnew
72	! \ exe "doau filetypedetect BufRead " . expand("<afile>:r")
73	au BufNewFile,BufRead *~
74	\ let s:name = expand("<afile>") \|
75	\ let s:short = substitute(s:name, '\~$', '', '') \|
76	\ if s:name != s:short && s:short != "" \|
77	! \ exe "doau filetypedetect BufRead " . s:short \|
78	\ endif \|
79	! \ unlet s:name \|
80	! \ unlet s:short
81	au BufNewFile,BufRead ?\+.in
82	\ if expand("<afile>:t") != "configure.in" \|
83	! \ exe "doau filetypedetect BufRead " . expand("<afile>:r") \|
84	\ endif
85
86	" Pattern used to match file names which should not be inspected.
87	" Currently finds compressed files.
88	--- 16,38 ----
89	augroup filetypedetect
90
91	" Ignored extensions
92	+ if exists("*fnameescape")
93	au BufNewFile,BufRead ?\+.orig,?\+.bak,?\+.old,?\+.new,?\+.rpmsave,?\+.rpmnew
94	! \ exe "doau filetypedetect BufRead " . fnameescape(expand("<afile>:r"))
95	au BufNewFile,BufRead *~
96	\ let s:name = expand("<afile>") \|
97	\ let s:short = substitute(s:name, '\~$', '', '') \|
98	\ if s:name != s:short && s:short != "" \|
99	! \ exe "doau filetypedetect BufRead " . fnameescape(s:short) \|
100	\ endif \|
101	! \ unlet s:name s:short
102	au BufNewFile,BufRead ?\+.in
103	\ if expand("<afile>:t") != "configure.in" \|
104	! \ exe "doau filetypedetect BufRead " . fnameescape(expand("<afile>:r")) \|
105	\ endif
106	+ elseif &verbose > 0
107	+ echomsg "Warning: some filetypes will not be recognized because this version of Vim does not have fnameescape()"
108	+ endif
109
110	" Pattern used to match file names which should not be inspected.
111	" Currently finds compressed files.
112	*** ../vim-7.1.298/src/eval.c Tue Apr 1 13:10:45 2008
113	--- src/eval.c Wed May 28 16:35:51 2008
114	***************
115	* 507,512 **
116	--- 516,522 ----
117	static void f_filter __ARGS((typval_T argvars, typval_T rettv));
118	static void f_finddir __ARGS((typval_T argvars, typval_T rettv));
119	static void f_findfile __ARGS((typval_T argvars, typval_T rettv));
120	+ static void f_fnameescape __ARGS((typval_T argvars, typval_T rettv));
121	static void f_fnamemodify __ARGS((typval_T argvars, typval_T rettv));
122	static void f_foldclosed __ARGS((typval_T argvars, typval_T rettv));
123	static void f_foldclosedend __ARGS((typval_T argvars, typval_T rettv));
124	***************
125	* 7107,7112 **
126	--- 7437,7443 ----
127	{"filter", 2, 2, f_filter},
128	{"finddir", 1, 3, f_finddir},
129	{"findfile", 1, 3, f_findfile},
130	+ {"fnameescape", 1, 1, f_fnameescape},
131	{"fnamemodify", 2, 2, f_fnamemodify},
132	{"foldclosed", 1, 1, f_foldclosed},
133	{"foldclosedend", 1, 1, f_foldclosedend},
134	***************
135	* 9465,9470 **
136	--- 9804,9822 ----
137	}
138
139	/*
140	+ * "fnameescape({string})" function
141	+ */
142	+ static void
143	+ f_fnameescape(argvars, rettv)
144	+ typval_T *argvars;
145	+ typval_T *rettv;
146	+ {
147	+ rettv->vval.v_string = vim_strsave_fnameescape(
148	+ get_tv_string(&argvars[0]), FALSE);
149	+ rettv->v_type = VAR_STRING;
150	+ }
151	+
152	+ /*
153	* "fnamemodify({fname}, {mods})" function
154	*/
155	static void
156	*** ../vim-7.1.298/src/ex_getln.c Tue Jan 22 12:44:03 2008
157	--- src/ex_getln.c Mon May 26 22:14:51 2008
158	***************
159	* 3656,3677 **
160	#endif
161	}
162	}
163	! #ifdef BACKSLASH_IN_FILENAME
164	! {
165	! char_u buf[20];
166	! int j = 0;
167	!
168	! /* Don't escape '[' and '{' if they are in 'isfname'. */
169	! for (p = PATH_ESC_CHARS; *p != NUL; ++p)
170	! if ((p != '[' && p != '{') \|\| !vim_isfilec(*p))
171	! buf[j++] = *p;
172	! buf[j] = NUL;
173	! p = vim_strsave_escaped(files[i], buf);
174	! }
175	! #else
176	! p = vim_strsave_escaped(files[i],
177	! xp->xp_shell ? SHELL_ESC_CHARS : PATH_ESC_CHARS);
178	! #endif
179	if (p != NULL)
180	{
181	vim_free(files[i]);
182	--- 3656,3662 ----
183	#endif
184	}
185	}
186	! p = vim_strsave_fnameescape(files[i], xp->xp_shell);
187	if (p != NULL)
188	{
189	vim_free(files[i]);
190	***************
191	* 3710,3715 **
192	--- 3695,3725 ----
193	}
194
195	/*
196	+ * Escape special characters in "fname" for when used as a file name argument
197	+ * after a Vim command, or, when "shell" is non-zero, a shell command.
198	+ * Returns the result in allocated memory.
199	+ */
200	+ char_u *
201	+ vim_strsave_fnameescape(fname, shell)
202	+ char_u *fname;
203	+ int shell;
204	+ {
205	+ #ifdef BACKSLASH_IN_FILENAME
206	+ char_u buf[20];
207	+ int j = 0;
208	+
209	+ /* Don't escape '[' and '{' if they are in 'isfname'. */
210	+ for (p = PATH_ESC_CHARS; *p != NUL; ++p)
211	+ if ((p != '[' && p != '{') \|\| !vim_isfilec(*p))
212	+ buf[j++] = *p;
213	+ buf[j] = NUL;
214	+ return vim_strsave_escaped(fname, buf);
215	+ #else
216	+ return vim_strsave_escaped(fname, shell ? SHELL_ESC_CHARS : PATH_ESC_CHARS);
217	+ #endif
218	+ }
219	+
220	+ /*
221	* Put a backslash before the file name in "pp", which is in allocated memory.
222	*/
223	static void
224	*** ../vim-7.1.298/src/proto/ex_getln.pro Sat May 5 19:24:48 2007
225	--- src/proto/ex_getln.pro Mon May 26 22:14:41 2008
226	***************
227	* 24,29 **
228	--- 24,30 ----
229	void ExpandInit __ARGS((expand_T *xp));
230	void ExpandCleanup __ARGS((expand_T *xp));
231	void ExpandEscape __ARGS((expand_T xp, char_u str, int numfiles, char_u **files, int options));
232	+ char_u vim_strsave_fnameescape __ARGS((char_u fname, int shell));
233	void tilde_replace __ARGS((char_u orig_pat, int num_files, char_u *files));
234	char_u sm_gettail __ARGS((char_u s));
235	char_u addstar __ARGS((char_u fname, int len, int context));
236	*** ../vim-7.1.298/src/vim.h Sun Mar 16 16:02:47 2008
237	--- src/vim.h Wed May 28 16:37:50 2008
238	***************
239	* 336,345 **
240	# endif
241	#endif
242	#ifdef BACKSLASH_IN_FILENAME
243	! # define PATH_ESC_CHARS ((char_u )" \t?[{`%#")
244	#else
245	! # define PATH_ESC_CHARS ((char_u )" \t?[{`$\\%#'\"\|")
246	! # define SHELL_ESC_CHARS ((char_u )" \t?[{`$\\%#'\"\|<>();&!")
247	#endif
248
249	#define NUMBUFLEN 30 /* length of a buffer to store a number in ASCII */
250	--- 336,345 ----
251	# endif
252	#endif
253	#ifdef BACKSLASH_IN_FILENAME
254	! # define PATH_ESC_CHARS ((char_u )" \t\n?[{`%#'\"\|!<")
255	#else
256	! # define PATH_ESC_CHARS ((char_u )" \t\n?[{`$\\%#'\"\|!<")
257	! # define SHELL_ESC_CHARS ((char_u )" \t\n?[{`$\\%#'\"\|!<>();&")
258	#endif
259
260	#define NUMBUFLEN 30 /* length of a buffer to store a number in ASCII */
261	*** ../vim-7.1.298/src/version.c Sat May 10 21:37:56 2008
262	--- src/version.c Wed May 28 16:40:11 2008
263	***************
264	* 668,669 **
265	--- 673,676 ----
266	{ /* Add new patch number below this line */
267	+ /**/
268	+ 299,
269	/**/
270
271	--
272	FIRST SOLDIER: So they wouldn't be able to bring a coconut back anyway.
273	SECOND SOLDIER: Wait a minute! Suppose two swallows carried it together?
274	FIRST SOLDIER: No, they'd have to have it on a line.
275	"Monty Python and the Holy Grail" PYTHON (MONTY) PICTURES LTD
276
277	/// Bram Moolenaar -- Bram@Moolenaar.net -- http://www.Moolenaar.net \\\
278	/// sponsor Vim, vote for features -- http://www.Vim.org/sponsor/ \\\
279	\\\ download, build and distribute -- http://www.A-A-P.org ///
280	\\\ help me help AIDS victims -- http://ICCF-Holland.org ///