home *** CD-ROM | disk | FTP | other *** search
- To: vim_dev@googlegroups.com
- Subject: Patch 7.4.202
- Fcc: outbox
- From: Bram Moolenaar <Bram@moolenaar.net>
- Mime-Version: 1.0
- Content-Type: text/plain; charset=UTF-8
- Content-Transfer-Encoding: 8bit
- ------------
-
- Patch 7.4.202
- Problem: MS-Windows: non-ASCII font names don't work.
- Solution: Convert between the current code page and 'encoding'. (Ken Takata)
- Files: src/gui_w48.c, src/os_mswin.c, src/proto/winclip.pro,
- src/winclip.c
-
-
- *** ../vim-7.4.201/src/gui_w48.c 2013-09-22 15:43:34.000000000 +0200
- --- src/gui_w48.c 2014-03-12 19:18:14.264927370 +0100
- ***************
- *** 3069,3083 ****
- char *p;
- char *res;
- char *charset_name;
-
- charset_name = charset_id2name((int)lf.lfCharSet);
- ! res = alloc((unsigned)(strlen(lf.lfFaceName) + 20
- + (charset_name == NULL ? 0 : strlen(charset_name) + 2)));
- if (res != NULL)
- {
- p = res;
- /* make a normal font string out of the lf thing:*/
- ! sprintf((char *)p, "%s:h%d", lf.lfFaceName, pixels_to_points(
- lf.lfHeight < 0 ? -lf.lfHeight : lf.lfHeight, TRUE));
- while (*p)
- {
- --- 3069,3094 ----
- char *p;
- char *res;
- char *charset_name;
- + char *font_name = lf.lfFaceName;
-
- charset_name = charset_id2name((int)lf.lfCharSet);
- ! #ifdef FEAT_MBYTE
- ! /* Convert a font name from the current codepage to 'encoding'.
- ! * TODO: Use Wide APIs (including LOGFONTW) instead of ANSI APIs. */
- ! if (enc_codepage >= 0 && (int)GetACP() != enc_codepage)
- ! {
- ! int len;
- ! acp_to_enc(lf.lfFaceName, strlen(lf.lfFaceName),
- ! (char_u **)&font_name, &len);
- ! }
- ! #endif
- ! res = alloc((unsigned)(strlen(font_name) + 20
- + (charset_name == NULL ? 0 : strlen(charset_name) + 2)));
- if (res != NULL)
- {
- p = res;
- /* make a normal font string out of the lf thing:*/
- ! sprintf((char *)p, "%s:h%d", font_name, pixels_to_points(
- lf.lfHeight < 0 ? -lf.lfHeight : lf.lfHeight, TRUE));
- while (*p)
- {
- ***************
- *** 3102,3107 ****
- --- 3113,3122 ----
- }
- }
-
- + #ifdef FEAT_MBYTE
- + if (font_name != lf.lfFaceName)
- + vim_free(font_name);
- + #endif
- return res;
- }
-
- *** ../vim-7.4.201/src/os_mswin.c 2014-02-11 17:05:57.278217857 +0100
- --- src/os_mswin.c 2014-03-12 19:18:14.264927370 +0100
- ***************
- *** 2867,2878 ****
- --- 2867,2893 ----
- {
- char_u *p;
- int i;
- + int ret = FAIL;
- static LOGFONT *lastlf = NULL;
- + #ifdef FEAT_MBYTE
- + char_u *acpname = NULL;
- + #endif
-
- *lf = s_lfDefault;
- if (name == NULL)
- return OK;
-
- + #ifdef FEAT_MBYTE
- + /* Convert 'name' from 'encoding' to the current codepage, because
- + * lf->lfFaceName uses the current codepage.
- + * TODO: Use Wide APIs instead of ANSI APIs. */
- + if (enc_codepage >= 0 && (int)GetACP() != enc_codepage)
- + {
- + int len;
- + enc_to_acp(name, strlen(name), &acpname, &len);
- + name = acpname;
- + }
- + #endif
- if (STRCMP(name, "*") == 0)
- {
- #if defined(FEAT_GUI_W32)
- ***************
- *** 2887,2896 ****
- cf.lpLogFont = lf;
- cf.nFontType = 0 ; //REGULAR_FONTTYPE;
- if (ChooseFont(&cf))
- ! goto theend;
- ! #else
- ! return FAIL;
- #endif
- }
-
- /*
- --- 2902,2910 ----
- cf.lpLogFont = lf;
- cf.nFontType = 0 ; //REGULAR_FONTTYPE;
- if (ChooseFont(&cf))
- ! ret = OK;
- #endif
- + goto theend;
- }
-
- /*
- ***************
- *** 2899,2905 ****
- for (p = name; *p && *p != ':'; p++)
- {
- if (p - name + 1 > LF_FACESIZE)
- ! return FAIL; /* Name too long */
- lf->lfFaceName[p - name] = *p;
- }
- if (p != name)
- --- 2913,2919 ----
- for (p = name; *p && *p != ':'; p++)
- {
- if (p - name + 1 > LF_FACESIZE)
- ! goto theend; /* Name too long */
- lf->lfFaceName[p - name] = *p;
- }
- if (p != name)
- ***************
- *** 2927,2933 ****
- did_replace = TRUE;
- }
- if (!did_replace || init_logfont(lf) == FAIL)
- ! return FAIL;
- }
-
- while (*p == ':')
- --- 2941,2947 ----
- did_replace = TRUE;
- }
- if (!did_replace || init_logfont(lf) == FAIL)
- ! goto theend;
- }
-
- while (*p == ':')
- ***************
- *** 2988,3012 ****
- p[-1], name);
- EMSG(IObuff);
- }
- ! return FAIL;
- }
- while (*p == ':')
- p++;
- }
-
- - #if defined(FEAT_GUI_W32)
- theend:
- - #endif
- /* ron: init lastlf */
- ! if (printer_dc == NULL)
- {
- vim_free(lastlf);
- lastlf = (LOGFONT *)alloc(sizeof(LOGFONT));
- if (lastlf != NULL)
- mch_memmove(lastlf, lf, sizeof(LOGFONT));
- }
-
- ! return OK;
- }
-
- #endif /* defined(FEAT_GUI) || defined(FEAT_PRINTER) */
- --- 3002,3028 ----
- p[-1], name);
- EMSG(IObuff);
- }
- ! goto theend;
- }
- while (*p == ':')
- p++;
- }
- + ret = OK;
-
- theend:
- /* ron: init lastlf */
- ! if (ret == OK && printer_dc == NULL)
- {
- vim_free(lastlf);
- lastlf = (LOGFONT *)alloc(sizeof(LOGFONT));
- if (lastlf != NULL)
- mch_memmove(lastlf, lf, sizeof(LOGFONT));
- }
- + #ifdef FEAT_MBYTE
- + vim_free(acpname);
- + #endif
-
- ! return ret;
- }
-
- #endif /* defined(FEAT_GUI) || defined(FEAT_PRINTER) */
- *** ../vim-7.4.201/src/proto/winclip.pro 2013-08-10 13:37:39.000000000 +0200
- --- src/proto/winclip.pro 2014-03-12 19:18:14.264927370 +0100
- ***************
- *** 11,14 ****
- --- 11,15 ----
- short_u *enc_to_utf16 __ARGS((char_u *str, int *lenp));
- char_u *utf16_to_enc __ARGS((short_u *str, int *lenp));
- void acp_to_enc __ARGS((char_u *str, int str_size, char_u **out, int *outlen));
- + void enc_to_acp __ARGS((char_u *str, int str_size, char_u **out, int *outlen));
- /* vim: set ft=c : */
- *** ../vim-7.4.201/src/winclip.c 2013-07-01 21:05:53.000000000 +0200
- --- src/winclip.c 2014-03-12 19:18:14.264927370 +0100
- ***************
- *** 797,800 ****
- --- 797,825 ----
- vim_free(widestr);
- }
- }
- +
- + /*
- + * Convert from 'encoding' to the active codepage.
- + * Input is "str[str_size]".
- + * The result is in allocated memory: "out[outlen]". With terminating NUL.
- + */
- + void
- + enc_to_acp(str, str_size, out, outlen)
- + char_u *str;
- + int str_size;
- + char_u **out;
- + int *outlen;
- +
- + {
- + LPWSTR widestr;
- + int len = str_size;
- +
- + widestr = (WCHAR *)enc_to_utf16(str, &len);
- + if (widestr != NULL)
- + {
- + WideCharToMultiByte_alloc(GetACP(), 0, widestr, len,
- + (LPSTR *)out, outlen, 0, 0);
- + vim_free(widestr);
- + }
- + }
- #endif
- *** ../vim-7.4.201/src/version.c 2014-03-12 18:55:52.104906804 +0100
- --- src/version.c 2014-03-12 19:19:01.388928092 +0100
- ***************
- *** 740,741 ****
- --- 740,743 ----
- { /* Add new patch number below this line */
- + /**/
- + 202,
- /**/
-
- --
- <Beeth> Girls are like internet domain names,
- the ones I like are already taken.
- <honx> Well, you can stil get one from a strange country :-P
-
- /// Bram Moolenaar -- Bram@Moolenaar.net -- http://www.Moolenaar.net \\\
- /// sponsor Vim, vote for features -- http://www.Vim.org/sponsor/ \\\
- \\\ an exciting new programming language -- http://www.Zimbu.org ///
- \\\ help me help AIDS victims -- http://ICCF-Holland.org ///
-