home *** CD-ROM | disk | FTP | other *** search
/ vim.ftp.fu-berlin.de / 2015-02-03.vim.ftp.fu-berlin.de.tar / vim.ftp.fu-berlin.de / patches / 7.0 / 7.0.111 < prev    next >
Encoding:
Internet Message Format  |  2006-10-02  |  10.2 KB
  1. To: vim-dev@vim.org
  2. Subject: Patch 7.0.111
  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.0.111
  11. Problem:    The gzip plugin can't handle filenames with single quotes.
  12. Solution:   Add and use the shellescape() function. (partly by Alexey Froloff)
  13. Files:      runtime/autoload/gzip.vim, runtime/doc/eval.txt, src/eval.c,
  14.             src/mbyte.c, src/misc2.c, src/proto/misc2.pro
  15.  
  16.  
  17. *** ../vim-7.0.110/runtime/autoload/gzip.vim    Tue Aug  8 19:55:06 2006
  18. --- runtime/autoload/gzip.vim    Tue Oct  3 14:39:29 2006
  19. ***************
  20. *** 1,6 ****
  21.   " Vim autoload file for editing compressed files.
  22.   " Maintainer: Bram Moolenaar <Bram@vim.org>
  23. ! " Last Change: 2006 Jul 19
  24.   
  25.   " These functions are used by the gzip plugin.
  26.   
  27. --- 1,6 ----
  28.   " Vim autoload file for editing compressed files.
  29.   " Maintainer: Bram Moolenaar <Bram@vim.org>
  30. ! " Last Change: 2006 Oct 03
  31.   
  32.   " These functions are used by the gzip plugin.
  33.   
  34. ***************
  35. *** 68,76 ****
  36.     let tmp = tempname()
  37.     let tmpe = tmp . "." . expand("<afile>:e")
  38.     " write the just read lines to a temp file "'[,']w tmp.gz"
  39. !   execute "silent '[,']w " . tmpe
  40.     " uncompress the temp file: call system("gzip -dn tmp.gz")
  41. !   call system(a:cmd . " " . tmpe)
  42.     if !filereadable(tmp)
  43.       " uncompress didn't work!  Keep the compressed file then.
  44.       echoerr "Error: Could not read uncompressed file"
  45. --- 68,76 ----
  46.     let tmp = tempname()
  47.     let tmpe = tmp . "." . expand("<afile>:e")
  48.     " write the just read lines to a temp file "'[,']w tmp.gz"
  49. !   execute "silent '[,']w " . escape(tmpe, ' ')
  50.     " uncompress the temp file: call system("gzip -dn tmp.gz")
  51. !   call system(a:cmd . " " . s:escape(tmpe))
  52.     if !filereadable(tmp)
  53.       " uncompress didn't work!  Keep the compressed file then.
  54.       echoerr "Error: Could not read uncompressed file"
  55. ***************
  56. *** 127,135 ****
  57.       let nmt = s:tempname(nm)
  58.       if rename(nm, nmt) == 0
  59.         if exists("b:gzip_comp_arg")
  60. !     call system(a:cmd . " " . b:gzip_comp_arg . " '" . nmt . "'")
  61.         else
  62. !     call system(a:cmd . " '" . nmt . "'")
  63.         endif
  64.         call rename(nmt . "." . expand("<afile>:e"), nm)
  65.       endif
  66. --- 127,135 ----
  67.       let nmt = s:tempname(nm)
  68.       if rename(nm, nmt) == 0
  69.         if exists("b:gzip_comp_arg")
  70. !     call system(a:cmd . " " . b:gzip_comp_arg . " " . s:escape(nmt))
  71.         else
  72. !     call system(a:cmd . " " . s:escape(nmt))
  73.         endif
  74.         call rename(nmt . "." . expand("<afile>:e"), nm)
  75.       endif
  76. ***************
  77. *** 154,163 ****
  78.       if rename(nm, nmte) == 0
  79.         if &patchmode != "" && getfsize(nm . &patchmode) == -1
  80.       " Create patchmode file by creating the decompressed file new
  81. !     call system(a:cmd . " -c " . nmte . " > " . nmt)
  82.       call rename(nmte, nm . &patchmode)
  83.         else
  84. !     call system(a:cmd . " " . nmte)
  85.         endif
  86.         call rename(nmt, nm)
  87.       endif
  88. --- 154,163 ----
  89.       if rename(nm, nmte) == 0
  90.         if &patchmode != "" && getfsize(nm . &patchmode) == -1
  91.       " Create patchmode file by creating the decompressed file new
  92. !     call system(a:cmd . " -c " . s:escape(nmte) . " > " . s:escape(nmt))
  93.       call rename(nmte, nm . &patchmode)
  94.         else
  95. !     call system(a:cmd . " " . s:escape(nmte))
  96.         endif
  97.         call rename(nmt, nm)
  98.       endif
  99. ***************
  100. *** 173,178 ****
  101. --- 173,186 ----
  102.       return fn
  103.     endif
  104.     return fnamemodify(a:name, ":p:h") . "/X~=@l9q5"
  105. + endfun
  106. + 
  107. + fun s:escape(name)
  108. +   " shellescape() was added by patch 7.0.111
  109. +   if v:version > 700 || (v:version == 700 && has('patch111'))
  110. +     return shellescape(a:name)
  111. +   endif
  112. +   return "'" . a:name . "'"
  113.   endfun
  114.   
  115.   " vim: set sw=2 :
  116. *** ../vim-7.0.110/runtime/doc/eval.txt    Sun May  7 17:08:32 2006
  117. --- runtime/doc/eval.txt    Fri Sep 22 19:43:18 2006
  118. ***************
  119. *** 1,4 ****
  120. ! *eval.txt*      For Vim version 7.0.  Last change: 2006 May 06
  121.   
  122.   
  123.             VIM REFERENCE MANUAL    by Bram Moolenaar
  124. --- 1,4 ----
  125. ! *eval.txt*      For Vim version 7.0.  Last change: 2006 Sep 22
  126.   
  127.   
  128.             VIM REFERENCE MANUAL    by Bram Moolenaar
  129. ***************
  130. *** 1709,1714 ****
  131. --- 1715,1722 ----
  132.   settabwinvar( {tabnr}, {winnr}, {varname}, {val})    set {varname} in window
  133.                       {winnr} in tab page {tabnr} to {val}
  134.   setwinvar( {nr}, {varname}, {val})    set {varname} in window {nr} to {val}
  135. + shellescape( {string})        String    escape {string} for use as shell
  136. +                     command argument
  137.   simplify( {filename})        String    simplify filename as much as possible
  138.   sort( {list} [, {func}])    List    sort {list}, using {func} to compare
  139.   soundfold( {word})        String    sound-fold {word}
  140. ***************
  141. *** 4434,4439 ****
  142. --- 4457,4477 ----
  143.               :call setwinvar(1, "&list", 0)
  144.               :call setwinvar(2, "myvar", "foobar")
  145.   
  146. + shellescape({string})                    *shellescape()*
  147. +         Escape {string} for use as shell command argument.
  148. +         On MS-Windows and MS-DOS, when 'shellslash' is not set, it
  149. +         will enclose {string} double quotes and double all double
  150. +         quotes within {string}.
  151. +         For other systems, it will enclose {string} in single quotes
  152. +         and replace all "'" with "'\''".
  153. +         Example: >
  154. +             :echo shellescape('c:\program files\vim')
  155. + <        results in:
  156. +             "c:\program files\vim" ~
  157. +         Example usage: >
  158. +             :call system("chmod +x -- " . shellescape(expand("%")))
  159. + 
  160. + 
  161.   simplify({filename})                    *simplify()*
  162.           Simplify the file name as much as possible without changing
  163.           the meaning.  Shortcuts (on MS-Windows) or symbolic links (on
  164. *** ../vim-7.0.110/src/eval.c    Sat Sep  9 12:05:39 2006
  165. --- src/eval.c    Thu Sep 14 17:44:41 2006
  166. ***************
  167. *** 622,627 ****
  168. --- 622,628 ----
  169.   static void f_setreg __ARGS((typval_T *argvars, typval_T *rettv));
  170.   static void f_settabwinvar __ARGS((typval_T *argvars, typval_T *rettv));
  171.   static void f_setwinvar __ARGS((typval_T *argvars, typval_T *rettv));
  172. + static void f_shellescape __ARGS((typval_T *argvars, typval_T *rettv));
  173.   static void f_simplify __ARGS((typval_T *argvars, typval_T *rettv));
  174.   static void f_sort __ARGS((typval_T *argvars, typval_T *rettv));
  175.   static void f_soundfold __ARGS((typval_T *argvars, typval_T *rettv));
  176. ***************
  177. *** 7146,7151 ****
  178. --- 7147,7153 ----
  179.       {"setreg",        2, 3, f_setreg},
  180.       {"settabwinvar",    4, 4, f_settabwinvar},
  181.       {"setwinvar",    3, 3, f_setwinvar},
  182. +     {"shellescape",    1, 1, f_shellescape},
  183.       {"simplify",    1, 1, f_simplify},
  184.       {"sort",        1, 2, f_sort},
  185.       {"soundfold",    1, 1, f_soundfold},
  186. ***************
  187. *** 14602,14607 ****
  188. --- 14604,14621 ----
  189.       }
  190.   #endif
  191.       }
  192. + }
  193. + 
  194. + /*
  195. +  * "shellescape({string})" function
  196. +  */
  197. +     static void
  198. + f_shellescape(argvars, rettv)
  199. +     typval_T    *argvars;
  200. +     typval_T    *rettv;
  201. + {
  202. +     rettv->vval.v_string = vim_strsave_shellescape(get_tv_string(&argvars[0]));
  203. +     rettv->v_type = VAR_STRING;
  204.   }
  205.   
  206.   /*
  207. *** ../vim-7.0.110/src/misc2.c    Thu May  4 23:50:56 2006
  208. --- src/misc2.c    Tue Sep 26 23:13:57 2006
  209. ***************
  210. *** 1229,1234 ****
  211. --- 1229,1322 ----
  212.       return escaped_string;
  213.   }
  214.   
  215. + #if defined(FEAT_EVAL) || defined(PROTO)
  216. + /*
  217. +  * Escape "string" for use as a shell argument with system().
  218. +  * This uses single quotes, except when we know we need to use double qoutes
  219. +  * (MS-DOS and MS-Windows without 'shellslash' set).
  220. +  * Returns the result in allocated memory, NULL if we have run out.
  221. +  */
  222. +     char_u *
  223. + vim_strsave_shellescape(string)
  224. +     char_u    *string;
  225. + {
  226. +     unsigned    length;
  227. +     char_u    *p;
  228. +     char_u    *d;
  229. +     char_u    *escaped_string;
  230. + 
  231. +     /* First count the number of extra bytes required. */
  232. +     length = STRLEN(string) + 3;    /* two quotes and the trailing NUL */
  233. +     for (p = string; *p != NUL; mb_ptr_adv(p))
  234. +     {
  235. + # if defined(WIN32) || defined(WIN16) || defined(DOS)
  236. +     if (!p_ssl)
  237. +     {
  238. +         if (*p == '"')
  239. +         ++length;        /* " -> "" */
  240. +     }
  241. +     else
  242. + # endif
  243. +     if (*p == '\'')
  244. +         length += 3;        /* ' => '\'' */
  245. +     }
  246. + 
  247. +     /* Allocate memory for the result and fill it. */
  248. +     escaped_string = alloc(length);
  249. +     if (escaped_string != NULL)
  250. +     {
  251. +     d = escaped_string;
  252. + 
  253. +     /* add opening quote */
  254. + # if defined(WIN32) || defined(WIN16) || defined(DOS)
  255. +     if (!p_ssl)
  256. +         *d++ = '"';
  257. +     else
  258. + # endif
  259. +         *d++ = '\'';
  260. + 
  261. +     for (p = string; *p != NUL; )
  262. +     {
  263. + # if defined(WIN32) || defined(WIN16) || defined(DOS)
  264. +         if (!p_ssl)
  265. +         {
  266. +         if (*p == '"')
  267. +         {
  268. +             *d++ = '"';
  269. +             *d++ = '"';
  270. +             ++p;
  271. +             continue;
  272. +         }
  273. +         }
  274. +         else
  275. + # endif
  276. +         if (*p == '\'')
  277. +         {
  278. +         *d++='\'';
  279. +         *d++='\\';
  280. +         *d++='\'';
  281. +         *d++='\'';
  282. +         ++p;
  283. +         continue;
  284. +         }
  285. + 
  286. +         MB_COPY_CHAR(p, d);
  287. +     }
  288. + 
  289. +     /* add terminating quote and finish with a NUL */
  290. + # if defined(WIN32) || defined(WIN16) || defined(DOS)
  291. +     if (!p_ssl)
  292. +         *d++ = '"';
  293. +     else
  294. + # endif
  295. +         *d++ = '\'';
  296. +     *d = NUL;
  297. +     }
  298. + 
  299. +     return escaped_string;
  300. + }
  301. + #endif
  302. + 
  303.   /*
  304.    * Like vim_strsave(), but make all characters uppercase.
  305.    * This uses ASCII lower-to-upper case translation, language independent.
  306. *** ../vim-7.0.110/src/proto/misc2.pro    Fri Mar 24 23:42:55 2006
  307. --- src/proto/misc2.pro    Thu Sep 14 18:28:43 2006
  308. ***************
  309. *** 29,34 ****
  310. --- 29,35 ----
  311.   extern char_u *vim_strnsave __ARGS((char_u *string, int len));
  312.   extern char_u *vim_strsave_escaped __ARGS((char_u *string, char_u *esc_chars));
  313.   extern char_u *vim_strsave_escaped_ext __ARGS((char_u *string, char_u *esc_chars, int cc, int bsl));
  314. + extern char_u *vim_strsave_shellescape __ARGS((char_u *string));
  315.   extern char_u *vim_strsave_up __ARGS((char_u *string));
  316.   extern char_u *vim_strnsave_up __ARGS((char_u *string, int len));
  317.   extern void vim_strup __ARGS((char_u *p));
  318. *** ../vim-7.0.110/src/version.c    Tue Sep 26 13:49:41 2006
  319. --- src/version.c    Tue Oct  3 14:36:40 2006
  320. ***************
  321. *** 668,669 ****
  322. --- 668,671 ----
  323.   {   /* Add new patch number below this line */
  324. + /**/
  325. +     111,
  326.   /**/
  327.  
  328. -- 
  329. The only way the average employee can speak to an executive is by taking a
  330. second job as a golf caddie.
  331.                 (Scott Adams - The Dilbert principle)
  332.  
  333.  /// Bram Moolenaar -- Bram@Moolenaar.net -- http://www.Moolenaar.net   \\\
  334. ///        sponsor Vim, vote for features -- http://www.Vim.org/sponsor/ \\\
  335. \\\        download, build and distribute -- http://www.A-A-P.org        ///
  336.  \\\            help me help AIDS victims -- http://ICCF-Holland.org    ///
  337.