masscollaborationlabs/emacs
2
0
Fork 0
mirror of https://github.com/masscollaborationlabs/emacs.git synced 2025-07-11 22:50:49 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

w32.c (readlink): Support DBCS codepages.

Browse source
This commit is contained in:
Eli Zaretskii 2013-01-25 12:27:16 +02:00
parent d8cd7742b3
commit 69bb66c12e
2 changed files with 22 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/ChangeLog
View file

@ -1,5 +1,7 @@
2013-01-25 Eli Zaretskii <eliz@gnu.org>
* w32.c (readlink): Support DBCS codepages.
* w32notify.c (Fw32notify_add_watch): Doc fix. (Bug#13540)
2013-01-25 Dmitry Antipov <dmantipov@yandex.ru>

24
src/w32.c
View file

@ -4639,18 +4639,34 @@ readlink (const char *name, char *buf, size_t buf_size)
else
{
size_t size_to_copy = buf_size;
BYTE *p = lname;
BYTE *p = lname, *p2;
BYTE *pend = p + lname_len;
int dbcs_p = max_filename_mbslen () > 1;
/* Normalize like dostounix_filename does, but we don't
want to assume that lname is null-terminated. */
if (*p && p[1] == ':' && *p >= 'A' && *p <= 'Z')
*p += 'a' - 'A';
if (dbcs_p)
p2 = CharNextExA (file_name_codepage, p, 0);
else
p2 = p + 1;
if (*p && *p2 == ':' && *p >= 'A' && *p <= 'Z')
{
*p += 'a' - 'A';
p += 2;
}
while (p <= pend)
{
if (*p == '\\')
*p = '/';
++p;
if (dbcs_p)
{
p = CharNextExA (file_name_codepage, p, 0);
/* CharNextExA doesn't advance at null character. */
if (!*p)
break;
}
else
++p;
}
/* Testing for null-terminated LNAME is paranoia:
WideCharToMultiByte should always return a