X-Git-Url: https://git.librecmc.org/?a=blobdiff_plain;f=src%2Futil%2Fos_installation.c;h=1226c59662272be443a1a0bf17a21717ec43d4ab;hb=03512957fb04969d08fb7eac0952a747aa9596ae;hp=674e47a5fe6b22b91f59c09815dcab5e5b178fab;hpb=2e474287ecc20d6b230bf0fb6916f3b965f84e5e;p=oweals%2Fgnunet.git diff --git a/src/util/os_installation.c b/src/util/os_installation.c index 674e47a5f..1226c5966 100644 --- a/src/util/os_installation.c +++ b/src/util/os_installation.c @@ -1,10 +1,10 @@ /* This file is part of GNUnet. - (C) 2006 Christian Grothoff (and other contributing authors) + Copyright (C) 2006-2016 GNUnet e.V. GNUnet is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published - by the Free Software Foundation; either version 2, or (at your + by the Free Software Foundation; either version 3, or (at your option) any later version. GNUnet is distributed in the hope that it will be useful, but @@ -14,14 +14,19 @@ You should have received a copy of the GNU General Public License along with GNUnet; see the file COPYING. If not, write to the - Free Software Foundation, Inc., 59 Temple Place - Suite 330, - Boston, MA 02111-1307, USA. + Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, + Boston, MA 02110-1301, USA. */ /** * @file src/util/os_installation.c * @brief get paths used by the program * @author Milan + * @author Christian Fuchs + * @author Christian Grothoff + * @author Matthias Wachs + * @author Heikki Lindholm + * @author LRN */ #include #include @@ -30,19 +35,74 @@ #include /* for u16_to_u8 */ #include "platform.h" -#include "gnunet_common.h" -#include "gnunet_configuration_lib.h" -#include "gnunet_disk_lib.h" -#include "gnunet_os_lib.h" -#include "gnunet_strings_lib.h" +#include "gnunet_util_lib.h" #if DARWIN #include #include +#elif WINDOWS +#include #endif -#define LOG(kind,...) GNUNET_log_from (kind, "util", __VA_ARGS__) -#define LOG_STRERROR_FILE(kind,syscall,filename) GNUNET_log_from_strerror_file (kind, "util", syscall, filename) +#define LOG(kind,...) GNUNET_log_from (kind, "util-os-installation", __VA_ARGS__) + +#define LOG_STRERROR_FILE(kind,syscall,filename) GNUNET_log_from_strerror_file (kind, "util-os-installation", syscall, filename) + + +/** + * Default project data used for installation path detection + * for GNUnet (core). + */ +static const struct GNUNET_OS_ProjectData default_pd = { + .libname = "libgnunetutil", + .project_dirname = "gnunet", + .binary_name = "gnunet-arm", + .env_varname = "GNUNET_PREFIX", + .base_config_varname = "GNUNET_BASE_CONFIG", + .bug_email = "gnunet-developers@gnu.org", + .homepage = "http://www.gnu.org/s/gnunet/", + .config_file = "gnunet.conf", + .user_config_file = "~/.config/gnunet.conf", +}; + +/** + * Which project data do we currently use for installation + * path detection? Never NULL. + */ +static const struct GNUNET_OS_ProjectData *current_pd = &default_pd; + +/** + * Return default project data used by 'libgnunetutil' for GNUnet. + */ +const struct GNUNET_OS_ProjectData * +GNUNET_OS_project_data_default (void) +{ + return &default_pd; +} + + +/** + * @return current project data. + */ +const struct GNUNET_OS_ProjectData * +GNUNET_OS_project_data_get () +{ + return current_pd; +} + + +/** + * Setup OS subsystem with project data. + * + * @param pd project data used to determine paths + */ +void +GNUNET_OS_init (const struct GNUNET_OS_ProjectData *pd) +{ + GNUNET_assert (NULL != pd); + current_pd = pd; +} + #if LINUX /** @@ -65,8 +125,9 @@ get_path_from_proc_maps () while (NULL != fgets (line, sizeof (line), f)) { if ((1 == - SSCANF (line, "%*x-%*x %*c%*c%*c%*c %*x %*2u:%*2u %*u%*[ ]%1023s", dir)) && - (NULL != (lgu = strstr (dir, "libgnunetutil")))) + SSCANF (line, "%*x-%*x %*c%*c%*c%*c %*x %*2x:%*2x %*u%*[ ]%1023s", dir)) && + (NULL != (lgu = strstr (dir, + current_pd->libname)))) { lgu[0] = '\0'; FCLOSE (f); @@ -89,6 +150,7 @@ get_path_from_proc_exe () char fn[64]; char lnk[1024]; ssize_t size; + char *lep; GNUNET_snprintf (fn, sizeof (fn), "/proc/%u/exe", getpid ()); size = readlink (fn, lnk, sizeof (lnk) - 1); @@ -101,11 +163,15 @@ get_path_from_proc_exe () lnk[size] = '\0'; while ((lnk[size] != '/') && (size > 0)) size--; - /* test for being in lib/gnunet/libexec/ */ - if ( (size > strlen ("/gnunet/libexec/")) && - (0 == strcmp ("/gnunet/libexec/", - &lnk[size - strlen ("/gnunet/libexec/")])) ) - size -= strlen ("gnunet/libexec/"); + GNUNET_asprintf (&lep, + "/%s/libexec/", + current_pd->project_dirname); + /* test for being in lib/gnunet/libexec/ or lib/MULTIARCH/gnunet/libexec */ + if ( (size > strlen (lep)) && + (0 == strcmp (lep, + &lnk[size - strlen (lep)])) ) + size -= strlen (lep) - 1; + GNUNET_free (lep); if ((size < 4) || (lnk[size - 4] != '/')) { /* not installed in "/bin/" -- binary path probably useless */ @@ -116,17 +182,20 @@ get_path_from_proc_exe () } #endif -#if WINDOWS +#if WINDOWS static HINSTANCE dll_instance; -/* GNUNET_util_cl_init() in common_logging.c is preferred. +/** + * GNUNET_util_cl_init() in common_logging.c is preferred. * This function is only for thread-local storage (not used in GNUnet) * and hInstance saving. */ BOOL WINAPI -DllMain (HINSTANCE hinstDLL, DWORD fdwReason, LPVOID lpvReserved) +DllMain (HINSTANCE hinstDLL, + DWORD fdwReason, + LPVOID lpvReserved) { switch (fdwReason) { @@ -167,12 +236,15 @@ get_path_from_module_filename () do { pathlen = pathlen * 2; - modulepath = GNUNET_realloc (modulepath, pathlen * sizeof (wchar_t)); + modulepath = GNUNET_realloc (modulepath, + pathlen * sizeof (wchar_t)); SetLastError (0); - real_pathlen = GetModuleFileNameW (dll_instance, modulepath, pathlen * sizeof (wchar_t)); + real_pathlen = GetModuleFileNameW (dll_instance, + modulepath, + pathlen * sizeof (wchar_t)); } while (real_pathlen >= pathlen && pathlen < 16*1024); if (real_pathlen >= pathlen) - GNUNET_abort (); + GNUNET_assert (0); /* To be safe */ modulepath[real_pathlen] = '\0'; @@ -214,10 +286,10 @@ get_path_from_module_filename () /* modulepath is GNUNET_PREFIX */ u8_string = u16_to_u8 (modulepath, wcslen (modulepath), NULL, &u8_string_length); if (NULL == u8_string) - GNUNET_abort (); + GNUNET_assert (0); upath = GNUNET_malloc (u8_string_length + 1); - memcpy (upath, u8_string, u8_string_length); + GNUNET_memcpy (upath, u8_string, u8_string_length); upath[u8_string_length] = '\0'; free (u8_string); @@ -227,15 +299,18 @@ get_path_from_module_filename () } #endif + #if DARWIN /** * Signature of the '_NSGetExecutablePath" function. * * @param buf where to write the path - * @param number of bytes available in 'buf' + * @param number of bytes available in @a buf * @return 0 on success, otherwise desired number of bytes is stored in 'bufsize' */ -typedef int (*MyNSGetExecutablePathProto) (char *buf, size_t * bufsize); +typedef int +(*MyNSGetExecutablePathProto) (char *buf, + size_t *bufsize); /** @@ -292,7 +367,8 @@ get_path_from_dyld_image () c = _dyld_image_count (); for (i = 0; i < c; i++) { - if (_dyld_get_image_header (i) != &_mh_dylib_header) + if (((const void *) _dyld_get_image_header (i)) != + ((const void *) &_mh_dylib_header) ) continue; path = _dyld_get_image_name (i); if ( (NULL == path) || (0 == strlen (path)) ) @@ -374,7 +450,11 @@ get_path_from_GNUNET_PREFIX () { const char *p; - if (NULL != (p = getenv ("GNUNET_PREFIX"))) + if ( (NULL != current_pd->env_varname) && + (NULL != (p = getenv (current_pd->env_varname))) ) + return GNUNET_strdup (p); + if ( (NULL != current_pd->env_varname_alt) && + (NULL != (p = getenv (current_pd->env_varname_alt))) ) return GNUNET_strdup (p); return NULL; } @@ -396,6 +476,10 @@ os_get_gnunet_path () #if LINUX if (NULL != (ret = get_path_from_proc_maps ())) return ret; + /* try path *first*, before /proc/exe, as /proc/exe can be wrong */ + if ( (NULL != current_pd->binary_name) && + (NULL != (ret = get_path_from_PATH (current_pd->binary_name))) ) + return ret; if (NULL != (ret = get_path_from_proc_exe ())) return ret; #endif @@ -409,21 +493,20 @@ os_get_gnunet_path () if (NULL != (ret = get_path_from_NSGetExecutablePath ())) return ret; #endif - if (NULL != (ret = get_path_from_PATH ("gnunet-arm"))) + if ( (NULL != current_pd->binary_name) && + (NULL != (ret = get_path_from_PATH (current_pd->binary_name))) ) return ret; /* other attempts here */ LOG (GNUNET_ERROR_TYPE_ERROR, - _ - ("Could not determine installation path for %s. Set `%s' environment variable.\n"), - "GNUnet", "GNUNET_PREFIX"); + _("Could not determine installation path for %s. Set `%s' environment variable.\n"), + current_pd->project_dirname, + current_pd->env_varname); return NULL; } /** * @brief get the path to current app's bin/ - * @author Milan - * * @return a pointer to the executable path, or NULL on error */ static char * @@ -450,17 +533,18 @@ os_get_exec_path () /** * @brief get the path to a specific GNUnet installation directory or, - * with GNUNET_IPK_SELF_PREFIX, the current running apps installation directory - * @author Milan + * with #GNUNET_OS_IPK_SELF_PREFIX, the current running apps installation directory * @return a pointer to the dir path (to be freed by the caller) */ char * GNUNET_OS_installation_get_path (enum GNUNET_OS_InstallationPathKind dirkind) { size_t n; - const char *dirname; + char *dirname; char *execpath = NULL; char *tmp; + char *multiarch; + char *libdir; int isbasedir; /* if wanted, try to get the current app's bin/ */ @@ -487,27 +571,38 @@ GNUNET_OS_installation_get_path (enum GNUNET_OS_InstallationPathKind dirkind) execpath[--n] = '\0'; isbasedir = 1; - if ((n > 5) && - ((0 == strcasecmp (&execpath[n - 5], "lib32")) || - (0 == strcasecmp (&execpath[n - 5], "lib64")))) + if ((n > 6) && + ((0 == strcasecmp (&execpath[n - 6], "/lib32")) || + (0 == strcasecmp (&execpath[n - 6], "/lib64")))) { if ( (GNUNET_OS_IPK_LIBDIR != dirkind) && (GNUNET_OS_IPK_LIBEXECDIR != dirkind) ) { /* strip '/lib32' or '/lib64' */ - execpath[n - 5] = '\0'; - n -= 5; + execpath[n - 6] = '\0'; + n -= 6; } else isbasedir = 0; } - else if ((n > 3) && - ((0 == strcasecmp (&execpath[n - 3], "bin")) || - (0 == strcasecmp (&execpath[n - 3], "lib")))) + else if ((n > 4) && + ((0 == strcasecmp (&execpath[n - 4], "/bin")) || + (0 == strcasecmp (&execpath[n - 4], "/lib")))) { /* strip '/bin' or '/lib' */ - execpath[n - 3] = '\0'; - n -= 3; + execpath[n - 4] = '\0'; + n -= 4; + } + multiarch = NULL; + if (NULL != (libdir = strstr (execpath, "/lib/"))) + { + /* test for multi-arch path of the form "PREFIX/lib/MULTIARCH/"; + here we need to re-add 'multiarch' to lib and libexec paths later! */ + multiarch = &libdir[5]; + if (NULL == strchr (multiarch, '/')) + libdir[0] = '\0'; /* Debian multiarch format, cut of from 'execpath' but preserve in multicarch */ + else + multiarch = NULL; /* maybe not, multiarch still has a '/', which is not OK */ } /* in case this was a directory named foo-bin, remove "foo-" */ while ((n > 1) && (execpath[n - 1] == DIR_SEPARATOR)) @@ -516,97 +611,150 @@ GNUNET_OS_installation_get_path (enum GNUNET_OS_InstallationPathKind dirkind) { case GNUNET_OS_IPK_PREFIX: case GNUNET_OS_IPK_SELF_PREFIX: - dirname = DIR_SEPARATOR_STR; + dirname = GNUNET_strdup (DIR_SEPARATOR_STR); break; case GNUNET_OS_IPK_BINDIR: - dirname = DIR_SEPARATOR_STR "bin" DIR_SEPARATOR_STR; + dirname = GNUNET_strdup (DIR_SEPARATOR_STR "bin" DIR_SEPARATOR_STR); break; case GNUNET_OS_IPK_LIBDIR: if (isbasedir) { - dirname = - DIR_SEPARATOR_STR "lib" DIR_SEPARATOR_STR "gnunet" DIR_SEPARATOR_STR; - tmp = GNUNET_malloc (strlen (execpath) + strlen (dirname) + 1); - sprintf (tmp, "%s%s", execpath, dirname); - if ( (GNUNET_YES != - GNUNET_DISK_directory_test (tmp, GNUNET_YES)) && - (4 == sizeof (void *)) ) + GNUNET_asprintf (&tmp, + "%s%s%s%s%s%s%s", + execpath, + DIR_SEPARATOR_STR "lib", + (NULL != multiarch) ? DIR_SEPARATOR_STR : "", + (NULL != multiarch) ? multiarch : "", + DIR_SEPARATOR_STR, + current_pd->project_dirname, + DIR_SEPARATOR_STR); + if (GNUNET_YES == + GNUNET_DISK_directory_test (tmp, GNUNET_YES)) + { + GNUNET_free (execpath); + return tmp; + } + GNUNET_free (tmp); + tmp = NULL; + dirname = NULL; + if (4 == sizeof (void *)) { - GNUNET_free (tmp); - dirname = - DIR_SEPARATOR_STR "lib32" DIR_SEPARATOR_STR "gnunet" DIR_SEPARATOR_STR; - tmp = GNUNET_malloc (strlen (execpath) + strlen (dirname) + 1); - sprintf (tmp, "%s%s", execpath, dirname); + GNUNET_asprintf (&dirname, + DIR_SEPARATOR_STR "lib32" DIR_SEPARATOR_STR "%s" DIR_SEPARATOR_STR, + current_pd->project_dirname); + GNUNET_asprintf (&tmp, + "%s%s", + execpath, + dirname); } - if ( (GNUNET_YES != - GNUNET_DISK_directory_test (tmp, GNUNET_YES)) && - (8 == sizeof (void *)) ) + if (8 == sizeof (void *)) + { + GNUNET_asprintf (&dirname, + DIR_SEPARATOR_STR "lib64" DIR_SEPARATOR_STR "%s" DIR_SEPARATOR_STR, + current_pd->project_dirname); + GNUNET_asprintf (&tmp, + "%s%s", + execpath, + dirname); + } + + if ( (NULL != tmp) && + (GNUNET_YES == + GNUNET_DISK_directory_test (tmp, GNUNET_YES)) ) { - dirname = - DIR_SEPARATOR_STR "lib64" DIR_SEPARATOR_STR "gnunet" DIR_SEPARATOR_STR; + GNUNET_free (execpath); + GNUNET_free_non_null (dirname); + return tmp; } GNUNET_free (tmp); + GNUNET_free_non_null (dirname); } - else - dirname = DIR_SEPARATOR_STR "gnunet" DIR_SEPARATOR_STR; + GNUNET_asprintf (&dirname, + DIR_SEPARATOR_STR "%s" DIR_SEPARATOR_STR, + current_pd->project_dirname); break; case GNUNET_OS_IPK_DATADIR: - dirname = - DIR_SEPARATOR_STR "share" DIR_SEPARATOR_STR "gnunet" DIR_SEPARATOR_STR; + GNUNET_asprintf (&dirname, + DIR_SEPARATOR_STR "share" DIR_SEPARATOR_STR "%s" DIR_SEPARATOR_STR, + current_pd->project_dirname); break; case GNUNET_OS_IPK_LOCALEDIR: - dirname = - DIR_SEPARATOR_STR "share" DIR_SEPARATOR_STR "locale" DIR_SEPARATOR_STR; + dirname = GNUNET_strdup (DIR_SEPARATOR_STR "share" DIR_SEPARATOR_STR "locale" DIR_SEPARATOR_STR); break; case GNUNET_OS_IPK_ICONDIR: - dirname = - DIR_SEPARATOR_STR "share" DIR_SEPARATOR_STR "icons" DIR_SEPARATOR_STR; + dirname = GNUNET_strdup (DIR_SEPARATOR_STR "share" DIR_SEPARATOR_STR "icons" DIR_SEPARATOR_STR); break; case GNUNET_OS_IPK_DOCDIR: - dirname = - DIR_SEPARATOR_STR "share" DIR_SEPARATOR_STR "doc" DIR_SEPARATOR_STR \ - "gnunet" DIR_SEPARATOR_STR; + GNUNET_asprintf (&dirname, + DIR_SEPARATOR_STR "share" DIR_SEPARATOR_STR "doc" DIR_SEPARATOR_STR "%s" DIR_SEPARATOR_STR, + current_pd->project_dirname); break; case GNUNET_OS_IPK_LIBEXECDIR: if (isbasedir) { - dirname = - DIR_SEPARATOR_STR "lib" DIR_SEPARATOR_STR "gnunet" DIR_SEPARATOR_STR \ - "libexec" DIR_SEPARATOR_STR; - tmp = GNUNET_malloc (strlen (execpath) + strlen (dirname) + 1); - sprintf (tmp, "%s%s", execpath, dirname); - if ( (GNUNET_YES != - GNUNET_DISK_directory_test (tmp, GNUNET_YES)) && - (4 == sizeof (void *)) ) + GNUNET_asprintf (&dirname, + DIR_SEPARATOR_STR "%s" DIR_SEPARATOR_STR "libexec" DIR_SEPARATOR_STR, + current_pd->project_dirname); + GNUNET_asprintf (&tmp, + "%s%s%s%s", + execpath, + DIR_SEPARATOR_STR "lib" DIR_SEPARATOR_STR, + (NULL != multiarch) ? multiarch : "", + dirname); + if (GNUNET_YES == + GNUNET_DISK_directory_test (tmp, GNUNET_YES)) + { + GNUNET_free (execpath); + GNUNET_free (dirname); + return tmp; + } + GNUNET_free (tmp); + tmp = NULL; + dirname = NULL; + if (4 == sizeof (void *)) + { + GNUNET_asprintf (&dirname, + DIR_SEPARATOR_STR "lib32" DIR_SEPARATOR_STR "%s" DIR_SEPARATOR_STR "libexec" DIR_SEPARATOR_STR, + current_pd->project_dirname); + GNUNET_asprintf (&tmp, + "%s%s", + execpath, + dirname); + } + if (8 == sizeof (void *)) { - GNUNET_free (tmp); - dirname = - DIR_SEPARATOR_STR "lib32" DIR_SEPARATOR_STR "gnunet" DIR_SEPARATOR_STR \ - "libexec" DIR_SEPARATOR_STR; - tmp = GNUNET_malloc (strlen (execpath) + strlen (dirname) + 1); - sprintf (tmp, "%s%s", execpath, dirname); + GNUNET_asprintf (&dirname, + DIR_SEPARATOR_STR "lib64" DIR_SEPARATOR_STR "%s" DIR_SEPARATOR_STR "libexec" DIR_SEPARATOR_STR, + current_pd->project_dirname); + GNUNET_asprintf (&tmp, + "%s%s", + execpath, + dirname); } - if ( (GNUNET_YES != - GNUNET_DISK_directory_test (tmp, GNUNET_YES)) && - (8 == sizeof (void *)) ) + if ( (NULL != tmp) && + (GNUNET_YES == + GNUNET_DISK_directory_test (tmp, GNUNET_YES)) ) { - dirname = - DIR_SEPARATOR_STR "lib64" DIR_SEPARATOR_STR "gnunet" DIR_SEPARATOR_STR \ - "libexec" DIR_SEPARATOR_STR; + GNUNET_free (execpath); + GNUNET_free_non_null (dirname); + return tmp; } GNUNET_free (tmp); + GNUNET_free_non_null (dirname); } - else - dirname = - DIR_SEPARATOR_STR "gnunet" DIR_SEPARATOR_STR \ - "libexec" DIR_SEPARATOR_STR; + GNUNET_asprintf (&dirname, + DIR_SEPARATOR_STR "%s" DIR_SEPARATOR_STR "libexec" DIR_SEPARATOR_STR, + current_pd->project_dirname); break; default: GNUNET_free (execpath); return NULL; } - tmp = GNUNET_malloc (strlen (execpath) + strlen (dirname) + 1); - sprintf (tmp, "%s%s", execpath, dirname); + GNUNET_asprintf (&tmp, + "%s%s", + execpath, + dirname); + GNUNET_free (dirname); GNUNET_free (execpath); return tmp; } @@ -623,48 +771,65 @@ GNUNET_OS_installation_get_path (enum GNUNET_OS_InstallationPathKind dirkind) char * GNUNET_OS_get_libexec_binary_path (const char *progname) { + static char *cache; char *libexecdir; char *binary; - if (DIR_SEPARATOR == progname[0]) + if ( (DIR_SEPARATOR == progname[0]) || + (GNUNET_YES == + GNUNET_STRINGS_path_is_absolute (progname, + GNUNET_NO, + NULL, NULL)) ) return GNUNET_strdup (progname); - libexecdir = GNUNET_OS_installation_get_path (GNUNET_OS_IPK_LIBEXECDIR); + if (NULL != cache) + libexecdir = cache; + else + libexecdir = GNUNET_OS_installation_get_path (GNUNET_OS_IPK_LIBEXECDIR); if (NULL == libexecdir) return GNUNET_strdup (progname); GNUNET_asprintf (&binary, "%s%s", libexecdir, progname); - GNUNET_free (libexecdir); + cache = libexecdir; return binary; } /** - * Check whether an executable exists and possibly - * if the suid bit is set on the file. - * Attempts to find the file using the current - * PATH environment variable as a search path. + * Check whether an executable exists and possibly if the suid bit is + * set on the file. Attempts to find the file using the current PATH + * environment variable as a search path. * * @param binary the name of the file to check. * W32: must not have an .exe suffix. - * @return GNUNET_YES if the file is SUID, - * GNUNET_NO if not SUID (but binary exists) - * GNUNET_SYSERR on error (no such binary or not executable) + * @param check_suid input true if the binary should be checked for SUID (*nix) + * W32: checks if the program has sufficient privileges by executing this + * binary with the -d flag. -d omits a programs main loop and only + * executes all privileged operations in an binary. + * @param params parameters used for w32 privilege checking (can be NULL for != w32 ) + * @return #GNUNET_YES if the file is SUID (*nix) or can be executed with current privileges (W32), + * #GNUNET_NO if not SUID (but binary exists), + * #GNUNET_SYSERR on error (no such binary or not executable) */ int -GNUNET_OS_check_helper_binary (const char *binary) +GNUNET_OS_check_helper_binary (const char *binary, + int check_suid, + const char *params) { struct stat statbuf; char *p; char *pf; #ifdef MINGW - SOCKET rawsock; char *binaryexe; - GNUNET_asprintf (&binaryexe, "%s.exe", binary); - if ( (GNUNET_YES == GNUNET_STRINGS_path_is_absolute (binaryexe, GNUNET_NO, - NULL, NULL)) || + GNUNET_asprintf (&binaryexe, + "%s.exe", + binary); + if ( (GNUNET_YES == + GNUNET_STRINGS_path_is_absolute (binaryexe, + GNUNET_NO, + NULL, NULL)) || (0 == strncmp (binary, "./", 2)) ) p = GNUNET_strdup (binaryexe); else @@ -679,16 +844,24 @@ GNUNET_OS_check_helper_binary (const char *binary) } GNUNET_free (binaryexe); #else - if ( (GNUNET_YES == GNUNET_STRINGS_path_is_absolute (binary, GNUNET_NO, - NULL, NULL)) || + if ( (GNUNET_YES == + GNUNET_STRINGS_path_is_absolute (binary, + GNUNET_NO, + NULL, + NULL)) || (0 == strncmp (binary, "./", 2)) ) + { p = GNUNET_strdup (binary); + } else { p = get_path_from_PATH (binary); if (NULL != p) { - GNUNET_asprintf (&pf, "%s/%s", p, binary); + GNUNET_asprintf (&pf, + "%s/%s", + p, + binary); GNUNET_free (p); p = pf; } @@ -696,13 +869,17 @@ GNUNET_OS_check_helper_binary (const char *binary) #endif if (NULL == p) { - LOG (GNUNET_ERROR_TYPE_INFO, _("Could not find binary `%s' in PATH!\n"), + LOG (GNUNET_ERROR_TYPE_INFO, + _("Could not find binary `%s' in PATH!\n"), binary); return GNUNET_SYSERR; } - if (0 != ACCESS (p, X_OK)) + if (0 != ACCESS (p, + X_OK)) { - LOG_STRERROR_FILE (GNUNET_ERROR_TYPE_WARNING, "access", p); + LOG_STRERROR_FILE (GNUNET_ERROR_TYPE_WARNING, + "access", + p); GNUNET_free (p); return GNUNET_SYSERR; } @@ -711,49 +888,83 @@ GNUNET_OS_check_helper_binary (const char *binary) { /* as we run as root, we don't insist on SUID */ GNUNET_free (p); - return GNUNET_OK; + return GNUNET_YES; } #endif - if (0 != STAT (p, &statbuf)) + if (0 != STAT (p, + &statbuf)) { - LOG_STRERROR_FILE (GNUNET_ERROR_TYPE_WARNING, "stat", p); + LOG_STRERROR_FILE (GNUNET_ERROR_TYPE_WARNING, + "stat", + p); GNUNET_free (p); return GNUNET_SYSERR; } -#ifndef MINGW - if ((0 != (statbuf.st_mode & S_ISUID)) && (0 == statbuf.st_uid)) - { - GNUNET_free (p); - return GNUNET_YES; - } - /* binary exists, but not SUID */ - GNUNET_free (p); - return GNUNET_NO; -#else - GNUNET_free (p); + if (check_suid) { - static int once; /* remember result from previous runs... */ - - if (0 == once) +#ifndef MINGW + if ( (0 != (statbuf.st_mode & S_ISUID)) && + (0 == statbuf.st_uid) ) { - rawsock = socket (AF_INET, SOCK_RAW, IPPROTO_ICMP); - if (INVALID_SOCKET == rawsock) - { - DWORD err = GetLastError (); - - LOG (GNUNET_ERROR_TYPE_DEBUG, - "socket (AF_INET, SOCK_RAW, IPPROTO_ICMP) failed! GLE = %d\n", err); - once = -1; - return GNUNET_NO; /* not running as administrator */ - } - once = 1; - closesocket (rawsock); + GNUNET_free (p); + return GNUNET_YES; } - if (-1 == once) - return GNUNET_NO; - return GNUNET_YES; - } + GNUNET_log (GNUNET_ERROR_TYPE_INFO, + _("Binary `%s' exists, but is not SUID\n"), + p); + /* binary exists, but not SUID */ +#else + STARTUPINFO start; + char parameters[512]; + PROCESS_INFORMATION proc; + DWORD exit_value; + + GNUNET_snprintf (parameters, + sizeof (parameters), + "-d %s", params); + memset (&start, 0, sizeof (start)); + start.cb = sizeof (start); + memset (&proc, 0, sizeof (proc)); + + + // Start the child process. + if ( ! (CreateProcess( p, // current windows (2k3 and up can handle / instead of \ in paths)) + parameters, // execute dryrun/priviliege checking mode + NULL, // Process handle not inheritable + NULL, // Thread handle not inheritable + FALSE, // Set handle inheritance to FALSE + CREATE_DEFAULT_ERROR_MODE, // No creation flags + NULL, // Use parent's environment block + NULL, // Use parent's starting directory + &start, // Pointer to STARTUPINFO structure + &proc ) // Pointer to PROCESS_INFORMATION structure + )) + { + LOG (GNUNET_ERROR_TYPE_ERROR, + _("CreateProcess failed for binary %s (%d).\n"), + p, GetLastError()); + return GNUNET_SYSERR; + } + + // Wait until child process exits. + WaitForSingleObject( proc.hProcess, INFINITE ); + + if ( ! GetExitCodeProcess (proc.hProcess, &exit_value)){ + LOG (GNUNET_ERROR_TYPE_ERROR, + _("GetExitCodeProcess failed for binary %s (%d).\n"), + p, GetLastError() ); + return GNUNET_SYSERR; + } + // Close process and thread handles. + CloseHandle( proc.hProcess ); + CloseHandle( proc.hThread ); + + if (!exit_value) + return GNUNET_YES; #endif + } + GNUNET_free (p); + return GNUNET_NO; }