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 / 6.1.418 < prev    next >
Encoding:
Internet Message Format  |  2003-03-25  |  13.6 KB
  1. To: vim-dev@vim.org
  2. Subject: Patch 6.1.418 (extra)
  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 6.1.418 (extra)
  11. Problem:    The result of strftime() is in the current locals.  Need to
  12.         convert it to 'encoding'.
  13. Solution:   Obtain the current locale and convert the argument for strftime()
  14.         to it and the result back to 'encoding'.  (Daniel Elstner)
  15. Files:        src/eval.c, src/ex_cmds.c, src/ex_cmds2.c, src/mbyte.c,
  16.         src/proto/mbyte.pro, src/option.c, src/os_mswin.c
  17.  
  18.  
  19. *** ../vim61.417/src/eval.c    Sat Mar 15 17:55:18 2003
  20. --- src/eval.c    Fri Mar 21 20:33:32 2003
  21. ***************
  22. *** 4822,4830 ****
  23.       str = get_var_string(&argvars[0]);
  24.       from = enc_canonize(enc_skip(get_var_string_buf(&argvars[1], buf1)));
  25.       to = enc_canonize(enc_skip(get_var_string_buf(&argvars[2], buf2)));
  26. ! # ifdef USE_ICONV
  27. !     vimconv.vc_fd = (iconv_t)-1;
  28. ! # endif
  29.       convert_setup(&vimconv, from, to);
  30.   
  31.       /* If the encodings are equal, no conversion needed. */
  32. --- 4822,4828 ----
  33.       str = get_var_string(&argvars[0]);
  34.       from = enc_canonize(enc_skip(get_var_string_buf(&argvars[1], buf1)));
  35.       to = enc_canonize(enc_skip(get_var_string_buf(&argvars[2], buf2)));
  36. !     vimconv.vc_type = CONV_NONE;
  37.       convert_setup(&vimconv, from, to);
  38.   
  39.       /* If the encodings are equal, no conversion needed. */
  40. ***************
  41. *** 4833,4839 ****
  42.       else
  43.       retvar->var_val.var_string = string_convert(&vimconv, str, NULL);
  44.   
  45. !     convert_setup(&vimconv, (char_u *)"", (char_u *)"");
  46.       vim_free(from);
  47.       vim_free(to);
  48.   #endif
  49. --- 4831,4837 ----
  50.       else
  51.       retvar->var_val.var_string = string_convert(&vimconv, str, NULL);
  52.   
  53. !     convert_setup(&vimconv, NULL, NULL);
  54.       vim_free(from);
  55.       vim_free(to);
  56.   #endif
  57. ***************
  58. *** 6087,6097 ****
  59.       VAR        argvars;
  60.       VAR        retvar;
  61.   {
  62. !     char_u    result_buf[80];
  63.       struct tm    *curtime;
  64.       time_t    seconds;
  65.       char_u    *p;
  66.   
  67.       p = get_var_string(&argvars[0]);
  68.       if (argvars[1].var_type == VAR_UNKNOWN)
  69.       seconds = time(NULL);
  70. --- 6085,6097 ----
  71.       VAR        argvars;
  72.       VAR        retvar;
  73.   {
  74. !     char_u    result_buf[256];
  75.       struct tm    *curtime;
  76.       time_t    seconds;
  77.       char_u    *p;
  78.   
  79. +     retvar->var_type = VAR_STRING;
  80. + 
  81.       p = get_var_string(&argvars[0]);
  82.       if (argvars[1].var_type == VAR_UNKNOWN)
  83.       seconds = time(NULL);
  84. ***************
  85. *** 6100,6111 ****
  86.       curtime = localtime(&seconds);
  87.       /* MSVC returns NULL for an invalid value of seconds. */
  88.       if (curtime == NULL)
  89. !     STRCPY(result_buf, _("(Invalid)"));
  90.       else
  91. !     (void)strftime((char *)result_buf, (size_t)80, (char *)p, curtime);
  92.   
  93. !     retvar->var_type = VAR_STRING;
  94. !     retvar->var_val.var_string = vim_strsave(result_buf);
  95.   }
  96.   #endif
  97.   
  98. --- 6100,6141 ----
  99.       curtime = localtime(&seconds);
  100.       /* MSVC returns NULL for an invalid value of seconds. */
  101.       if (curtime == NULL)
  102. !     retvar->var_val.var_string = vim_strsave((char_u *)_("(Invalid)"));
  103.       else
  104. !     {
  105. ! # ifdef FEAT_MBYTE
  106. !     vimconv_T   conv;
  107. !     char_u        *enc;
  108. ! 
  109. !     conv.vc_type = CONV_NONE;
  110. !     enc = enc_locale();
  111. !     convert_setup(&conv, p_enc, enc);
  112. !     if (conv.vc_type != CONV_NONE)
  113. !         p = string_convert(&conv, p, NULL);
  114. ! # endif
  115. !     if (p != NULL)
  116. !         (void)strftime((char *)result_buf, sizeof(result_buf),
  117. !                               (char *)p, curtime);
  118. !     else
  119. !         result_buf[0] = NUL;
  120.   
  121. ! # ifdef FEAT_MBYTE
  122. !     if (conv.vc_type != CONV_NONE)
  123. !         vim_free(p);
  124. !     convert_setup(&conv, enc, p_enc);
  125. !     if (conv.vc_type != CONV_NONE)
  126. !         retvar->var_val.var_string =
  127. !                       string_convert(&conv, result_buf, NULL);
  128. !     else
  129. ! # endif
  130. !         retvar->var_val.var_string = vim_strsave(result_buf);
  131. ! 
  132. ! # ifdef FEAT_MBYTE
  133. !     /* Release conversion descriptors */
  134. !     convert_setup(&conv, NULL, NULL);
  135. !     vim_free(enc);
  136. ! # endif
  137. !     }
  138.   }
  139.   #endif
  140.   
  141. *** ../vim61.417/src/ex_cmds.c    Sun Mar 16 22:28:10 2003
  142. --- src/ex_cmds.c    Fri Mar 21 20:20:33 2003
  143. ***************
  144. *** 1600,1608 ****
  145.       vir.vir_fd = fp_in;
  146.   #ifdef FEAT_MBYTE
  147.       vir.vir_conv.vc_type = CONV_NONE;
  148. - # ifdef USE_ICONV
  149. -     vir.vir_conv.vc_fd = (iconv_t)-1;
  150. - # endif
  151.   #endif
  152.   
  153.       if (fp_in != NULL)
  154. --- 1600,1605 ----
  155. ***************
  156. *** 1644,1650 ****
  157.       vim_free(vir.vir_line);
  158.   #ifdef FEAT_MBYTE
  159.       if (vir.vir_conv.vc_type != CONV_NONE)
  160. !     convert_setup(&vir.vir_conv, (char_u *)"", (char_u *)"");
  161.   #endif
  162.   }
  163.   
  164. --- 1641,1647 ----
  165.       vim_free(vir.vir_line);
  166.   #ifdef FEAT_MBYTE
  167.       if (vir.vir_conv.vc_type != CONV_NONE)
  168. !     convert_setup(&vir.vir_conv, NULL, NULL);
  169.   #endif
  170.   }
  171.   
  172. *** ../vim61.417/src/ex_cmds2.c    Sat Mar 15 17:55:18 2003
  173. --- src/ex_cmds2.c    Fri Mar 21 20:21:05 2003
  174. ***************
  175. *** 2059,2067 ****
  176.   #endif
  177.   #ifdef FEAT_MBYTE
  178.       cookie.conv.vc_type = CONV_NONE;        /* no conversion */
  179. - # ifdef USE_ICONV
  180. -     cookie.conv.vc_fd = (iconv_t)-1;
  181. - # endif
  182.   #endif
  183.   
  184.       /*
  185. --- 2059,2064 ----
  186. *** ../vim61.417/src/mbyte.c    Wed Mar 26 21:35:24 2003
  187. --- src/mbyte.c    Wed Mar 26 19:53:37 2003
  188. ***************
  189. *** 361,370 ****
  190.       input_conv.vc_type = CONV_NONE;
  191.       input_conv.vc_factor = 1;
  192.       output_conv.vc_type = CONV_NONE;
  193. - #ifdef USE_ICONV
  194. -     input_conv.vc_fd = (iconv_t)-1;
  195. -     output_conv.vc_fd = (iconv_t)-1;
  196. - #endif
  197.       return NULL;
  198.       }
  199.   
  200. --- 361,366 ----
  201. ***************
  202. *** 575,584 ****
  203.       set_string_option_direct((char_u *)"fencs", -1,
  204.                    (char_u *)"ucs-bom,utf-8,latin1", OPT_FREE);
  205.   #ifdef FEAT_MBYTE_IME
  206. ! # ifdef USE_ICONV
  207. !     ime_conv.vc_fd = (iconv_t)-1;
  208. !     ime_conv_cp.vc_fd = (iconv_t)-1;
  209. ! # endif
  210.       convert_setup(&ime_conv, (char_u *)"ucs-2", p_enc);
  211.       ime_conv_cp.vc_type = CONV_DBCS_TO_UCS2;
  212.       ime_conv_cp.vc_dbcs = GetACP();
  213. --- 571,578 ----
  214.       set_string_option_direct((char_u *)"fencs", -1,
  215.                    (char_u *)"ucs-bom,utf-8,latin1", OPT_FREE);
  216.   #ifdef FEAT_MBYTE_IME
  217. !     ime_conv.vc_type = CONV_NONE;
  218. !     ime_conv_cp.vc_type = CONV_NONE;
  219.       convert_setup(&ime_conv, (char_u *)"ucs-2", p_enc);
  220.       ime_conv_cp.vc_type = CONV_DBCS_TO_UCS2;
  221.       ime_conv_cp.vc_dbcs = GetACP();
  222. ***************
  223. *** 2426,2437 ****
  224.   #endif
  225.   
  226.   /*
  227. !  * Set the default value for 'encoding' (p_enc).
  228. !  * This must be called only once.
  229. !  * Returns OK when successful, FAIL when not.
  230.    */
  231. !     int
  232. ! enc_default()
  233.   {
  234.   #ifndef WIN3264
  235.       char    *s;
  236. --- 2455,2465 ----
  237.   #endif
  238.   
  239.   /*
  240. !  * Get the canonicalized encoding of the current locale.
  241. !  * Returns an allocated string when successful, NULL when not.
  242.    */
  243. !     char_u *
  244. ! enc_locale()
  245.   {
  246.   #ifndef WIN3264
  247.       char    *s;
  248. ***************
  249. *** 2439,2445 ****
  250.       int        i;
  251.   #endif
  252.       char    buf[50];
  253. -     char_u    *save_enc;
  254.   #ifdef WIN3264
  255.       long    acp = GetACP();
  256.   
  257. --- 2467,2472 ----
  258. ***************
  259. *** 2498,2515 ****
  260.       buf[i] = NUL;
  261.   #endif
  262.   
  263. !     /*
  264. !      * Try setting 'encoding' and check if the value is valid.
  265. !      * If not, go back to the default "latin1".
  266. !      */
  267. !     save_enc = p_enc;
  268. !     p_enc = enc_canonize((char_u *)buf);
  269. !     if (p_enc != NULL && mb_init() == NULL)
  270. !     return OK;
  271. !     vim_free(p_enc);
  272. !     p_enc = save_enc;
  273. ! 
  274. !     return FAIL;
  275.   }
  276.   
  277.   # if defined(USE_ICONV) || defined(PROTO)
  278. --- 2525,2531 ----
  279.       buf[i] = NUL;
  280.   #endif
  281.   
  282. !     return enc_canonize((char_u *)buf);
  283.   }
  284.   
  285.   # if defined(USE_ICONV) || defined(PROTO)
  286. ***************
  287. *** 2709,2717 ****
  288.   {
  289.       /* Don't use iconv() when inputting or outputting characters. */
  290.       if (input_conv.vc_type == CONV_ICONV)
  291. !     convert_setup(&input_conv, (char_u *)"", (char_u *)"");
  292.       if (output_conv.vc_type == CONV_ICONV)
  293. !     convert_setup(&output_conv, (char_u *)"", (char_u *)"");
  294.   
  295.       if (hIconvDLL != 0)
  296.       FreeLibrary(hIconvDLL);
  297. --- 2725,2733 ----
  298.   {
  299.       /* Don't use iconv() when inputting or outputting characters. */
  300.       if (input_conv.vc_type == CONV_ICONV)
  301. !     convert_setup(&input_conv, NULL, NULL);
  302.       if (output_conv.vc_type == CONV_ICONV)
  303. !     convert_setup(&output_conv, NULL, NULL);
  304.   
  305.       if (hIconvDLL != 0)
  306.       FreeLibrary(hIconvDLL);
  307. ***************
  308. *** 4062,4067 ****
  309. --- 4078,4084 ----
  310.   /*
  311.    * Setup "vcp" for conversion from "from" to "to".
  312.    * The names must have been made canonical with enc_canonize().
  313. +  * vcp->vc_type must have been initialized to CONV_NONE.
  314.    * Note: cannot be used for conversion from/to ucs-2 and ucs-4 (will use utf-8
  315.    * instead).
  316.    */
  317. ***************
  318. *** 4075,4092 ****
  319.       int        to_prop;
  320.   
  321.       /* Reset to no conversion. */
  322. -     vcp->vc_type = CONV_NONE;
  323. -     vcp->vc_factor = 1;
  324.   # ifdef USE_ICONV
  325. !     if (vcp->vc_fd != (iconv_t)-1)
  326. !     {
  327.       iconv_close(vcp->vc_fd);
  328. -     vcp->vc_fd = (iconv_t)-1;
  329. -     }
  330.   # endif
  331.   
  332.       /* No conversion when one of the names is empty or they are equal. */
  333. !     if (*from == NUL || *to == NUL || STRCMP(from, to) == 0)
  334.       return;
  335.   
  336.       from_prop = enc_canon_props(from);
  337. --- 4092,4107 ----
  338.       int        to_prop;
  339.   
  340.       /* Reset to no conversion. */
  341.   # ifdef USE_ICONV
  342. !     if (vcp->vc_type == CONV_ICONV && vcp->vc_fd != (iconv_t)-1)
  343.       iconv_close(vcp->vc_fd);
  344.   # endif
  345. +     vcp->vc_type = CONV_NONE;
  346. +     vcp->vc_factor = 1;
  347.   
  348.       /* No conversion when one of the names is empty or they are equal. */
  349. !     if (from == NULL || *from == NUL || to == NULL || *to == NUL
  350. !                              || STRCMP(from, to) == 0)
  351.       return;
  352.   
  353.       from_prop = enc_canon_props(from);
  354. *** ../vim61.417/src/proto/mbyte.pro    Fri Mar 22 21:41:17 2002
  355. --- src/proto/mbyte.pro    Fri Mar 21 20:29:42 2003
  356. ***************
  357. *** 54,60 ****
  358.   int mb_fix_col __ARGS((int col, int row));
  359.   char_u *enc_skip __ARGS((char_u *p));
  360.   char_u *enc_canonize __ARGS((char_u *enc));
  361. ! int enc_default __ARGS((void));
  362.   void *my_iconv_open __ARGS((char_u *to, char_u *from));
  363.   int iconv_enabled __ARGS((int verbose));
  364.   void iconv_end __ARGS((void));
  365. --- 54,60 ----
  366.   int mb_fix_col __ARGS((int col, int row));
  367.   char_u *enc_skip __ARGS((char_u *p));
  368.   char_u *enc_canonize __ARGS((char_u *enc));
  369. ! char_u *enc_locale __ARGS((void));
  370.   void *my_iconv_open __ARGS((char_u *to, char_u *from));
  371.   int iconv_enabled __ARGS((int verbose));
  372.   void iconv_end __ARGS((void));
  373. *** ../vim61.417/src/option.c    Sat Mar 15 17:55:18 2003
  374. --- src/option.c    Fri Mar 21 20:36:57 2003
  375. ***************
  376. *** 2658,2670 ****
  377.       }
  378.   # endif
  379.   
  380. !     /* enc_default() will try setting p_enc to a value depending on the
  381. !      * current locale */
  382. !     if (enc_default() == OK)
  383.       {
  384. !     opt_idx = findoption((char_u *)"encoding");
  385. !     options[opt_idx].def_val[VI_DEFAULT] = p_enc;
  386. !     options[opt_idx].flags |= P_DEF_ALLOCED;
  387.       }
  388.   #endif
  389.   }
  390. --- 2658,2684 ----
  391.       }
  392.   # endif
  393.   
  394. !     /* enc_locale() will try to find the encoding of the current locale. */
  395. !     p = enc_locale();
  396. !     if (p != NULL)
  397.       {
  398. !     char_u *save_enc;
  399. ! 
  400. !     /* Try setting 'encoding' and check if the value is valid.
  401. !      * If not, go back to the default "latin1". */
  402. !     save_enc = p_enc;
  403. !     p_enc = p;
  404. !     if (mb_init() == NULL)
  405. !     {
  406. !         opt_idx = findoption((char_u *)"encoding");
  407. !         options[opt_idx].def_val[VI_DEFAULT] = p_enc;
  408. !         options[opt_idx].flags |= P_DEF_ALLOCED;
  409. !     }
  410. !     else
  411. !     {
  412. !         vim_free(p_enc);
  413. !         p_enc = save_enc;
  414. !     }
  415.       }
  416.   #endif
  417.   }
  418. *** ../vim61.417/src/os_mswin.c    Sat Mar 15 16:54:47 2003
  419. --- src/os_mswin.c    Fri Mar 21 20:24:21 2003
  420. ***************
  421. *** 917,926 ****
  422.       }
  423.       else
  424.       {
  425. - #ifdef USE_ICONV
  426. -     conv.vc_fd = (iconv_t)-1;
  427. - #endif
  428.       /* We might be called before we have p_enc set up. */
  429.       convert_setup(&conv, p_enc ? p_enc : (char_u *)"latin1",
  430.                                  (char_u *)"utf-8");
  431.       if (conv.vc_type != CONV_NONE)
  432. --- 917,924 ----
  433.       }
  434.       else
  435.       {
  436.       /* We might be called before we have p_enc set up. */
  437. +     conv.vc_type = CONV_NONE;
  438.       convert_setup(&conv, p_enc ? p_enc : (char_u *)"latin1",
  439.                                  (char_u *)"utf-8");
  440.       if (conv.vc_type != CONV_NONE)
  441. ***************
  442. *** 929,935 ****
  443.           if (str == NULL)
  444.           return NULL;
  445.       }
  446. !     convert_setup(&conv, (char_u *)"", (char_u *)"");
  447.   
  448.       length = utf8_to_ucs2((char_u **)&str, len, NULL);
  449.       ret = (WCHAR *)alloc((unsigned)(length * sizeof(WCHAR)));
  450. --- 927,933 ----
  451.           if (str == NULL)
  452.           return NULL;
  453.       }
  454. !     convert_setup(&conv, NULL, NULL);
  455.   
  456.       length = utf8_to_ucs2((char_u **)&str, len, NULL);
  457.       ret = (WCHAR *)alloc((unsigned)(length * sizeof(WCHAR)));
  458. ***************
  459. *** 981,990 ****
  460.       {
  461.       *len = ucs2_to_utf8(&str, len, utf8_str);
  462.   
  463. - #ifdef USE_ICONV
  464. -     conv.vc_fd = (iconv_t)-1;
  465. - #endif
  466.       /* We might be called before we have p_enc set up. */
  467.       convert_setup(&conv, (char_u *)"utf-8",
  468.                           p_enc? p_enc: (char_u *)"latin1");
  469.       if (conv.vc_type == CONV_NONE)
  470. --- 979,986 ----
  471.       {
  472.       *len = ucs2_to_utf8(&str, len, utf8_str);
  473.   
  474.       /* We might be called before we have p_enc set up. */
  475. +     conv.vc_type = CONV_NONE;
  476.       convert_setup(&conv, (char_u *)"utf-8",
  477.                           p_enc? p_enc: (char_u *)"latin1");
  478.       if (conv.vc_type == CONV_NONE)
  479. ***************
  480. *** 998,1004 ****
  481.           vim_free(utf8_str);
  482.       }
  483.   
  484. !     convert_setup(&conv, (char_u *)"", (char_u *)"");
  485.       }
  486.   
  487.       return enc_str;
  488. --- 994,1000 ----
  489.           vim_free(utf8_str);
  490.       }
  491.   
  492. !     convert_setup(&conv, NULL, NULL);
  493.       }
  494.   
  495.       return enc_str;
  496. *** ../vim61.417/src/version.c    Wed Mar 26 21:35:24 2003
  497. --- src/version.c    Wed Mar 26 21:37:35 2003
  498. ***************
  499. *** 613,614 ****
  500. --- 613,616 ----
  501.   {   /* Add new patch number below this line */
  502. + /**/
  503. +     418,
  504.   /**/
  505.  
  506. -- 
  507. hundred-and-one symptoms of being an internet addict:
  508. 228. You spend Saturday night making the counter on your home page
  509.      pass that 2000 mark.
  510.  
  511.  /// Bram Moolenaar -- Bram@Moolenaar.net -- http://www.Moolenaar.net   \\\
  512. ///          Creator of Vim - Vi IMproved -- http://www.Vim.org          \\\
  513. \\\              Project leader for A-A-P -- http://www.A-A-P.org        ///
  514.  \\\     Help AIDS victims, buy at Amazon -- http://ICCF.nl/click1.html ///
  515.