procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Support ~USER for some names on MS-Windows

Browse source 
* src/w32.c (getpwnam): Support usernames provided through
LOGNAME or USERNAME environment variables, to mimic what
editfns.c:init_editfns does.
This commit is contained in:
Eli Zaretskii 2019-02-15 12:22:49 +02:00
parent c3f87efe3a
commit 4d00262a8e
1 changed files with 23 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

24
src/w32.c
View file

@ -2091,7 +2091,29 @@ getpwnam (char *name)
return pw;
if (xstrcasecmp (name, pw->pw_name))
return NULL;
{
/* Mimic what init_editfns does with these environment
variables, so that the likes of ~USER is recognized by
expand-file-name even if $LOGNAME gives a name different from
the real username produced by the process token. */
char *logname = getenv ("LOGNAME");
char *username = getenv ("USERNAME");
if ((logname || username)
&& xstrcasecmp (name, logname ? logname : username) == 0)
{
static struct passwd alias_user;
static char alias_name[PASSWD_FIELD_SIZE];
memcpy (&alias_user, &dflt_passwd, sizeof dflt_passwd);
alias_name[0] = '\0';
strncat (alias_name, logname ? logname : username,
PASSWD_FIELD_SIZE - 1);
alias_user.pw_name = alias_name;
pw = &alias_user;
}
else
return NULL;
}
return pw;
}