2002-01-19 20:58:41 +00:00
|
|
|
|
/* sysutils.c - system helpers
|
2007-08-22 10:55:07 +00:00
|
|
|
|
* Copyright (C) 1998, 1999, 2000, 2001, 2003, 2004,
|
2008-02-14 19:50:10 +00:00
|
|
|
|
* 2007, 2008 Free Software Foundation, Inc.
|
2014-03-07 09:46:44 +01:00
|
|
|
|
* Copyright (C) 2013 Werner Koch
|
2002-01-19 20:58:41 +00:00
|
|
|
|
*
|
|
|
|
|
* This file is part of GnuPG.
|
|
|
|
|
*
|
Change license for some files in common to LGPLv3+/GPLv2+.
Having the LGPL on the common GnuPG code helps to share code
between GnuPG and related projects (like GPGME and Libassuan). This
is good for interoperability and to reduces bugs.
* common/asshelp.c, common/asshelp.h, common/asshelp2.c, common/b64dec.c
* common/b64enc.c, common/convert.c, common/dns-cert.c
* common/dns-cert.h common/exechelp-posix.c, common/exechelp-w32.c
* common/exechelp-w32ce.c, common/exechelp.h, common/get-passphrase.c
* common/get-passphrase.h, common/gettime.c, common/gpgrlhelp.c
* common/helpfile.c, common/homedir.c, common/http.c, common/http.h
* common/i18n.c, common/init.c, common/init.h, common/iobuf.c
* common/iobuf.h, common/localename.c, common/membuf.c, common/membuf.h
* common/miscellaneous.c, common/openpgp-oid.c, common/openpgpdefs.h
* common/percent.c, common/pka.c, common/pka.h, common/session-env.c
* common/session-env.h, common/sexp-parse.h, common/sexputil.c
* common/signal.c, common/srv.c, common/srv.h, common/ssh-utils.c
* common/ssh-utils.h, common/sysutils.c, common/sysutils.h
* common/tlv.c, common/tlv.h, common/ttyio.c, common/ttyio.h
* common/userids.c, common/userids.h, common/xasprintf.c: Change
license to LGPLv3+/GPLv2+/
2012-04-20 15:43:06 +02:00
|
|
|
|
* This file is free software; you can redistribute it and/or modify
|
|
|
|
|
* it under the terms of either
|
2002-01-19 20:58:41 +00:00
|
|
|
|
*
|
Change license for some files in common to LGPLv3+/GPLv2+.
Having the LGPL on the common GnuPG code helps to share code
between GnuPG and related projects (like GPGME and Libassuan). This
is good for interoperability and to reduces bugs.
* common/asshelp.c, common/asshelp.h, common/asshelp2.c, common/b64dec.c
* common/b64enc.c, common/convert.c, common/dns-cert.c
* common/dns-cert.h common/exechelp-posix.c, common/exechelp-w32.c
* common/exechelp-w32ce.c, common/exechelp.h, common/get-passphrase.c
* common/get-passphrase.h, common/gettime.c, common/gpgrlhelp.c
* common/helpfile.c, common/homedir.c, common/http.c, common/http.h
* common/i18n.c, common/init.c, common/init.h, common/iobuf.c
* common/iobuf.h, common/localename.c, common/membuf.c, common/membuf.h
* common/miscellaneous.c, common/openpgp-oid.c, common/openpgpdefs.h
* common/percent.c, common/pka.c, common/pka.h, common/session-env.c
* common/session-env.h, common/sexp-parse.h, common/sexputil.c
* common/signal.c, common/srv.c, common/srv.h, common/ssh-utils.c
* common/ssh-utils.h, common/sysutils.c, common/sysutils.h
* common/tlv.c, common/tlv.h, common/ttyio.c, common/ttyio.h
* common/userids.c, common/userids.h, common/xasprintf.c: Change
license to LGPLv3+/GPLv2+/
2012-04-20 15:43:06 +02:00
|
|
|
|
* - the GNU Lesser General Public License as published by the Free
|
|
|
|
|
* Software Foundation; either version 3 of the License, or (at
|
|
|
|
|
* your option) any later version.
|
|
|
|
|
*
|
|
|
|
|
* or
|
|
|
|
|
*
|
|
|
|
|
* - the GNU General Public License as published by the Free
|
|
|
|
|
* Software Foundation; either version 2 of the License, or (at
|
|
|
|
|
* your option) any later version.
|
|
|
|
|
*
|
|
|
|
|
* or both in parallel, as here.
|
|
|
|
|
*
|
|
|
|
|
* This file is distributed in the hope that it will be useful,
|
2002-01-19 20:58:41 +00:00
|
|
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
|
|
|
* GNU General Public License for more details.
|
|
|
|
|
*
|
|
|
|
|
* You should have received a copy of the GNU General Public License
|
2007-07-04 19:49:40 +00:00
|
|
|
|
* along with this program; if not, see <http://www.gnu.org/licenses/>.
|
2002-01-19 20:58:41 +00:00
|
|
|
|
*/
|
|
|
|
|
|
|
|
|
|
#include <config.h>
|
2007-06-20 11:16:42 +00:00
|
|
|
|
|
Port to npth.
* configure.ac: Don't check for PTH but for NPTH.
(AH_BOTTOM): Remove PTH_SYSCALL_SOFT.
(have_pth): Rename to ...
(have_npth): ... this.
(USE_GNU_NPTH): Rename to ...
(USE_GNU_PTH): ... this.
* m4/npth.m4: New file.
* agent/Makefile.am, agent/cache.c, agent/call-pinentry.c,
agent/call-scd.c, agent/findkey.c, agent/gpg-agent.c,
agent/trustlist.c, common/Makefile.am, common/estream.c,
common/exechelp-posix.c, common/exechelp-w32.c,
common/exechelp-w32ce.c, common/http.c, common/init.c,
common/sysutils.c, dirmngr/Makefile.am, dirmngr/crlfetch.c,
dirmngr/dirmngr.c, dirmngr/dirmngr_ldap.c, dirmngr/ldap-wrapper-ce.c,
dirmngr/ldap-wrapper.c, dirmngr/ldap.c, g13/Makefile.am,
g13/call-gpg.c, g13/g13.c, g13/runner.c, scd/Makefile.am,
scd/apdu.c, scd/app.c, scd/ccid-driver.c, scd/command.c,
scd/scdaemon.c, tools/Makefile.am: Port to npth.
2012-01-03 22:12:37 +01:00
|
|
|
|
#ifdef WITHOUT_NPTH /* Give the Makefile a chance to build without Pth. */
|
|
|
|
|
# undef HAVE_NPTH
|
|
|
|
|
# undef USE_NPTH
|
2007-06-20 11:16:42 +00:00
|
|
|
|
#endif
|
|
|
|
|
|
2002-01-19 20:58:41 +00:00
|
|
|
|
#include <stdio.h>
|
|
|
|
|
#include <stdlib.h>
|
|
|
|
|
#include <string.h>
|
|
|
|
|
#include <unistd.h>
|
|
|
|
|
#include <errno.h>
|
|
|
|
|
#ifdef HAVE_STAT
|
2007-06-20 11:16:42 +00:00
|
|
|
|
# include <sys/stat.h>
|
2002-01-19 20:58:41 +00:00
|
|
|
|
#endif
|
|
|
|
|
#if defined(__linux__) && defined(__alpha__) && __GLIBC__ < 2
|
2007-06-20 11:16:42 +00:00
|
|
|
|
# include <asm/sysinfo.h>
|
|
|
|
|
# include <asm/unistd.h>
|
2002-01-19 20:58:41 +00:00
|
|
|
|
#endif
|
|
|
|
|
#ifdef HAVE_SETRLIMIT
|
2007-06-20 11:16:42 +00:00
|
|
|
|
# include <time.h>
|
|
|
|
|
# include <sys/time.h>
|
|
|
|
|
# include <sys/resource.h>
|
|
|
|
|
#endif
|
|
|
|
|
#ifdef HAVE_W32_SYSTEM
|
2014-03-07 09:46:44 +01:00
|
|
|
|
# if WINVER < 0x0500
|
|
|
|
|
# define WINVER 0x0500 /* Required for AllowSetForegroundWindow. */
|
|
|
|
|
# endif
|
2014-03-07 09:46:44 +01:00
|
|
|
|
# ifdef HAVE_WINSOCK2_H
|
|
|
|
|
# include <winsock2.h>
|
|
|
|
|
# endif
|
2007-06-20 11:16:42 +00:00
|
|
|
|
# include <windows.h>
|
|
|
|
|
#endif
|
Port to npth.
* configure.ac: Don't check for PTH but for NPTH.
(AH_BOTTOM): Remove PTH_SYSCALL_SOFT.
(have_pth): Rename to ...
(have_npth): ... this.
(USE_GNU_NPTH): Rename to ...
(USE_GNU_PTH): ... this.
* m4/npth.m4: New file.
* agent/Makefile.am, agent/cache.c, agent/call-pinentry.c,
agent/call-scd.c, agent/findkey.c, agent/gpg-agent.c,
agent/trustlist.c, common/Makefile.am, common/estream.c,
common/exechelp-posix.c, common/exechelp-w32.c,
common/exechelp-w32ce.c, common/http.c, common/init.c,
common/sysutils.c, dirmngr/Makefile.am, dirmngr/crlfetch.c,
dirmngr/dirmngr.c, dirmngr/dirmngr_ldap.c, dirmngr/ldap-wrapper-ce.c,
dirmngr/ldap-wrapper.c, dirmngr/ldap.c, g13/Makefile.am,
g13/call-gpg.c, g13/g13.c, g13/runner.c, scd/Makefile.am,
scd/apdu.c, scd/app.c, scd/ccid-driver.c, scd/command.c,
scd/scdaemon.c, tools/Makefile.am: Port to npth.
2012-01-03 22:12:37 +01:00
|
|
|
|
#ifdef HAVE_NPTH
|
|
|
|
|
# include <npth.h>
|
2002-01-19 20:58:41 +00:00
|
|
|
|
#endif
|
2007-12-03 13:05:15 +00:00
|
|
|
|
#include <fcntl.h>
|
2007-06-20 11:16:42 +00:00
|
|
|
|
|
2010-06-08 18:33:21 +00:00
|
|
|
|
#include <assuan.h>
|
|
|
|
|
|
2010-04-14 11:24:02 +00:00
|
|
|
|
#include "setenv.h" /* Gnulib replacement. */
|
|
|
|
|
|
2002-01-19 20:58:41 +00:00
|
|
|
|
#include "util.h"
|
|
|
|
|
#include "i18n.h"
|
|
|
|
|
|
|
|
|
|
#include "sysutils.h"
|
|
|
|
|
|
2007-08-22 10:55:07 +00:00
|
|
|
|
#define tohex(n) ((n) < 10 ? ((n) + '0') : (((n) - 10) + 'A'))
|
|
|
|
|
|
|
|
|
|
|
2002-01-19 20:58:41 +00:00
|
|
|
|
#if defined(__linux__) && defined(__alpha__) && __GLIBC__ < 2
|
|
|
|
|
#warning using trap_unaligned
|
|
|
|
|
static int
|
|
|
|
|
setsysinfo(unsigned long op, void *buffer, unsigned long size,
|
|
|
|
|
int *start, void *arg, unsigned long flag)
|
|
|
|
|
{
|
|
|
|
|
return syscall(__NR_osf_setsysinfo, op, buffer, size, start, arg, flag);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
void
|
|
|
|
|
trap_unaligned(void)
|
|
|
|
|
{
|
|
|
|
|
unsigned int buf[2];
|
|
|
|
|
|
|
|
|
|
buf[0] = SSIN_UACPROC;
|
|
|
|
|
buf[1] = UAC_SIGBUS | UAC_NOPRINT;
|
|
|
|
|
setsysinfo(SSI_NVPAIRS, buf, 1, 0, 0, 0);
|
|
|
|
|
}
|
|
|
|
|
#else
|
|
|
|
|
void
|
|
|
|
|
trap_unaligned(void)
|
|
|
|
|
{ /* dummy */
|
|
|
|
|
}
|
|
|
|
|
#endif
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
int
|
|
|
|
|
disable_core_dumps (void)
|
|
|
|
|
{
|
2004-05-11 09:54:52 +00:00
|
|
|
|
#ifdef HAVE_DOSISH_SYSTEM
|
2002-01-19 20:58:41 +00:00
|
|
|
|
return 0;
|
2004-05-11 09:54:52 +00:00
|
|
|
|
#else
|
|
|
|
|
# ifdef HAVE_SETRLIMIT
|
2002-01-19 20:58:41 +00:00
|
|
|
|
struct rlimit limit;
|
|
|
|
|
|
2004-05-11 09:54:52 +00:00
|
|
|
|
/* We only set the current limit unless we were not able to
|
|
|
|
|
retrieve the old value. */
|
|
|
|
|
if (getrlimit (RLIMIT_CORE, &limit))
|
|
|
|
|
limit.rlim_max = 0;
|
2002-01-19 20:58:41 +00:00
|
|
|
|
limit.rlim_cur = 0;
|
2004-05-11 09:54:52 +00:00
|
|
|
|
if( !setrlimit (RLIMIT_CORE, &limit) )
|
2002-01-19 20:58:41 +00:00
|
|
|
|
return 0;
|
|
|
|
|
if( errno != EINVAL && errno != ENOSYS )
|
|
|
|
|
log_fatal (_("can't disable core dumps: %s\n"), strerror(errno) );
|
2004-05-11 09:54:52 +00:00
|
|
|
|
#endif
|
|
|
|
|
return 1;
|
|
|
|
|
#endif
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
int
|
|
|
|
|
enable_core_dumps (void)
|
|
|
|
|
{
|
|
|
|
|
#ifdef HAVE_DOSISH_SYSTEM
|
|
|
|
|
return 0;
|
|
|
|
|
#else
|
|
|
|
|
# ifdef HAVE_SETRLIMIT
|
|
|
|
|
struct rlimit limit;
|
|
|
|
|
|
|
|
|
|
if (getrlimit (RLIMIT_CORE, &limit))
|
|
|
|
|
return 1;
|
|
|
|
|
limit.rlim_cur = limit.rlim_max;
|
|
|
|
|
setrlimit (RLIMIT_CORE, &limit);
|
2007-12-03 13:05:15 +00:00
|
|
|
|
return 1; /* We always return true because this function is
|
2004-05-11 09:54:52 +00:00
|
|
|
|
merely a debugging aid. */
|
2005-06-07 19:09:18 +00:00
|
|
|
|
# endif
|
2002-01-19 20:58:41 +00:00
|
|
|
|
return 1;
|
2004-05-11 09:54:52 +00:00
|
|
|
|
#endif
|
2002-01-19 20:58:41 +00:00
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
2010-03-02 21:25:08 +00:00
|
|
|
|
/* Return a string which is used as a kind of process ID. */
|
2002-01-19 20:58:41 +00:00
|
|
|
|
const byte *
|
2010-03-02 21:25:08 +00:00
|
|
|
|
get_session_marker (size_t *rlen)
|
2002-01-19 20:58:41 +00:00
|
|
|
|
{
|
2010-03-02 21:25:08 +00:00
|
|
|
|
static byte marker[SIZEOF_UNSIGNED_LONG*2];
|
|
|
|
|
static int initialized;
|
2011-02-04 12:57:53 +01:00
|
|
|
|
|
2010-03-02 21:25:08 +00:00
|
|
|
|
if (!initialized)
|
|
|
|
|
{
|
|
|
|
|
gcry_create_nonce (marker, sizeof marker);
|
|
|
|
|
initialized = 1;
|
2002-01-19 20:58:41 +00:00
|
|
|
|
}
|
2010-03-02 21:25:08 +00:00
|
|
|
|
*rlen = sizeof (marker);
|
|
|
|
|
return marker;
|
2002-01-19 20:58:41 +00:00
|
|
|
|
}
|
|
|
|
|
|
2011-04-12 16:30:08 +02:00
|
|
|
|
/* Return a random number in an unsigned int. */
|
|
|
|
|
unsigned int
|
|
|
|
|
get_uint_nonce (void)
|
|
|
|
|
{
|
|
|
|
|
unsigned int value;
|
|
|
|
|
|
|
|
|
|
gcry_create_nonce (&value, sizeof value);
|
|
|
|
|
return value;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
2002-01-19 20:58:41 +00:00
|
|
|
|
|
2004-02-12 09:28:32 +00:00
|
|
|
|
#if 0 /* not yet needed - Note that this will require inclusion of
|
|
|
|
|
cmacros.am in Makefile.am */
|
2002-01-19 20:58:41 +00:00
|
|
|
|
int
|
|
|
|
|
check_permissions(const char *path,int extension,int checkonly)
|
|
|
|
|
{
|
|
|
|
|
#if defined(HAVE_STAT) && !defined(HAVE_DOSISH_SYSTEM)
|
|
|
|
|
char *tmppath;
|
|
|
|
|
struct stat statbuf;
|
|
|
|
|
int ret=1;
|
|
|
|
|
int isdir=0;
|
|
|
|
|
|
|
|
|
|
if(opt.no_perm_warn)
|
|
|
|
|
return 0;
|
|
|
|
|
|
|
|
|
|
if(extension && path[0]!=DIRSEP_C)
|
|
|
|
|
{
|
|
|
|
|
if(strchr(path,DIRSEP_C))
|
|
|
|
|
tmppath=make_filename(path,NULL);
|
|
|
|
|
else
|
|
|
|
|
tmppath=make_filename(GNUPG_LIBDIR,path,NULL);
|
|
|
|
|
}
|
|
|
|
|
else
|
|
|
|
|
tmppath=m_strdup(path);
|
|
|
|
|
|
|
|
|
|
/* It's okay if the file doesn't exist */
|
|
|
|
|
if(stat(tmppath,&statbuf)!=0)
|
|
|
|
|
{
|
|
|
|
|
ret=0;
|
|
|
|
|
goto end;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
isdir=S_ISDIR(statbuf.st_mode);
|
|
|
|
|
|
|
|
|
|
/* Per-user files must be owned by the user. Extensions must be
|
|
|
|
|
owned by the user or root. */
|
|
|
|
|
if((!extension && statbuf.st_uid != getuid()) ||
|
|
|
|
|
(extension && statbuf.st_uid!=0 && statbuf.st_uid!=getuid()))
|
|
|
|
|
{
|
|
|
|
|
if(!checkonly)
|
|
|
|
|
log_info(_("Warning: unsafe ownership on %s \"%s\"\n"),
|
|
|
|
|
isdir?"directory":extension?"extension":"file",path);
|
|
|
|
|
goto end;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* This works for both directories and files - basically, we don't
|
|
|
|
|
care what the owner permissions are, so long as the group and
|
|
|
|
|
other permissions are 0 for per-user files, and non-writable for
|
|
|
|
|
extensions. */
|
|
|
|
|
if((extension && (statbuf.st_mode & (S_IWGRP|S_IWOTH)) !=0) ||
|
|
|
|
|
(!extension && (statbuf.st_mode & (S_IRWXG|S_IRWXO)) != 0))
|
|
|
|
|
{
|
|
|
|
|
char *dir;
|
|
|
|
|
|
|
|
|
|
/* However, if the directory the directory/file is in is owned
|
|
|
|
|
by the user and is 700, then this is not a problem.
|
|
|
|
|
Theoretically, we could walk this test up to the root
|
|
|
|
|
directory /, but for the sake of sanity, I'm stopping at one
|
|
|
|
|
level down. */
|
|
|
|
|
|
|
|
|
|
dir= make_dirname (tmppath);
|
|
|
|
|
if(stat(dir,&statbuf)==0 && statbuf.st_uid==getuid() &&
|
|
|
|
|
S_ISDIR(statbuf.st_mode) && (statbuf.st_mode & (S_IRWXG|S_IRWXO))==0)
|
|
|
|
|
{
|
|
|
|
|
xfree (dir);
|
|
|
|
|
ret=0;
|
|
|
|
|
goto end;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
m_free(dir);
|
|
|
|
|
|
|
|
|
|
if(!checkonly)
|
|
|
|
|
log_info(_("Warning: unsafe permissions on %s \"%s\"\n"),
|
|
|
|
|
isdir?"directory":extension?"extension":"file",path);
|
|
|
|
|
goto end;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
ret=0;
|
|
|
|
|
|
|
|
|
|
end:
|
|
|
|
|
m_free(tmppath);
|
|
|
|
|
|
|
|
|
|
return ret;
|
|
|
|
|
|
|
|
|
|
#endif /* HAVE_STAT && !HAVE_DOSISH_SYSTEM */
|
|
|
|
|
|
|
|
|
|
return 0;
|
|
|
|
|
}
|
|
|
|
|
#endif
|
2007-06-20 11:16:42 +00:00
|
|
|
|
|
|
|
|
|
|
|
|
|
|
/* Wrapper around the usual sleep fucntion. This one won't wake up
|
|
|
|
|
before the sleep time has really elapsed. When build with Pth it
|
|
|
|
|
merely calls pth_sleep and thus suspends only the current
|
|
|
|
|
thread. */
|
|
|
|
|
void
|
|
|
|
|
gnupg_sleep (unsigned int seconds)
|
|
|
|
|
{
|
Port to npth.
* configure.ac: Don't check for PTH but for NPTH.
(AH_BOTTOM): Remove PTH_SYSCALL_SOFT.
(have_pth): Rename to ...
(have_npth): ... this.
(USE_GNU_NPTH): Rename to ...
(USE_GNU_PTH): ... this.
* m4/npth.m4: New file.
* agent/Makefile.am, agent/cache.c, agent/call-pinentry.c,
agent/call-scd.c, agent/findkey.c, agent/gpg-agent.c,
agent/trustlist.c, common/Makefile.am, common/estream.c,
common/exechelp-posix.c, common/exechelp-w32.c,
common/exechelp-w32ce.c, common/http.c, common/init.c,
common/sysutils.c, dirmngr/Makefile.am, dirmngr/crlfetch.c,
dirmngr/dirmngr.c, dirmngr/dirmngr_ldap.c, dirmngr/ldap-wrapper-ce.c,
dirmngr/ldap-wrapper.c, dirmngr/ldap.c, g13/Makefile.am,
g13/call-gpg.c, g13/g13.c, g13/runner.c, scd/Makefile.am,
scd/apdu.c, scd/app.c, scd/ccid-driver.c, scd/command.c,
scd/scdaemon.c, tools/Makefile.am: Port to npth.
2012-01-03 22:12:37 +01:00
|
|
|
|
#ifdef HAVE_NPTH
|
2007-06-20 11:16:42 +00:00
|
|
|
|
/* With Pth we force a regular sleep for seconds == 0 so that also
|
|
|
|
|
the process will give up its timeslot. */
|
|
|
|
|
if (!seconds)
|
|
|
|
|
{
|
2011-02-04 12:57:53 +01:00
|
|
|
|
# ifdef HAVE_W32_SYSTEM
|
2007-06-20 11:16:42 +00:00
|
|
|
|
Sleep (0);
|
|
|
|
|
# else
|
|
|
|
|
sleep (0);
|
|
|
|
|
# endif
|
|
|
|
|
}
|
|
|
|
|
pth_sleep (seconds);
|
|
|
|
|
#else
|
|
|
|
|
/* Fixme: make sure that a sleep won't wake up to early. */
|
2011-02-04 12:57:53 +01:00
|
|
|
|
# ifdef HAVE_W32_SYSTEM
|
2007-06-20 11:16:42 +00:00
|
|
|
|
Sleep (seconds*1000);
|
|
|
|
|
# else
|
|
|
|
|
sleep (seconds);
|
|
|
|
|
# endif
|
|
|
|
|
#endif
|
|
|
|
|
}
|
2007-06-25 11:54:43 +00:00
|
|
|
|
|
|
|
|
|
|
|
|
|
|
/* This function is a NOP for POSIX systems but required under Windows
|
|
|
|
|
as the file handles as returned by OS calls (like CreateFile) are
|
|
|
|
|
different from the libc file descriptors (like open). This function
|
|
|
|
|
translates system file handles to libc file handles. FOR_WRITE
|
|
|
|
|
gives the direction of the handle. */
|
|
|
|
|
int
|
2007-07-12 15:28:30 +00:00
|
|
|
|
translate_sys2libc_fd (gnupg_fd_t fd, int for_write)
|
2007-06-25 11:54:43 +00:00
|
|
|
|
{
|
2010-03-02 21:25:08 +00:00
|
|
|
|
#if defined(HAVE_W32CE_SYSTEM)
|
2010-06-10 23:17:33 +00:00
|
|
|
|
(void)for_write;
|
|
|
|
|
return (int) fd;
|
2010-03-02 21:25:08 +00:00
|
|
|
|
#elif defined(HAVE_W32_SYSTEM)
|
2007-06-25 11:54:43 +00:00
|
|
|
|
int x;
|
|
|
|
|
|
2007-07-12 15:28:30 +00:00
|
|
|
|
if (fd == GNUPG_INVALID_FD)
|
|
|
|
|
return -1;
|
2011-02-04 12:57:53 +01:00
|
|
|
|
|
2007-07-12 15:28:30 +00:00
|
|
|
|
/* Note that _open_osfhandle is currently defined to take and return
|
|
|
|
|
a long. */
|
|
|
|
|
x = _open_osfhandle ((long)fd, for_write ? 1 : 0);
|
2007-06-25 11:54:43 +00:00
|
|
|
|
if (x == -1)
|
|
|
|
|
log_error ("failed to translate osfhandle %p\n", (void *) fd);
|
2007-07-12 15:28:30 +00:00
|
|
|
|
return x;
|
|
|
|
|
#else /*!HAVE_W32_SYSTEM */
|
2008-10-20 13:53:23 +00:00
|
|
|
|
(void)for_write;
|
2007-06-25 11:54:43 +00:00
|
|
|
|
return fd;
|
2007-07-12 15:28:30 +00:00
|
|
|
|
#endif
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* This is the same as translate_sys2libc_fd but takes an integer
|
2010-06-07 15:11:35 +00:00
|
|
|
|
which is assumed to be such an system handle. On WindowsCE the
|
|
|
|
|
passed FD is a rendezvous ID and the function finishes the pipe
|
|
|
|
|
creation. */
|
2007-07-12 15:28:30 +00:00
|
|
|
|
int
|
|
|
|
|
translate_sys2libc_fd_int (int fd, int for_write)
|
|
|
|
|
{
|
2010-06-07 15:11:35 +00:00
|
|
|
|
#if HAVE_W32CE_SYSTEM
|
2010-06-10 23:17:33 +00:00
|
|
|
|
fd = (int) _assuan_w32ce_finish_pipe (fd, for_write);
|
|
|
|
|
return translate_sys2libc_fd ((void*)fd, for_write);
|
2010-06-07 15:11:35 +00:00
|
|
|
|
#elif HAVE_W32_SYSTEM
|
2007-07-12 15:28:30 +00:00
|
|
|
|
if (fd <= 2)
|
|
|
|
|
return fd; /* Do not do this for error, stdin, stdout, stderr. */
|
|
|
|
|
|
|
|
|
|
return translate_sys2libc_fd ((void*)fd, for_write);
|
|
|
|
|
#else
|
2008-10-20 13:53:23 +00:00
|
|
|
|
(void)for_write;
|
2007-07-12 15:28:30 +00:00
|
|
|
|
return fd;
|
|
|
|
|
#endif
|
2007-06-25 11:54:43 +00:00
|
|
|
|
}
|
2007-08-22 10:55:07 +00:00
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
/* Replacement for tmpfile(). This is required because the tmpfile
|
|
|
|
|
function of Windows' runtime library is broken, insecure, ignores
|
|
|
|
|
TMPDIR and so on. In addition we create a file with an inheritable
|
|
|
|
|
handle. */
|
|
|
|
|
FILE *
|
|
|
|
|
gnupg_tmpfile (void)
|
|
|
|
|
{
|
|
|
|
|
#ifdef HAVE_W32_SYSTEM
|
|
|
|
|
int attempts, n;
|
2010-03-02 21:25:08 +00:00
|
|
|
|
#ifdef HAVE_W32CE_SYSTEM
|
|
|
|
|
wchar_t buffer[MAX_PATH+7+12+1];
|
|
|
|
|
# define mystrlen(a) wcslen (a)
|
|
|
|
|
wchar_t *name, *p;
|
|
|
|
|
#else
|
2007-08-22 10:55:07 +00:00
|
|
|
|
char buffer[MAX_PATH+7+12+1];
|
2010-03-02 21:25:08 +00:00
|
|
|
|
# define mystrlen(a) strlen (a)
|
2007-08-22 10:55:07 +00:00
|
|
|
|
char *name, *p;
|
2010-03-02 21:25:08 +00:00
|
|
|
|
#endif
|
2007-08-22 10:55:07 +00:00
|
|
|
|
HANDLE file;
|
|
|
|
|
int pid = GetCurrentProcessId ();
|
|
|
|
|
unsigned int value;
|
|
|
|
|
int i;
|
|
|
|
|
SECURITY_ATTRIBUTES sec_attr;
|
|
|
|
|
|
|
|
|
|
memset (&sec_attr, 0, sizeof sec_attr );
|
|
|
|
|
sec_attr.nLength = sizeof sec_attr;
|
|
|
|
|
sec_attr.bInheritHandle = TRUE;
|
|
|
|
|
|
|
|
|
|
n = GetTempPath (MAX_PATH+1, buffer);
|
2010-03-02 21:25:08 +00:00
|
|
|
|
if (!n || n > MAX_PATH || mystrlen (buffer) > MAX_PATH)
|
2007-08-22 10:55:07 +00:00
|
|
|
|
{
|
2010-03-02 21:25:08 +00:00
|
|
|
|
gpg_err_set_errno (ENOENT);
|
2007-08-22 10:55:07 +00:00
|
|
|
|
return NULL;
|
|
|
|
|
}
|
2010-03-02 21:25:08 +00:00
|
|
|
|
p = buffer + mystrlen (buffer);
|
|
|
|
|
#ifdef HAVE_W32CE_SYSTEM
|
|
|
|
|
wcscpy (p, L"_gnupg");
|
|
|
|
|
p += 7;
|
|
|
|
|
#else
|
2007-08-22 10:55:07 +00:00
|
|
|
|
p = stpcpy (p, "_gnupg");
|
2010-03-02 21:25:08 +00:00
|
|
|
|
#endif
|
2007-08-22 10:55:07 +00:00
|
|
|
|
/* We try to create the directory but don't care about an error as
|
|
|
|
|
it may already exist and the CreateFile would throw an error
|
|
|
|
|
anyway. */
|
|
|
|
|
CreateDirectory (buffer, NULL);
|
|
|
|
|
*p++ = '\\';
|
|
|
|
|
name = p;
|
|
|
|
|
for (attempts=0; attempts < 10; attempts++)
|
|
|
|
|
{
|
|
|
|
|
p = name;
|
|
|
|
|
value = (GetTickCount () ^ ((pid<<16) & 0xffff0000));
|
|
|
|
|
for (i=0; i < 8; i++)
|
|
|
|
|
{
|
|
|
|
|
*p++ = tohex (((value >> 28) & 0x0f));
|
|
|
|
|
value <<= 4;
|
|
|
|
|
}
|
2010-03-02 21:25:08 +00:00
|
|
|
|
#ifdef HAVE_W32CE_SYSTEM
|
|
|
|
|
wcscpy (p, L".tmp");
|
|
|
|
|
#else
|
2007-08-22 10:55:07 +00:00
|
|
|
|
strcpy (p, ".tmp");
|
2010-03-02 21:25:08 +00:00
|
|
|
|
#endif
|
2007-08-22 10:55:07 +00:00
|
|
|
|
file = CreateFile (buffer,
|
|
|
|
|
GENERIC_READ | GENERIC_WRITE,
|
|
|
|
|
0,
|
|
|
|
|
&sec_attr,
|
|
|
|
|
CREATE_NEW,
|
|
|
|
|
FILE_ATTRIBUTE_TEMPORARY | FILE_FLAG_DELETE_ON_CLOSE,
|
|
|
|
|
NULL);
|
|
|
|
|
if (file != INVALID_HANDLE_VALUE)
|
|
|
|
|
{
|
|
|
|
|
FILE *fp;
|
2010-03-02 21:25:08 +00:00
|
|
|
|
#ifdef HAVE_W32CE_SYSTEM
|
|
|
|
|
int fd = (int)file;
|
|
|
|
|
fp = _wfdopen (fd, L"w+b");
|
|
|
|
|
#else
|
2007-08-22 10:55:07 +00:00
|
|
|
|
int fd = _open_osfhandle ((long)file, 0);
|
|
|
|
|
if (fd == -1)
|
|
|
|
|
{
|
|
|
|
|
CloseHandle (file);
|
|
|
|
|
return NULL;
|
|
|
|
|
}
|
|
|
|
|
fp = fdopen (fd, "w+b");
|
2010-03-02 21:25:08 +00:00
|
|
|
|
#endif
|
2007-08-22 10:55:07 +00:00
|
|
|
|
if (!fp)
|
|
|
|
|
{
|
|
|
|
|
int save = errno;
|
|
|
|
|
close (fd);
|
2010-03-02 21:25:08 +00:00
|
|
|
|
gpg_err_set_errno (save);
|
2007-08-22 10:55:07 +00:00
|
|
|
|
return NULL;
|
|
|
|
|
}
|
|
|
|
|
return fp;
|
|
|
|
|
}
|
|
|
|
|
Sleep (1); /* One ms as this is the granularity of GetTickCount. */
|
|
|
|
|
}
|
2010-03-02 21:25:08 +00:00
|
|
|
|
gpg_err_set_errno (ENOENT);
|
2007-08-22 10:55:07 +00:00
|
|
|
|
return NULL;
|
2010-03-02 21:25:08 +00:00
|
|
|
|
#undef mystrlen
|
2007-08-22 10:55:07 +00:00
|
|
|
|
#else /*!HAVE_W32_SYSTEM*/
|
|
|
|
|
return tmpfile ();
|
|
|
|
|
#endif /*!HAVE_W32_SYSTEM*/
|
|
|
|
|
}
|
2007-12-03 13:05:15 +00:00
|
|
|
|
|
|
|
|
|
|
|
|
|
|
/* Make sure that the standard file descriptors are opened. Obviously
|
|
|
|
|
some folks close them before an exec and the next file we open will
|
|
|
|
|
get one of them assigned and thus any output (i.e. diagnostics) end
|
|
|
|
|
up in that file (e.g. the trustdb). Not actually a gpg problem as
|
|
|
|
|
this will hapen with almost all utilities when called in a wrong
|
|
|
|
|
way. However we try to minimize the damage here and raise
|
|
|
|
|
awareness of the problem.
|
|
|
|
|
|
|
|
|
|
Must be called before we open any files! */
|
|
|
|
|
void
|
|
|
|
|
gnupg_reopen_std (const char *pgmname)
|
2011-02-04 12:57:53 +01:00
|
|
|
|
{
|
2007-12-03 13:05:15 +00:00
|
|
|
|
#if defined(HAVE_STAT) && !defined(HAVE_W32_SYSTEM)
|
|
|
|
|
struct stat statbuf;
|
|
|
|
|
int did_stdin = 0;
|
|
|
|
|
int did_stdout = 0;
|
|
|
|
|
int did_stderr = 0;
|
|
|
|
|
FILE *complain;
|
|
|
|
|
|
|
|
|
|
if (fstat (STDIN_FILENO, &statbuf) == -1 && errno ==EBADF)
|
|
|
|
|
{
|
|
|
|
|
if (open ("/dev/null",O_RDONLY) == STDIN_FILENO)
|
|
|
|
|
did_stdin = 1;
|
|
|
|
|
else
|
|
|
|
|
did_stdin = 2;
|
|
|
|
|
}
|
2011-02-04 12:57:53 +01:00
|
|
|
|
|
2007-12-03 13:05:15 +00:00
|
|
|
|
if (fstat (STDOUT_FILENO, &statbuf) == -1 && errno == EBADF)
|
|
|
|
|
{
|
|
|
|
|
if (open ("/dev/null",O_WRONLY) == STDOUT_FILENO)
|
|
|
|
|
did_stdout = 1;
|
|
|
|
|
else
|
|
|
|
|
did_stdout = 2;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
if (fstat (STDERR_FILENO, &statbuf)==-1 && errno==EBADF)
|
|
|
|
|
{
|
|
|
|
|
if (open ("/dev/null", O_WRONLY) == STDERR_FILENO)
|
|
|
|
|
did_stderr = 1;
|
|
|
|
|
else
|
|
|
|
|
did_stderr = 2;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
/* It's hard to log this sort of thing since the filehandle we would
|
|
|
|
|
complain to may be closed... */
|
|
|
|
|
if (!did_stderr)
|
|
|
|
|
complain = stderr;
|
|
|
|
|
else if (!did_stdout)
|
|
|
|
|
complain = stdout;
|
|
|
|
|
else
|
|
|
|
|
complain = NULL;
|
|
|
|
|
|
|
|
|
|
if (complain)
|
|
|
|
|
{
|
|
|
|
|
if (did_stdin == 1)
|
|
|
|
|
fprintf (complain, "%s: WARNING: standard input reopened\n", pgmname);
|
|
|
|
|
if (did_stdout == 1)
|
|
|
|
|
fprintf (complain, "%s: WARNING: standard output reopened\n", pgmname);
|
|
|
|
|
if (did_stderr == 1)
|
|
|
|
|
fprintf (complain, "%s: WARNING: standard error reopened\n", pgmname);
|
|
|
|
|
|
|
|
|
|
if (did_stdin == 2 || did_stdout == 2 || did_stderr == 2)
|
|
|
|
|
fprintf(complain,"%s: fatal: unable to reopen standard input,"
|
|
|
|
|
" output, or error\n", pgmname);
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
if (did_stdin == 2 || did_stdout == 2 || did_stderr == 2)
|
|
|
|
|
exit (3);
|
2009-04-01 10:51:53 +00:00
|
|
|
|
#else /* !(HAVE_STAT && !HAVE_W32_SYSTEM) */
|
|
|
|
|
(void)pgmname;
|
|
|
|
|
#endif
|
2007-12-03 13:05:15 +00:00
|
|
|
|
}
|
|
|
|
|
|
2008-02-14 19:50:10 +00:00
|
|
|
|
|
|
|
|
|
/* Hack required for Windows. */
|
2011-02-04 12:57:53 +01:00
|
|
|
|
void
|
2008-02-14 19:50:10 +00:00
|
|
|
|
gnupg_allow_set_foregound_window (pid_t pid)
|
|
|
|
|
{
|
2009-04-01 10:51:53 +00:00
|
|
|
|
if (!pid)
|
2008-02-14 19:50:10 +00:00
|
|
|
|
log_info ("%s called with invalid pid %lu\n",
|
|
|
|
|
"gnupg_allow_set_foregound_window", (unsigned long)pid);
|
2010-03-22 12:46:05 +00:00
|
|
|
|
#if defined(HAVE_W32_SYSTEM) && !defined(HAVE_W32CE_SYSTEM)
|
2009-04-01 10:51:53 +00:00
|
|
|
|
else if (!AllowSetForegroundWindow ((pid_t)pid == (pid_t)(-1)?ASFW_ANY:pid))
|
2008-02-14 19:50:10 +00:00
|
|
|
|
log_info ("AllowSetForegroundWindow(%lu) failed: %s\n",
|
|
|
|
|
(unsigned long)pid, w32_strerror (-1));
|
|
|
|
|
#endif
|
|
|
|
|
}
|
2010-03-02 21:25:08 +00:00
|
|
|
|
|
2010-03-24 12:15:30 +00:00
|
|
|
|
int
|
|
|
|
|
gnupg_remove (const char *fname)
|
|
|
|
|
{
|
|
|
|
|
#ifdef HAVE_W32CE_SYSTEM
|
|
|
|
|
int rc;
|
|
|
|
|
wchar_t *wfname;
|
|
|
|
|
|
|
|
|
|
wfname = utf8_to_wchar (fname);
|
|
|
|
|
if (!wfname)
|
|
|
|
|
rc = 0;
|
|
|
|
|
else
|
|
|
|
|
{
|
|
|
|
|
rc = DeleteFile (wfname);
|
|
|
|
|
xfree (wfname);
|
|
|
|
|
}
|
|
|
|
|
if (!rc)
|
2010-08-12 11:43:46 +00:00
|
|
|
|
return -1; /* ERRNO is automagically provided by gpg-error.h. */
|
|
|
|
|
return 0;
|
2010-03-24 12:15:30 +00:00
|
|
|
|
#else
|
2010-04-14 17:56:22 +00:00
|
|
|
|
return remove (fname);
|
2010-03-24 12:15:30 +00:00
|
|
|
|
#endif
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
2010-04-14 11:24:02 +00:00
|
|
|
|
/* A wrapper around mkdir which takes a string for the mode argument.
|
|
|
|
|
This makes it easier to handle the mode argument which is not
|
|
|
|
|
defined on all systems. The format of the modestring is
|
|
|
|
|
|
|
|
|
|
"-rwxrwxrwx"
|
2011-02-04 12:57:53 +01:00
|
|
|
|
|
2010-04-14 11:24:02 +00:00
|
|
|
|
'-' is a don't care or not set. 'r', 'w', 'x' are read allowed,
|
|
|
|
|
write allowed, execution allowed with the first group for the user,
|
|
|
|
|
the second for the group and the third for all others. If the
|
|
|
|
|
string is shorter than above the missing mode characters are meant
|
|
|
|
|
to be not set. */
|
|
|
|
|
int
|
|
|
|
|
gnupg_mkdir (const char *name, const char *modestr)
|
|
|
|
|
{
|
|
|
|
|
#ifdef HAVE_W32CE_SYSTEM
|
|
|
|
|
wchar_t *wname;
|
|
|
|
|
(void)modestr;
|
2011-02-04 12:57:53 +01:00
|
|
|
|
|
2010-04-14 11:24:02 +00:00
|
|
|
|
wname = utf8_to_wchar (name);
|
|
|
|
|
if (!wname)
|
|
|
|
|
return -1;
|
|
|
|
|
if (!CreateDirectoryW (wname, NULL))
|
|
|
|
|
{
|
|
|
|
|
xfree (wname);
|
|
|
|
|
return -1; /* ERRNO is automagically provided by gpg-error.h. */
|
|
|
|
|
}
|
|
|
|
|
xfree (wname);
|
|
|
|
|
return 0;
|
|
|
|
|
#elif MKDIR_TAKES_ONE_ARG
|
|
|
|
|
(void)modestr;
|
|
|
|
|
/* Note: In the case of W32 we better use CreateDirectory and try to
|
|
|
|
|
set appropriate permissions. However using mkdir is easier
|
|
|
|
|
because this sets ERRNO. */
|
|
|
|
|
return mkdir (name);
|
|
|
|
|
#else
|
|
|
|
|
mode_t mode = 0;
|
|
|
|
|
|
|
|
|
|
if (modestr && *modestr)
|
|
|
|
|
{
|
|
|
|
|
modestr++;
|
|
|
|
|
if (*modestr && *modestr++ == 'r')
|
|
|
|
|
mode |= S_IRUSR;
|
|
|
|
|
if (*modestr && *modestr++ == 'w')
|
|
|
|
|
mode |= S_IWUSR;
|
|
|
|
|
if (*modestr && *modestr++ == 'x')
|
|
|
|
|
mode |= S_IXUSR;
|
|
|
|
|
if (*modestr && *modestr++ == 'r')
|
|
|
|
|
mode |= S_IRGRP;
|
|
|
|
|
if (*modestr && *modestr++ == 'w')
|
|
|
|
|
mode |= S_IWGRP;
|
|
|
|
|
if (*modestr && *modestr++ == 'x')
|
|
|
|
|
mode |= S_IXGRP;
|
|
|
|
|
if (*modestr && *modestr++ == 'r')
|
|
|
|
|
mode |= S_IROTH;
|
|
|
|
|
if (*modestr && *modestr++ == 'w')
|
|
|
|
|
mode |= S_IWOTH;
|
|
|
|
|
if (*modestr && *modestr++ == 'x')
|
|
|
|
|
mode |= S_IXOTH;
|
|
|
|
|
}
|
2010-04-14 17:56:22 +00:00
|
|
|
|
return mkdir (name, mode);
|
2010-04-14 11:24:02 +00:00
|
|
|
|
#endif
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
int
|
|
|
|
|
gnupg_setenv (const char *name, const char *value, int overwrite)
|
|
|
|
|
{
|
|
|
|
|
#ifdef HAVE_W32CE_SYSTEM
|
|
|
|
|
(void)name;
|
|
|
|
|
(void)value;
|
|
|
|
|
(void)overwrite;
|
|
|
|
|
return 0;
|
|
|
|
|
#else
|
2010-04-20 01:11:35 +00:00
|
|
|
|
return setenv (name, value, overwrite);
|
2010-04-14 11:24:02 +00:00
|
|
|
|
#endif
|
|
|
|
|
}
|
|
|
|
|
|
2011-02-04 12:57:53 +01:00
|
|
|
|
int
|
2010-04-14 11:24:02 +00:00
|
|
|
|
gnupg_unsetenv (const char *name)
|
|
|
|
|
{
|
|
|
|
|
#ifdef HAVE_W32CE_SYSTEM
|
|
|
|
|
(void)name;
|
|
|
|
|
return 0;
|
|
|
|
|
#else
|
|
|
|
|
# ifdef HAVE_UNSETENV
|
2010-04-20 01:11:35 +00:00
|
|
|
|
return unsetenv (name);
|
2010-04-14 11:24:02 +00:00
|
|
|
|
# else
|
2010-04-20 01:11:35 +00:00
|
|
|
|
return putenv (name);
|
2010-04-14 11:24:02 +00:00
|
|
|
|
# endif
|
|
|
|
|
#endif
|
|
|
|
|
}
|
2010-03-02 21:25:08 +00:00
|
|
|
|
|
2014-04-15 16:40:48 +02:00
|
|
|
|
|
|
|
|
|
/* Return the current working directory as a malloced string. Return
|
|
|
|
|
NULL and sets ERRNo on error. */
|
|
|
|
|
char *
|
|
|
|
|
gnupg_getcwd (void)
|
|
|
|
|
{
|
|
|
|
|
char *buffer;
|
|
|
|
|
size_t size = 100;
|
|
|
|
|
|
|
|
|
|
for (;;)
|
|
|
|
|
{
|
|
|
|
|
buffer = xtrymalloc (size+1);
|
|
|
|
|
if (!buffer)
|
|
|
|
|
return NULL;
|
|
|
|
|
#ifdef HAVE_W32CE_SYSTEM
|
|
|
|
|
strcpy (buffer, "/"); /* Always "/". */
|
|
|
|
|
return buffer;
|
|
|
|
|
#else
|
|
|
|
|
if (getcwd (buffer, size) == buffer)
|
|
|
|
|
return buffer;
|
|
|
|
|
xfree (buffer);
|
|
|
|
|
if (errno != ERANGE)
|
|
|
|
|
return NULL;
|
|
|
|
|
size *= 2;
|
|
|
|
|
#endif
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
2010-04-14 14:39:16 +00:00
|
|
|
|
#ifdef HAVE_W32CE_SYSTEM
|
|
|
|
|
/* There is a isatty function declaration in cegcc but it does not
|
|
|
|
|
make sense, thus we redefine it. */
|
2011-02-04 12:57:53 +01:00
|
|
|
|
int
|
2010-04-14 14:39:16 +00:00
|
|
|
|
_gnupg_isatty (int fd)
|
|
|
|
|
{
|
|
|
|
|
(void)fd;
|
|
|
|
|
return 0;
|
|
|
|
|
}
|
|
|
|
|
#endif
|
|
|
|
|
|
2010-03-02 21:25:08 +00:00
|
|
|
|
|
|
|
|
|
#ifdef HAVE_W32CE_SYSTEM
|
|
|
|
|
/* Replacement for getenv which takes care of the our use of getenv.
|
|
|
|
|
The code is not thread safe but we expect it to work in all cases
|
|
|
|
|
because it is called for the first time early enough. */
|
|
|
|
|
char *
|
|
|
|
|
_gnupg_getenv (const char *name)
|
|
|
|
|
{
|
2010-04-14 11:24:02 +00:00
|
|
|
|
static int initialized;
|
|
|
|
|
static char *assuan_debug;
|
2011-02-04 12:57:53 +01:00
|
|
|
|
|
2010-04-14 11:24:02 +00:00
|
|
|
|
if (!initialized)
|
|
|
|
|
{
|
2011-02-04 12:57:53 +01:00
|
|
|
|
assuan_debug = read_w32_registry_string (NULL,
|
2010-04-14 11:24:02 +00:00
|
|
|
|
"\\Software\\GNU\\libassuan",
|
|
|
|
|
"debug");
|
|
|
|
|
initialized = 1;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
if (!strcmp (name, "ASSUAN_DEBUG"))
|
|
|
|
|
return assuan_debug;
|
|
|
|
|
else
|
|
|
|
|
return NULL;
|
2010-03-02 21:25:08 +00:00
|
|
|
|
}
|
2010-04-14 11:24:02 +00:00
|
|
|
|
|
2010-03-02 21:25:08 +00:00
|
|
|
|
#endif /*HAVE_W32CE_SYSTEM*/
|
2014-03-07 09:46:44 +01:00
|
|
|
|
|
|
|
|
|
|
|
|
|
|
#ifdef HAVE_W32_SYSTEM
|
|
|
|
|
/* Return the user's security identifier from the current process. */
|
|
|
|
|
PSID
|
|
|
|
|
w32_get_user_sid (void)
|
|
|
|
|
{
|
|
|
|
|
int okay = 0;
|
|
|
|
|
HANDLE proc = NULL;
|
|
|
|
|
HANDLE token = NULL;
|
|
|
|
|
TOKEN_USER *user = NULL;
|
|
|
|
|
PSID sid = NULL;
|
|
|
|
|
DWORD tokenlen, sidlen;
|
|
|
|
|
|
|
|
|
|
proc = OpenProcess (PROCESS_QUERY_INFORMATION, FALSE, GetCurrentProcessId());
|
|
|
|
|
if (!proc)
|
|
|
|
|
goto leave;
|
|
|
|
|
|
|
|
|
|
if (!OpenProcessToken (proc, TOKEN_QUERY, &token))
|
|
|
|
|
goto leave;
|
|
|
|
|
|
|
|
|
|
if (!GetTokenInformation (token, TokenUser, NULL, 0, &tokenlen)
|
|
|
|
|
&& GetLastError() != ERROR_INSUFFICIENT_BUFFER)
|
|
|
|
|
goto leave;
|
|
|
|
|
|
|
|
|
|
user = xtrymalloc (tokenlen);
|
|
|
|
|
if (!user)
|
|
|
|
|
goto leave;
|
|
|
|
|
|
|
|
|
|
if (!GetTokenInformation (token, TokenUser, user, tokenlen, &tokenlen))
|
|
|
|
|
goto leave;
|
|
|
|
|
if (!IsValidSid (user->User.Sid))
|
|
|
|
|
goto leave;
|
|
|
|
|
sidlen = GetLengthSid (user->User.Sid);
|
|
|
|
|
sid = xtrymalloc (sidlen);
|
|
|
|
|
if (!sid)
|
|
|
|
|
goto leave;
|
|
|
|
|
if (!CopySid (sidlen, sid, user->User.Sid))
|
|
|
|
|
goto leave;
|
|
|
|
|
okay = 1;
|
|
|
|
|
|
|
|
|
|
leave:
|
|
|
|
|
xfree (user);
|
|
|
|
|
if (token)
|
|
|
|
|
CloseHandle (token);
|
|
|
|
|
if (proc)
|
|
|
|
|
CloseHandle (proc);
|
|
|
|
|
|
|
|
|
|
if (!okay)
|
|
|
|
|
{
|
|
|
|
|
xfree (sid);
|
|
|
|
|
sid = NULL;
|
|
|
|
|
}
|
|
|
|
|
return sid;
|
|
|
|
|
}
|
|
|
|
|
#endif /*HAVE_W32_SYSTEM*/
|