Sprout from master 2014-08-06 20:29:54 UTC reyk 'Change grammar to remove a shift/reduce conflict that was introduced' Delete: src/lib/libcrypto/arc4random/arc4random_linux.h src/lib/libcrypto/arc4random/arc4random_osx.h src/lib/libcrypto/arc4random/arc4random_solaris.h src/lib/libcrypto/arc4random/arc4random_win.h src/lib/libcrypto/arc4random/getentropy_linux.c src/lib/libcrypto/arc4random/getentropy_osx.c src/lib/libcrypto/arc4random/getentropy_solaris.c src/lib/libcrypto/arc4random/getentropy_win.cOPENBSD_5_6
@ -1,85 +0,0 @@ | |||
/* $OpenBSD: arc4random_linux.h,v 1.7 2014/07/20 20:51:13 bcook Exp $ */ | |||
/* | |||
* Copyright (c) 1996, David Mazieres <dm@uun.org> | |||
* Copyright (c) 2008, Damien Miller <djm@openbsd.org> | |||
* Copyright (c) 2013, Markus Friedl <markus@openbsd.org> | |||
* | |||
* Permission to use, copy, modify, and distribute this software for any | |||
* purpose with or without fee is hereby granted, provided that the above | |||
* copyright notice and this permission notice appear in all copies. | |||
* | |||
* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES | |||
* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF | |||
* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR | |||
* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES | |||
* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN | |||
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF | |||
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. | |||
*/ | |||
/* | |||
* Stub functions for portability. | |||
*/ | |||
#include <sys/mman.h> | |||
#include <pthread.h> | |||
#include <signal.h> | |||
static pthread_mutex_t arc4random_mtx = PTHREAD_MUTEX_INITIALIZER; | |||
#define _ARC4_LOCK() pthread_mutex_lock(&arc4random_mtx) | |||
#define _ARC4_UNLOCK() pthread_mutex_unlock(&arc4random_mtx) | |||
#ifdef __GLIBC__ | |||
extern void *__dso_handle; | |||
extern int __register_atfork(void (*)(void), void(*)(void), void (*)(void), void *); | |||
#define _ARC4_ATFORK(f) __register_atfork(NULL, NULL, (f), __dso_handle) | |||
#else | |||
#define _ARC4_ATFORK(f) pthread_atfork(NULL, NULL, (f)) | |||
#endif | |||
static inline void | |||
_getentropy_fail(void) | |||
{ | |||
raise(SIGKILL); | |||
} | |||
static volatile sig_atomic_t _rs_forked; | |||
static inline void | |||
_rs_forkhandler(void) | |||
{ | |||
_rs_forked = 1; | |||
} | |||
static inline void | |||
_rs_forkdetect(void) | |||
{ | |||
static pid_t _rs_pid = 0; | |||
pid_t pid = getpid(); | |||
if (_rs_pid == 0 || _rs_pid != pid || _rs_forked) { | |||
_rs_pid = pid; | |||
_rs_forked = 0; | |||
if (rs) | |||
memset(rs, 0, sizeof(*rs)); | |||
} | |||
} | |||
static inline int | |||
_rs_allocate(struct _rs **rsp, struct _rsx **rsxp) | |||
{ | |||
if ((*rsp = mmap(NULL, sizeof(**rsp), PROT_READ|PROT_WRITE, | |||
MAP_ANON|MAP_PRIVATE, -1, 0)) == MAP_FAILED) | |||
return (-1); | |||
if ((*rsxp = mmap(NULL, sizeof(**rsxp), PROT_READ|PROT_WRITE, | |||
MAP_ANON|MAP_PRIVATE, -1, 0)) == MAP_FAILED) { | |||
munmap(*rsxp, sizeof(**rsxp)); | |||
return (-1); | |||
} | |||
_ARC4_ATFORK(_rs_forkhandler); | |||
return (0); | |||
} |
@ -1,79 +0,0 @@ | |||
/* $OpenBSD: arc4random_osx.h,v 1.7 2014/07/20 20:51:13 bcook Exp $ */ | |||
/* | |||
* Copyright (c) 1996, David Mazieres <dm@uun.org> | |||
* Copyright (c) 2008, Damien Miller <djm@openbsd.org> | |||
* Copyright (c) 2013, Markus Friedl <markus@openbsd.org> | |||
* | |||
* Permission to use, copy, modify, and distribute this software for any | |||
* purpose with or without fee is hereby granted, provided that the above | |||
* copyright notice and this permission notice appear in all copies. | |||
* | |||
* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES | |||
* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF | |||
* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR | |||
* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES | |||
* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN | |||
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF | |||
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. | |||
*/ | |||
/* | |||
* Stub functions for portability. | |||
*/ | |||
#include <sys/mman.h> | |||
#include <pthread.h> | |||
#include <signal.h> | |||
static pthread_mutex_t arc4random_mtx = PTHREAD_MUTEX_INITIALIZER; | |||
#define _ARC4_LOCK() pthread_mutex_lock(&arc4random_mtx) | |||
#define _ARC4_UNLOCK() pthread_mutex_unlock(&arc4random_mtx) | |||
#define _ARC4_ATFORK(f) pthread_atfork(NULL, NULL, (f)) | |||
static inline void | |||
_getentropy_fail(void) | |||
{ | |||
raise(SIGKILL); | |||
} | |||
static volatile sig_atomic_t _rs_forked; | |||
static inline void | |||
_rs_forkhandler(void) | |||
{ | |||
_rs_forked = 1; | |||
} | |||
static inline void | |||
_rs_forkdetect(void) | |||
{ | |||
static pid_t _rs_pid = 0; | |||
pid_t pid = getpid(); | |||
if (_rs_pid == 0 || _rs_pid != pid || _rs_forked) { | |||
_rs_pid = pid; | |||
_rs_forked = 0; | |||
if (rs) | |||
memset(rs, 0, sizeof(*rs)); | |||
} | |||
} | |||
static inline int | |||
_rs_allocate(struct _rs **rsp, struct _rsx **rsxp) | |||
{ | |||
if ((*rsp = mmap(NULL, sizeof(**rsp), PROT_READ|PROT_WRITE, | |||
MAP_ANON|MAP_PRIVATE, -1, 0)) == MAP_FAILED) | |||
return -1; | |||
if ((*rsxp = mmap(NULL, sizeof(**rsxp), PROT_READ|PROT_WRITE, | |||
MAP_ANON|MAP_PRIVATE, -1, 0)) == MAP_FAILED) { | |||
munmap(*rsxp, sizeof(**rsxp)); | |||
return -1; | |||
} | |||
_ARC4_ATFORK(_rs_forkhandler); | |||
return 0; | |||
} |
@ -1,79 +0,0 @@ | |||
/* $OpenBSD: arc4random_solaris.h,v 1.7 2014/07/20 20:51:13 bcook Exp $ */ | |||
/* | |||
* Copyright (c) 1996, David Mazieres <dm@uun.org> | |||
* Copyright (c) 2008, Damien Miller <djm@openbsd.org> | |||
* Copyright (c) 2013, Markus Friedl <markus@openbsd.org> | |||
* | |||
* Permission to use, copy, modify, and distribute this software for any | |||
* purpose with or without fee is hereby granted, provided that the above | |||
* copyright notice and this permission notice appear in all copies. | |||
* | |||
* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES | |||
* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF | |||
* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR | |||
* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES | |||
* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN | |||
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF | |||
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. | |||
*/ | |||
/* | |||
* Stub functions for portability. | |||
*/ | |||
#include <sys/mman.h> | |||
#include <pthread.h> | |||
#include <signal.h> | |||
static pthread_mutex_t arc4random_mtx = PTHREAD_MUTEX_INITIALIZER; | |||
#define _ARC4_LOCK() pthread_mutex_lock(&arc4random_mtx) | |||
#define _ARC4_UNLOCK() pthread_mutex_unlock(&arc4random_mtx) | |||
#define _ARC4_ATFORK(f) pthread_atfork(NULL, NULL, (f)) | |||
static inline void | |||
_getentropy_fail(void) | |||
{ | |||
raise(SIGKILL); | |||
} | |||
static volatile sig_atomic_t _rs_forked; | |||
static inline void | |||
_rs_forkhandler(void) | |||
{ | |||
_rs_forked = 1; | |||
} | |||
static inline void | |||
_rs_forkdetect(void) | |||
{ | |||
static pid_t _rs_pid = 0; | |||
pid_t pid = getpid(); | |||
if (_rs_pid == 0 || _rs_pid != pid || _rs_forked) { | |||
_rs_pid = pid; | |||
_rs_forked = 0; | |||
if (rs) | |||
memset(rs, 0, sizeof(*rs)); | |||
} | |||
} | |||
static inline int | |||
_rs_allocate(struct _rs **rsp, struct _rsx **rsxp) | |||
{ | |||
if ((*rsp = mmap(NULL, sizeof(**rsp), PROT_READ|PROT_WRITE, | |||
MAP_ANON|MAP_PRIVATE, -1, 0)) == MAP_FAILED) | |||
return (-1); | |||
if ((*rsxp = mmap(NULL, sizeof(**rsxp), PROT_READ|PROT_WRITE, | |||
MAP_ANON|MAP_PRIVATE, -1, 0)) == MAP_FAILED) { | |||
munmap(*rsxp, sizeof(**rsxp)); | |||
return (-1); | |||
} | |||
_ARC4_ATFORK(_rs_forkhandler); | |||
return (0); | |||
} |
@ -1,74 +0,0 @@ | |||
/* $OpenBSD: arc4random_win.h,v 1.4 2014/07/20 20:51:13 bcook Exp $ */ | |||
/* | |||
* Copyright (c) 1996, David Mazieres <dm@uun.org> | |||
* Copyright (c) 2008, Damien Miller <djm@openbsd.org> | |||
* Copyright (c) 2013, Markus Friedl <markus@openbsd.org> | |||
* | |||
* Permission to use, copy, modify, and distribute this software for any | |||
* purpose with or without fee is hereby granted, provided that the above | |||
* copyright notice and this permission notice appear in all copies. | |||
* | |||
* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES | |||
* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF | |||
* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR | |||
* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES | |||
* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN | |||
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF | |||
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. | |||
*/ | |||
/* | |||
* Stub functions for portability. | |||
*/ | |||
#include <windows.h> | |||
static volatile HANDLE arc4random_mtx = NULL; | |||
/* | |||
* Initialize the mutex on the first lock attempt. On collision, each thread | |||
* will attempt to allocate a mutex and compare-and-swap it into place as the | |||
* global mutex. On failure to swap in the global mutex, the mutex is closed. | |||
*/ | |||
#define _ARC4_LOCK() { \ | |||
if (!arc4random_mtx) { \ | |||
HANDLE p = CreateMutex(NULL, FALSE, NULL); \ | |||
if (InterlockedCompareExchangePointer((void **)&arc4random_mtx, (void *)p, NULL)) \ | |||
CloseHandle(p); \ | |||
} \ | |||
WaitForSingleObject(arc4random_mtx, INFINITE); \ | |||
} \ | |||
#define _ARC4_UNLOCK() ReleaseMutex(arc4random_mtx) | |||
static inline void | |||
_getentropy_fail(void) | |||
{ | |||
TerminateProcess(GetCurrentProcess(), 0); | |||
} | |||
static inline int | |||
_rs_allocate(struct _rs **rsp, struct _rsx **rsxp) | |||
{ | |||
*rsp = calloc(1, sizeof(**rsp)); | |||
if (*rsp == NULL) | |||
return (-1); | |||
*rsxp = calloc(1, sizeof(**rsxp)); | |||
if (*rsxp == NULL) { | |||
free(*rsp); | |||
return (-1); | |||
} | |||
return (0); | |||
} | |||
static inline void | |||
_rs_forkhandler(void) | |||
{ | |||
} | |||
static inline void | |||
_rs_forkdetect(void) | |||
{ | |||
} |
@ -1,544 +0,0 @@ | |||
/* $OpenBSD: getentropy_linux.c,v 1.32 2014/07/22 01:15:58 bcook Exp $ */ | |||
/* | |||
* Copyright (c) 2014 Theo de Raadt <deraadt@openbsd.org> | |||
* Copyright (c) 2014 Bob Beck <beck@obtuse.com> | |||
* | |||
* Permission to use, copy, modify, and distribute this software for any | |||
* purpose with or without fee is hereby granted, provided that the above | |||
* copyright notice and this permission notice appear in all copies. | |||
* | |||
* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES | |||
* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF | |||
* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR | |||
* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES | |||
* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN | |||
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF | |||
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. | |||
* | |||
* Emulation of getentropy(2) as documented at: | |||
* http://www.openbsd.org/cgi-bin/man.cgi/OpenBSD-current/man2/getentropy.2 | |||
*/ | |||
#define _POSIX_C_SOURCE 199309L | |||
#define _GNU_SOURCE 1 | |||
#include <sys/types.h> | |||
#include <sys/param.h> | |||
#include <sys/ioctl.h> | |||
#include <sys/resource.h> | |||
#include <sys/syscall.h> | |||
#ifdef HAVE_SYS_SYSCTL_H | |||
#include <sys/sysctl.h> | |||
#endif | |||
#include <sys/statvfs.h> | |||
#include <sys/socket.h> | |||
#include <sys/mount.h> | |||
#include <sys/mman.h> | |||
#include <sys/stat.h> | |||
#include <sys/time.h> | |||
#include <stdlib.h> | |||
#include <stdint.h> | |||
#include <stdio.h> | |||
#include <link.h> | |||
#include <termios.h> | |||
#include <fcntl.h> | |||
#include <signal.h> | |||
#include <string.h> | |||
#include <errno.h> | |||
#include <unistd.h> | |||
#include <time.h> | |||
#include <openssl/sha.h> | |||
#include <linux/random.h> | |||
#include <linux/sysctl.h> | |||
#ifdef HAVE_GETAUXVAL | |||
#include <sys/auxv.h> | |||
#endif | |||
#include <sys/vfs.h> | |||
#define REPEAT 5 | |||
#define min(a, b) (((a) < (b)) ? (a) : (b)) | |||
#define HX(a, b) \ | |||
do { \ | |||
if ((a)) \ | |||
HD(errno); \ | |||
else \ | |||
HD(b); \ | |||
} while (0) | |||
#define HR(x, l) (SHA512_Update(&ctx, (char *)(x), (l))) | |||
#define HD(x) (SHA512_Update(&ctx, (char *)&(x), sizeof (x))) | |||
#define HF(x) (SHA512_Update(&ctx, (char *)&(x), sizeof (void*))) | |||
int getentropy(void *buf, size_t len); | |||
static int gotdata(char *buf, size_t len); | |||
static int getentropy_getrandom(void *buf, size_t len); | |||
static int getentropy_urandom(void *buf, size_t len); | |||
#ifdef SYS__sysctl | |||
static int getentropy_sysctl(void *buf, size_t len); | |||
#endif | |||
static int getentropy_fallback(void *buf, size_t len); | |||
static int getentropy_phdr(struct dl_phdr_info *info, size_t size, void *data); | |||
int | |||
getentropy(void *buf, size_t len) | |||
{ | |||
int ret = -1; | |||
if (len > 256) { | |||
errno = EIO; | |||
return -1; | |||
} | |||
/* | |||
* Try descriptor-less getrandom() | |||
*/ | |||
ret = getentropy_getrandom(buf, len); | |||
if (ret != -1) | |||
return (ret); | |||
/* | |||
* Try to get entropy with /dev/urandom | |||
* | |||
* This can fail if the process is inside a chroot or if file | |||
* descriptors are exhausted. | |||
*/ | |||
ret = getentropy_urandom(buf, len); | |||
if (ret != -1) | |||
return (ret); | |||
#ifdef SYS__sysctl | |||
/* | |||
* Try to use sysctl CTL_KERN, KERN_RANDOM, RANDOM_UUID. | |||
* sysctl is a failsafe API, so it guarantees a result. This | |||
* should work inside a chroot, or when file descriptors are | |||
* exhuasted. | |||
* | |||
* However this can fail if the Linux kernel removes support | |||
* for sysctl. Starting in 2007, there have been efforts to | |||
* deprecate the sysctl API/ABI, and push callers towards use | |||
* of the chroot-unavailable fd-using /proc mechanism -- | |||
* essentially the same problems as /dev/urandom. | |||
* | |||
* Numerous setbacks have been encountered in their deprecation | |||
* schedule, so as of June 2014 the kernel ABI still exists on | |||
* most Linux architectures. The sysctl() stub in libc is missing | |||
* on some systems. There are also reports that some kernels | |||
* spew messages to the console. | |||
*/ | |||
ret = getentropy_sysctl(buf, len); | |||
if (ret != -1) | |||
return (ret); | |||
#endif /* SYS__sysctl */ | |||
/* | |||
* Entropy collection via /dev/urandom and sysctl have failed. | |||
* | |||
* No other API exists for collecting entropy. See the large | |||
* comment block above. | |||
* | |||
* We have very few options: | |||
* - Even syslog_r is unsafe to call at this low level, so | |||
* there is no way to alert the user or program. | |||
* - Cannot call abort() because some systems have unsafe | |||
* corefiles. | |||
* - Could raise(SIGKILL) resulting in silent program termination. | |||
* - Return EIO, to hint that arc4random's stir function | |||
* should raise(SIGKILL) | |||
* - Do the best under the circumstances.... | |||
* | |||
* This code path exists to bring light to the issue that Linux | |||
* does not provide a failsafe API for entropy collection. | |||
* | |||
* We hope this demonstrates that Linux should either retain their | |||
* sysctl ABI, or consider providing a new failsafe API which | |||
* works in a chroot or when file descriptors are exhausted. | |||
*/ | |||
#undef FAIL_INSTEAD_OF_TRYING_FALLBACK | |||
#ifdef FAIL_INSTEAD_OF_TRYING_FALLBACK | |||
raise(SIGKILL); | |||
#endif | |||
ret = getentropy_fallback(buf, len); | |||
if (ret != -1) | |||
return (ret); | |||
errno = EIO; | |||
return (ret); | |||
} | |||
/* | |||
* Basic sanity checking; wish we could do better. | |||
*/ | |||
static int | |||
gotdata(char *buf, size_t len) | |||
{ | |||
char any_set = 0; | |||
size_t i; | |||
for (i = 0; i < len; ++i) | |||
any_set |= buf[i]; | |||
if (any_set == 0) | |||
return -1; | |||
return 0; | |||
} | |||
static int | |||
getentropy_getrandom(void *buf, size_t len) | |||
{ | |||
#if 0 | |||
/* Hand-definitions until the API becomes commonplace */ | |||
#ifndef SYS__getrandom | |||
#ifdef __LP64__ | |||
#define SYS__getrandom 317 | |||
#else | |||
#define SYS__getrandom 354 | |||
#endif | |||
#endif | |||
if (len > 256) | |||
return (-1); | |||
ret = syscall(SYS__getrandom, buf, len, 0); | |||
if (ret == len) | |||
return (0); | |||
#endif | |||
return -1; | |||
} | |||
static int | |||
getentropy_urandom(void *buf, size_t len) | |||
{ | |||
struct stat st; | |||
size_t i; | |||
int fd, cnt, flags; | |||
int save_errno = errno; | |||
start: | |||
flags = O_RDONLY; | |||
#ifdef O_NOFOLLOW | |||
flags |= O_NOFOLLOW; | |||
#endif | |||
#ifdef O_CLOEXEC | |||
flags |= O_CLOEXEC; | |||
#endif | |||
fd = open("/dev/urandom", flags, 0); | |||
if (fd == -1) { | |||
if (errno == EINTR) | |||
goto start; | |||
goto nodevrandom; | |||
} | |||
#ifndef O_CLOEXEC | |||
fcntl(fd, F_SETFD, fcntl(fd, F_GETFD) | FD_CLOEXEC); | |||
#endif | |||
/* Lightly verify that the device node looks sane */ | |||
if (fstat(fd, &st) == -1 || !S_ISCHR(st.st_mode)) { | |||
close(fd); | |||
goto nodevrandom; | |||
} | |||
if (ioctl(fd, RNDGETENTCNT, &cnt) == -1) { | |||
close(fd); | |||
goto nodevrandom; | |||
} | |||
for (i = 0; i < len; ) { | |||
size_t wanted = len - i; | |||
ssize_t ret = read(fd, (char *)buf + i, wanted); | |||
if (ret == -1) { | |||
if (errno == EAGAIN || errno == EINTR) | |||
continue; | |||
close(fd); | |||
goto nodevrandom; | |||
} | |||
i += ret; | |||
} | |||
close(fd); | |||
if (gotdata(buf, len) == 0) { | |||
errno = save_errno; | |||
return 0; /* satisfied */ | |||
} | |||
nodevrandom: | |||
errno = EIO; | |||
return -1; | |||
} | |||
#ifdef SYS__sysctl | |||
static int | |||
getentropy_sysctl(void *buf, size_t len) | |||
{ | |||
static int mib[] = { CTL_KERN, KERN_RANDOM, RANDOM_UUID }; | |||
size_t i; | |||
int save_errno = errno; | |||
for (i = 0; i < len; ) { | |||
size_t chunk = min(len - i, 16); | |||
/* SYS__sysctl because some systems already removed sysctl() */ | |||
struct __sysctl_args args = { | |||
.name = mib, | |||
.nlen = 3, | |||
.oldval = (char *)buf + i, | |||
.oldlenp = &chunk, | |||
}; | |||
if (syscall(SYS__sysctl, &args) != 0) | |||
goto sysctlfailed; | |||
i += chunk; | |||
} | |||
if (gotdata(buf, len) == 0) { | |||
errno = save_errno; | |||
return (0); /* satisfied */ | |||
} | |||
sysctlfailed: | |||
errno = EIO; | |||
return -1; | |||
} | |||
#endif /* SYS__sysctl */ | |||
static int cl[] = { | |||
CLOCK_REALTIME, | |||
#ifdef CLOCK_MONOTONIC | |||
CLOCK_MONOTONIC, | |||
#endif | |||
#ifdef CLOCK_MONOTONIC_RAW | |||
CLOCK_MONOTONIC_RAW, | |||
#endif | |||
#ifdef CLOCK_TAI | |||
CLOCK_TAI, | |||
#endif | |||
#ifdef CLOCK_VIRTUAL | |||
CLOCK_VIRTUAL, | |||
#endif | |||
#ifdef CLOCK_UPTIME | |||
CLOCK_UPTIME, | |||
#endif | |||
#ifdef CLOCK_PROCESS_CPUTIME_ID | |||
CLOCK_PROCESS_CPUTIME_ID, | |||
#endif | |||
#ifdef CLOCK_THREAD_CPUTIME_ID | |||
CLOCK_THREAD_CPUTIME_ID, | |||
#endif | |||
}; | |||
static int | |||
getentropy_phdr(struct dl_phdr_info *info, size_t size, void *data) | |||
{ | |||
SHA512_CTX *ctx = data; | |||
SHA512_Update(ctx, &info->dlpi_addr, sizeof (info->dlpi_addr)); | |||
return 0; | |||
} | |||
static int | |||
getentropy_fallback(void *buf, size_t len) | |||
{ | |||
uint8_t results[SHA512_DIGEST_LENGTH]; | |||
int save_errno = errno, e, pgs = getpagesize(), faster = 0, repeat; | |||
static int cnt; | |||
struct timespec ts; | |||
struct timeval tv; | |||
struct rusage ru; | |||
sigset_t sigset; | |||
struct stat st; | |||
SHA512_CTX ctx; | |||
static pid_t lastpid; | |||
pid_t pid; | |||
size_t i, ii, m; | |||
char *p; | |||
pid = getpid(); | |||
if (lastpid == pid) { | |||
faster = 1; | |||
repeat = 2; | |||
} else { | |||
faster = 0; | |||
lastpid = pid; | |||
repeat = REPEAT; | |||
} | |||
for (i = 0; i < len; ) { | |||
int j; | |||
SHA512_Init(&ctx); | |||
for (j = 0; j < repeat; j++) { | |||
HX((e = gettimeofday(&tv, NULL)) == -1, tv); | |||
if (e != -1) { | |||
cnt += (int)tv.tv_sec; | |||
cnt += (int)tv.tv_usec; | |||
} | |||
dl_iterate_phdr(getentropy_phdr, &ctx); | |||
for (ii = 0; ii < sizeof(cl)/sizeof(cl[0]); ii++) | |||
HX(clock_gettime(cl[ii], &ts) == -1, ts); | |||
HX((pid = getpid()) == -1, pid); | |||
HX((pid = getsid(pid)) == -1, pid); | |||
HX((pid = getppid()) == -1, pid); | |||
HX((pid = getpgid(0)) == -1, pid); | |||
HX((e = getpriority(0, 0)) == -1, e); | |||
if (!faster) { | |||
ts.tv_sec = 0; | |||
ts.tv_nsec = 1; | |||
(void) nanosleep(&ts, NULL); | |||
} | |||
HX(sigpending(&sigset) == -1, sigset); | |||
HX(sigprocmask(SIG_BLOCK, NULL, &sigset) == -1, | |||
sigset); | |||
HF(getentropy); /* an addr in this library */ | |||
HF(printf); /* an addr in libc */ | |||
p = (char *)&p; | |||
HD(p); /* an addr on stack */ | |||
p = (char *)&errno; | |||
HD(p); /* the addr of errno */ | |||
if (i == 0) { | |||
struct sockaddr_storage ss; | |||
struct statvfs stvfs; | |||
struct termios tios; | |||
struct statfs stfs; | |||
socklen_t ssl; | |||
off_t off; | |||
/* | |||
* Prime-sized mappings encourage fragmentation; | |||
* thus exposing some address entropy. | |||
*/ | |||
struct mm { | |||
size_t npg; | |||
void *p; | |||
} mm[] = { | |||
{ 17, MAP_FAILED }, { 3, MAP_FAILED }, | |||
{ 11, MAP_FAILED }, { 2, MAP_FAILED }, | |||
{ 5, MAP_FAILED }, { 3, MAP_FAILED }, | |||
{ 7, MAP_FAILED }, { 1, MAP_FAILED }, | |||
{ 57, MAP_FAILED }, { 3, MAP_FAILED }, | |||
{ 131, MAP_FAILED }, { 1, MAP_FAILED }, | |||
}; | |||
for (m = 0; m < sizeof mm/sizeof(mm[0]); m++) { | |||
HX(mm[m].p = mmap(NULL, | |||
mm[m].npg * pgs, | |||
PROT_READ|PROT_WRITE, | |||
MAP_PRIVATE|MAP_ANON, -1, | |||
(off_t)0), mm[m].p); | |||
if (mm[m].p != MAP_FAILED) { | |||
size_t mo; | |||
/* Touch some memory... */ | |||
p = mm[m].p; | |||
mo = cnt % | |||
(mm[m].npg * pgs - 1); | |||
p[mo] = 1; | |||
cnt += (int)((long)(mm[m].p) | |||
/ pgs); | |||
} | |||
/* Check cnts and times... */ | |||
for (ii = 0; ii < sizeof(cl)/sizeof(cl[0]); | |||
ii++) { | |||
HX((e = clock_gettime(cl[ii], | |||
&ts)) == -1, ts); | |||
if (e != -1) | |||
cnt += (int)ts.tv_nsec; | |||
} | |||
HX((e = getrusage(RUSAGE_SELF, | |||
&ru)) == -1, ru); | |||
if (e != -1) { | |||
cnt += (int)ru.ru_utime.tv_sec; | |||
cnt += (int)ru.ru_utime.tv_usec; | |||
} | |||
} | |||
for (m = 0; m < sizeof mm/sizeof(mm[0]); m++) { | |||
if (mm[m].p != MAP_FAILED) | |||
munmap(mm[m].p, mm[m].npg * pgs); | |||
mm[m].p = MAP_FAILED; | |||
} | |||
HX(stat(".", &st) == -1, st); | |||
HX(statvfs(".", &stvfs) == -1, stvfs); | |||
HX(statfs(".", &stfs) == -1, stfs); | |||
HX(stat("/", &st) == -1, st); | |||
HX(statvfs("/", &stvfs) == -1, stvfs); | |||
HX(statfs("/", &stfs) == -1, stfs); | |||
HX((e = fstat(0, &st)) == -1, st); | |||
if (e == -1) { | |||
if (S_ISREG(st.st_mode) || | |||
S_ISFIFO(st.st_mode) || | |||
S_ISSOCK(st.st_mode)) { | |||
HX(fstatvfs(0, &stvfs) == -1, | |||
stvfs); | |||
HX(fstatfs(0, &stfs) == -1, | |||
stfs); | |||
HX((off = lseek(0, (off_t)0, | |||
SEEK_CUR)) < 0, off); | |||
} | |||
if (S_ISCHR(st.st_mode)) { | |||
HX(tcgetattr(0, &tios) == -1, | |||
tios); | |||
} else if (S_ISSOCK(st.st_mode)) { | |||
memset(&ss, 0, sizeof ss); | |||
ssl = sizeof(ss); | |||
HX(getpeername(0, | |||
(void *)&ss, &ssl) == -1, | |||
ss); | |||
} | |||
} | |||
HX((e = getrusage(RUSAGE_CHILDREN, | |||
&ru)) == -1, ru); | |||
if (e != -1) { | |||
cnt += (int)ru.ru_utime.tv_sec; | |||
cnt += (int)ru.ru_utime.tv_usec; | |||
} | |||
} else { | |||
/* Subsequent hashes absorb previous result */ | |||
HD(results); | |||
} | |||
HX((e = gettimeofday(&tv, NULL)) == -1, tv); | |||
if (e != -1) { | |||
cnt += (int)tv.tv_sec; | |||
cnt += (int)tv.tv_usec; | |||
} | |||
HD(cnt); | |||
} | |||
#ifdef HAVE_GETAUXVAL | |||
#ifdef AT_RANDOM | |||
/* Not as random as you think but we take what we are given */ | |||
p = (char *) getauxval(AT_RANDOM); | |||
if (p) | |||
HR(p, 16); | |||
#endif | |||
#ifdef AT_SYSINFO_EHDR | |||
p = (char *) getauxval(AT_SYSINFO_EHDR); | |||
if (p) | |||
HR(p, pgs); | |||
#endif | |||
#ifdef AT_BASE | |||
p = (char *) getauxval(AT_BASE); | |||
if (p) | |||
HD(p); | |||
#endif | |||
#endif | |||
SHA512_Final(results, &ctx); | |||
memcpy((char *)buf + i, results, min(sizeof(results), len - i)); | |||
i += min(sizeof(results), len - i); | |||
} | |||
explicit_bzero(&ctx, sizeof ctx); | |||
explicit_bzero(results, sizeof results); | |||
if (gotdata(buf, len) == 0) { | |||
errno = save_errno; | |||
return 0; /* satisfied */ | |||
} | |||
errno = EIO; | |||
return -1; | |||
} |
@ -1,429 +0,0 @@ | |||
/* $OpenBSD: getentropy_osx.c,v 1.8 2014/07/21 20:19:47 guenther Exp $ */ | |||
/* | |||
* Copyright (c) 2014 Theo de Raadt <deraadt@openbsd.org> | |||
* Copyright (c) 2014 Bob Beck <beck@obtuse.com> | |||
* | |||
* Permission to use, copy, modify, and distribute this software for any | |||
* purpose with or without fee is hereby granted, provided that the above | |||
* copyright notice and this permission notice appear in all copies. | |||
* | |||
* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES | |||
* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF | |||
* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR | |||
* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES | |||
* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN | |||
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF | |||
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. | |||
* | |||
* Emulation of getentropy(2) as documented at: | |||
* http://www.openbsd.org/cgi-bin/man.cgi/OpenBSD-current/man2/getentropy.2 | |||
*/ | |||
#include <sys/types.h> | |||
#include <sys/param.h> | |||
#include <sys/ioctl.h> | |||
#include <sys/resource.h> | |||
#include <sys/syscall.h> | |||
#include <sys/sysctl.h> | |||
#include <sys/statvfs.h> | |||
#include <sys/socket.h> | |||
#include <sys/mount.h> | |||
#include <sys/mman.h> | |||
#include <sys/stat.h> | |||
#include <sys/time.h> | |||
#include <stdlib.h> | |||
#include <stdint.h> | |||
#include <stdio.h> | |||
#include <termios.h> | |||
#include <fcntl.h> | |||
#include <signal.h> | |||
#include <string.h> | |||
#include <errno.h> | |||
#include <unistd.h> | |||
#include <time.h> | |||
#include <mach/mach_time.h> | |||
#include <mach/mach_host.h> | |||
#include <mach/host_info.h> | |||
#include <sys/socketvar.h> | |||
#include <sys/vmmeter.h> | |||
#include <netinet/in.h> | |||
#include <netinet/tcp.h> | |||
#include <netinet/udp.h> | |||
#include <netinet/ip_var.h> | |||
#include <netinet/tcp_var.h> | |||
#include <netinet/udp_var.h> | |||
#include <CommonCrypto/CommonDigest.h> | |||
#define SHA512_Update(a, b, c) (CC_SHA512_Update((a), (b), (c))) | |||
#define SHA512_Init(xxx) (CC_SHA512_Init((xxx))) | |||
#define SHA512_Final(xxx, yyy) (CC_SHA512_Final((xxx), (yyy))) | |||
#define SHA512_CTX CC_SHA512_CTX | |||
#define SHA512_DIGEST_LENGTH CC_SHA512_DIGEST_LENGTH | |||
#define REPEAT 5 | |||
#define min(a, b) (((a) < (b)) ? (a) : (b)) | |||
#define HX(a, b) \ | |||
do { \ | |||
if ((a)) \ | |||
HD(errno); \ | |||
else \ | |||
HD(b); \ | |||
} while (0) | |||
#define HR(x, l) (SHA512_Update(&ctx, (char *)(x), (l))) | |||
#define HD(x) (SHA512_Update(&ctx, (char *)&(x), sizeof (x))) | |||
#define HF(x) (SHA512_Update(&ctx, (char *)&(x), sizeof (void*))) | |||
int getentropy(void *buf, size_t len); | |||
static int gotdata(char *buf, size_t len); | |||
static int getentropy_urandom(void *buf, size_t len); | |||
static int getentropy_fallback(void *buf, size_t len); | |||
int | |||
getentropy(void *buf, size_t len) | |||
{ | |||
int ret = -1; | |||
if (len > 256) { | |||
errno = EIO; | |||
return -1; | |||
} | |||
/* | |||
* Try to get entropy with /dev/urandom | |||
* | |||
* This can fail if the process is inside a chroot or if file | |||
* descriptors are exhausted. | |||
*/ | |||
ret = getentropy_urandom(buf, len); | |||
if (ret != -1) | |||
return (ret); | |||
/* | |||
* Entropy collection via /dev/urandom and sysctl have failed. | |||
* | |||
* No other API exists for collecting entropy, and we have | |||
* no failsafe way to get it on OSX that is not sensitive | |||
* to resource exhaustion. | |||
* | |||
* We have very few options: | |||
* - Even syslog_r is unsafe to call at this low level, so | |||
* there is no way to alert the user or program. | |||
* - Cannot call abort() because some systems have unsafe | |||
* corefiles. | |||
* - Could raise(SIGKILL) resulting in silent program termination. | |||
* - Return EIO, to hint that arc4random's stir function | |||
* should raise(SIGKILL) | |||
* - Do the best under the circumstances.... | |||
* | |||
* This code path exists to bring light to the issue that OSX | |||
* does not provide a failsafe API for entropy collection. | |||
* | |||
* We hope this demonstrates that OSX should consider | |||
* providing a new failsafe API which works in a chroot or | |||
* when file descriptors are exhausted. | |||
*/ | |||
#undef FAIL_INSTEAD_OF_TRYING_FALLBACK | |||
#ifdef FAIL_INSTEAD_OF_TRYING_FALLBACK | |||
raise(SIGKILL); | |||
#endif | |||
ret = getentropy_fallback(buf, len); | |||
if (ret != -1) | |||
return (ret); | |||
errno = EIO; | |||
return (ret); | |||
} | |||
/* | |||
* Basic sanity checking; wish we could do better. | |||
*/ | |||
static int | |||
gotdata(char *buf, size_t len) | |||
{ | |||
char any_set = 0; | |||
size_t i; | |||
for (i = 0; i < len; ++i) | |||
any_set |= buf[i]; | |||
if (any_set == 0) | |||
return -1; | |||
return 0; | |||
} | |||
static int | |||
getentropy_urandom(void *buf, size_t len) | |||
{ | |||
struct stat st; | |||
size_t i; | |||
int fd, flags; | |||
int save_errno = errno; | |||
start: | |||
flags = O_RDONLY; | |||
#ifdef O_NOFOLLOW | |||
flags |= O_NOFOLLOW; | |||
#endif | |||
#ifdef O_CLOEXEC | |||
flags |= O_CLOEXEC; | |||
#endif | |||
fd = open("/dev/urandom", flags, 0); | |||
if (fd == -1) { | |||
if (errno == EINTR) | |||
goto start; | |||
goto nodevrandom; | |||
} | |||
#ifndef O_CLOEXEC | |||
fcntl(fd, F_SETFD, fcntl(fd, F_GETFD) | FD_CLOEXEC); | |||
#endif | |||
/* Lightly verify that the device node looks sane */ | |||
if (fstat(fd, &st) == -1 || !S_ISCHR(st.st_mode)) { | |||
close(fd); | |||
goto nodevrandom; | |||
} | |||
for (i = 0; i < len; ) { | |||
size_t wanted = len - i; | |||
ssize_t ret = read(fd, (char *)buf + i, wanted); | |||
if (ret == -1) { | |||
if (errno == EAGAIN || errno == EINTR) | |||
continue; | |||
close(fd); | |||
goto nodevrandom; | |||
} | |||
i += ret; | |||
} | |||
close(fd); | |||
if (gotdata(buf, len) == 0) { | |||
errno = save_errno; | |||
return 0; /* satisfied */ | |||
} | |||
nodevrandom: | |||
errno = EIO; | |||
return -1; | |||
} | |||
static int tcpmib[] = { CTL_NET, AF_INET, IPPROTO_TCP, TCPCTL_STATS }; | |||
static int udpmib[] = { CTL_NET, AF_INET, IPPROTO_UDP, UDPCTL_STATS }; | |||
static int ipmib[] = { CTL_NET, AF_INET, IPPROTO_IP, IPCTL_STATS }; | |||
static int kmib[] = { CTL_KERN, KERN_USRSTACK }; | |||
static int hwmib[] = { CTL_HW, HW_USERMEM }; | |||
static int | |||
getentropy_fallback(void *buf, size_t len) | |||
{ | |||
uint8_t results[SHA512_DIGEST_LENGTH]; | |||
int save_errno = errno, e, pgs = getpagesize(), faster = 0, repeat; | |||
static int cnt; | |||
struct timespec ts; | |||
struct timeval tv; | |||
struct rusage ru; | |||
sigset_t sigset; | |||
struct stat st; | |||
SHA512_CTX ctx; | |||
static pid_t lastpid; | |||
pid_t pid; | |||
size_t i, ii, m; | |||
char *p; | |||
struct tcpstat tcpstat; | |||
struct udpstat udpstat; | |||
struct ipstat ipstat; | |||
u_int64_t mach_time; | |||
unsigned int idata; | |||
void *addr; | |||
pid = getpid(); | |||
if (lastpid == pid) { | |||
faster = 1; | |||
repeat = 2; | |||
} else { | |||
faster = 0; | |||
lastpid = pid; | |||
repeat = REPEAT; | |||
} | |||
for (i = 0; i < len; ) { | |||
int j; | |||
SHA512_Init(&ctx); | |||
for (j = 0; j < repeat; j++) { | |||
HX((e = gettimeofday(&tv, NULL)) == -1, tv); | |||
if (e != -1) { | |||
cnt += (int)tv.tv_sec; | |||
cnt += (int)tv.tv_usec; | |||
} | |||
mach_time = mach_absolute_time(); | |||
HD(mach_time); | |||
ii = sizeof(addr); | |||
HX(sysctl(kmib, sizeof(kmib) / sizeof(kmib[0]), | |||
&addr, &ii, NULL, 0) == -1, addr); | |||
ii = sizeof(idata); | |||
HX(sysctl(hwmib, sizeof(hwmib) / sizeof(hwmib[0]), | |||
&idata, &ii, NULL, 0) == -1, idata); | |||
ii = sizeof(tcpstat); | |||
HX(sysctl(tcpmib, sizeof(tcpmib) / sizeof(tcpmib[0]), | |||
&tcpstat, &ii, NULL, 0) == -1, tcpstat); | |||
ii = sizeof(udpstat); | |||
HX(sysctl(udpmib, sizeof(udpmib) / sizeof(udpmib[0]), | |||
&udpstat, &ii, NULL, 0) == -1, udpstat); | |||
ii = sizeof(ipstat); | |||
HX(sysctl(ipmib, sizeof(ipmib) / sizeof(ipmib[0]), | |||
&ipstat, &ii, NULL, 0) == -1, ipstat); | |||
HX((pid = getpid()) == -1, pid); | |||
HX((pid = getsid(pid)) == -1, pid); | |||
HX((pid = getppid()) == -1, pid); | |||
HX((pid = getpgid(0)) == -1, pid); | |||
HX((e = getpriority(0, 0)) == -1, e); | |||
if (!faster) { | |||
ts.tv_sec = 0; | |||
ts.tv_nsec = 1; | |||
(void) nanosleep(&ts, NULL); | |||
} | |||
HX(sigpending(&sigset) == -1, sigset); | |||
HX(sigprocmask(SIG_BLOCK, NULL, &sigset) == -1, | |||
sigset); | |||
HF(getentropy); /* an addr in this library */ | |||
HF(printf); /* an addr in libc */ | |||
p = (char *)&p; | |||
HD(p); /* an addr on stack */ | |||
p = (char *)&errno; | |||
HD(p); /* the addr of errno */ | |||
if (i == 0) { | |||
struct sockaddr_storage ss; | |||
struct statvfs stvfs; | |||
struct termios tios; | |||
struct statfs stfs; | |||
socklen_t ssl; | |||
off_t off; | |||
/* | |||
* Prime-sized mappings encourage fragmentation; | |||
* thus exposing some address entropy. | |||
*/ | |||
struct mm { | |||
size_t npg; | |||
void *p; | |||
} mm[] = { | |||
{ 17, MAP_FAILED }, { 3, MAP_FAILED }, | |||
{ 11, MAP_FAILED }, { 2, MAP_FAILED }, | |||
{ 5, MAP_FAILED }, { 3, MAP_FAILED }, | |||
{ 7, MAP_FAILED }, { 1, MAP_FAILED }, | |||
{ 57, MAP_FAILED }, { 3, MAP_FAILED }, | |||
{ 131, MAP_FAILED }, { 1, MAP_FAILED }, | |||
}; | |||
for (m = 0; m < sizeof mm/sizeof(mm[0]); m++) { | |||
HX(mm[m].p = mmap(NULL, | |||
mm[m].npg * pgs, | |||
PROT_READ|PROT_WRITE, | |||
MAP_PRIVATE|MAP_ANON, -1, | |||
(off_t)0), mm[m].p); | |||
if (mm[m].p != MAP_FAILED) { | |||
size_t mo; | |||
/* Touch some memory... */ | |||
p = mm[m].p; | |||
mo = cnt % | |||
(mm[m].npg * pgs - 1); | |||
p[mo] = 1; | |||
cnt += (int)((long)(mm[m].p) | |||
/ pgs); | |||
} | |||
/* Check cnts and times... */ | |||
mach_time = mach_absolute_time(); | |||
HD(mach_time); | |||
cnt += (int)mach_time; | |||
HX((e = getrusage(RUSAGE_SELF, | |||
&ru)) == -1, ru); | |||
if (e != -1) { | |||
cnt += (int)ru.ru_utime.tv_sec; | |||
cnt += (int)ru.ru_utime.tv_usec; | |||
} | |||
} | |||
for (m = 0; m < sizeof mm/sizeof(mm[0]); m++) { | |||
if (mm[m].p != MAP_FAILED) | |||
munmap(mm[m].p, mm[m].npg * pgs); | |||
mm[m].p = MAP_FAILED; | |||
} | |||
HX(stat(".", &st) == -1, st); | |||
HX(statvfs(".", &stvfs) == -1, stvfs); | |||
HX(statfs(".", &stfs) == -1, stfs); | |||
HX(stat("/", &st) == -1, st); | |||
HX(statvfs("/", &stvfs) == -1, stvfs); | |||
HX(statfs("/", &stfs) == -1, stfs); | |||
HX((e = fstat(0, &st)) == -1, st); | |||
if (e == -1) { | |||
if (S_ISREG(st.st_mode) || | |||
S_ISFIFO(st.st_mode) || | |||
S_ISSOCK(st.st_mode)) { | |||
HX(fstatvfs(0, &stvfs) == -1, | |||
stvfs); | |||
HX(fstatfs(0, &stfs) == -1, | |||
stfs); | |||
HX((off = lseek(0, (off_t)0, | |||
SEEK_CUR)) < 0, off); | |||
} | |||
if (S_ISCHR(st.st_mode)) { | |||
HX(tcgetattr(0, &tios) == -1, | |||
tios); | |||
} else if (S_ISSOCK(st.st_mode)) { | |||
memset(&ss, 0, sizeof ss); | |||
ssl = sizeof(ss); | |||
HX(getpeername(0, | |||
(void *)&ss, &ssl) == -1, | |||
ss); | |||
} | |||
} | |||
HX((e = getrusage(RUSAGE_CHILDREN, | |||
&ru)) == -1, ru); | |||
if (e != -1) { | |||
cnt += (int)ru.ru_utime.tv_sec; | |||
cnt += (int)ru.ru_utime.tv_usec; | |||
} | |||
} else { | |||
/* Subsequent hashes absorb previous result */ | |||
HD(results); | |||
} | |||
HX((e = gettimeofday(&tv, NULL)) == -1, tv); | |||
if (e != -1) { | |||
cnt += (int)tv.tv_sec; | |||
cnt += (int)tv.tv_usec; | |||
} | |||
HD(cnt); | |||
} | |||
SHA512_Final(results, &ctx); | |||
memcpy((char *)buf + i, results, min(sizeof(results), len - i)); | |||
i += min(sizeof(results), len - i); | |||
} | |||
explicit_bzero(&ctx, sizeof ctx); | |||
explicit_bzero(results, sizeof results); | |||
if (gotdata(buf, len) == 0) { | |||
errno = save_errno; | |||
return 0; /* satisfied */ | |||
} | |||
errno = EIO; | |||
return -1; | |||
} |
@ -1,445 +0,0 @@ | |||
/* $OpenBSD: getentropy_solaris.c,v 1.9 2014/07/21 20:19:47 guenther Exp $ */ | |||
/* | |||
* Copyright (c) 2014 Theo de Raadt <deraadt@openbsd.org> | |||
* Copyright (c) 2014 Bob Beck <beck@obtuse.com> | |||
* | |||
* Permission to use, copy, modify, and distribute this software for any | |||
* purpose with or without fee is hereby granted, provided that the above | |||
* copyright notice and this permission notice appear in all copies. | |||
* | |||
* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES | |||
* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF | |||
* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR | |||
* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES | |||
* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN | |||
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF | |||
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. | |||
* | |||
* Emulation of getentropy(2) as documented at: | |||
* http://www.openbsd.org/cgi-bin/man.cgi/OpenBSD-current/man2/getentropy.2 | |||
*/ | |||
#include <sys/types.h> | |||
#include <sys/param.h> | |||
#include <sys/ioctl.h> | |||
#include <sys/resource.h> | |||
#include <sys/syscall.h> | |||
#include <sys/statvfs.h> | |||
#include <sys/socket.h> | |||
#include <sys/mount.h> | |||
#include <sys/mman.h> | |||
#include <sys/stat.h> | |||
#include <sys/time.h> | |||
#include <stdlib.h> | |||
#include <stdint.h> | |||
#include <stdio.h> | |||
#include <link.h> | |||
#include <termios.h> | |||
#include <fcntl.h> | |||
#include <signal.h> | |||
#include <string.h> | |||
#include <errno.h> | |||
#include <unistd.h> | |||
#include <time.h> | |||
#include <sys/sha2.h> | |||
#define SHA512_Init SHA512Init | |||
#define SHA512_Update SHA512Update | |||
#define SHA512_Final SHA512Final | |||
#include <sys/vfs.h> | |||
#include <sys/statfs.h> | |||
#include <sys/loadavg.h> | |||
#define REPEAT 5 | |||
#define min(a, b) (((a) < (b)) ? (a) : (b)) | |||
#define HX(a, b) \ | |||
do { \ | |||
if ((a)) \ | |||
HD(errno); \ | |||
else \ | |||
HD(b); \ | |||
} while (0) | |||
#define HR(x, l) (SHA512_Update(&ctx, (char *)(x), (l))) | |||
#define HD(x) (SHA512_Update(&ctx, (char *)&(x), sizeof (x))) | |||
#define HF(x) (SHA512_Update(&ctx, (char *)&(x), sizeof (void*))) | |||
int getentropy(void *buf, size_t len); | |||
static int gotdata(char *buf, size_t len); | |||
static int getentropy_urandom(void *buf, size_t len, const char *path, | |||
int devfscheck); | |||
static int getentropy_fallback(void *buf, size_t len); | |||
static int getentropy_phdr(struct dl_phdr_info *info, size_t size, void *data); | |||
int | |||
getentropy(void *buf, size_t len) | |||
{ | |||
int ret = -1; | |||
if (len > 256) { | |||
errno = EIO; | |||
return -1; | |||
} | |||
/* | |||
* Try to get entropy with /dev/urandom | |||
* | |||
* Solaris provides /dev/urandom as a symbolic link to | |||
* /devices/pseudo/random@0:urandom which is provided by | |||
* a devfs filesystem. Best practice is to use O_NOFOLLOW, | |||
* so we must try the unpublished name directly. | |||
* | |||
* This can fail if the process is inside a chroot which lacks | |||
* the devfs mount, or if file descriptors are exhausted. | |||
*/ | |||
ret = getentropy_urandom(buf, len, | |||
"/devices/pseudo/random@0:urandom", 1); | |||
if (ret != -1) | |||
return (ret); | |||
/* | |||
* Unfortunately, chroot spaces on Solaris are sometimes setup | |||
* with direct device node of the well-known /dev/urandom name | |||
* (perhaps to avoid dragging all of devfs into the space). | |||
* | |||
* This can fail if the process is inside a chroot or if file | |||
* descriptors are exhausted. | |||
*/ | |||
ret = getentropy_urandom(buf, len, "/dev/urandom", 0); | |||
if (ret != -1) | |||
return (ret); | |||
/* | |||
* Entropy collection via /dev/urandom has failed. | |||
* | |||
* No other API exists for collecting entropy, and we have | |||
* no failsafe way to get it on Solaris that is not sensitive | |||
* to resource exhaustion. | |||
* | |||
* We have very few options: | |||
* - Even syslog_r is unsafe to call at this low level, so | |||
* there is no way to alert the user or program. | |||
* - Cannot call abort() because some systems have unsafe | |||
* corefiles. | |||
* - Could raise(SIGKILL) resulting in silent program termination. | |||
* - Return EIO, to hint that arc4random's stir function | |||
* should raise(SIGKILL) | |||
* - Do the best under the circumstances.... | |||
* | |||
* This code path exists to bring light to the issue that Solaris | |||
* does not provide a failsafe API for entropy collection. | |||
* | |||
* We hope this demonstrates that Solaris should consider | |||
* providing a new failsafe API which works in a chroot or | |||
* when file descriptors are exhausted. | |||
*/ | |||
#undef FAIL_INSTEAD_OF_TRYING_FALLBACK | |||
#ifdef FAIL_INSTEAD_OF_TRYING_FALLBACK | |||
raise(SIGKILL); | |||
#endif | |||
ret = getentropy_fallback(buf, len); | |||
if (ret != -1) | |||
return (ret); | |||
errno = EIO; | |||
return (ret); | |||
} | |||
/* | |||
* Basic sanity checking; wish we could do better. | |||
*/ | |||
static int | |||
gotdata(char *buf, size_t len) | |||
{ | |||
char any_set = 0; | |||
size_t i; | |||
for (i = 0; i < len; ++i) | |||
any_set |= buf[i]; | |||
if (any_set == 0) | |||
return -1; | |||
return 0; | |||
} | |||
static int | |||
getentropy_urandom(void *buf, size_t len, const char *path, int devfscheck) | |||
{ | |||
struct stat st; | |||
size_t i; | |||
int fd, flags; | |||
int save_errno = errno; | |||
start: | |||
flags = O_RDONLY; | |||
#ifdef O_NOFOLLOW | |||
flags |= O_NOFOLLOW; | |||
#endif | |||
#ifdef O_CLOEXEC | |||
flags |= O_CLOEXEC; | |||
#endif | |||
fd = open(path, flags, 0); | |||
if (fd == -1) { | |||
if (errno == EINTR) | |||
goto start; | |||
goto nodevrandom; | |||
} | |||
#ifndef O_CLOEXEC | |||
fcntl(fd, F_SETFD, fcntl(fd, F_GETFD) | FD_CLOEXEC); | |||
#endif | |||
/* Lightly verify that the device node looks sane */ | |||
if (fstat(fd, &st) == -1 || !S_ISCHR(st.st_mode) || | |||
(devfscheck && (strcmp(st.st_fstype, "devfs") != 0))) { | |||
close(fd); | |||
goto nodevrandom; | |||
} | |||
for (i = 0; i < len; ) { | |||
size_t wanted = len - i; | |||
ssize_t ret = read(fd, (char *)buf + i, wanted); | |||
if (ret == -1) { | |||
if (errno == EAGAIN || errno == EINTR) | |||
continue; | |||
close(fd); | |||
goto nodevrandom; | |||
} | |||
i += ret; | |||
} | |||
close(fd); | |||
if (gotdata(buf, len) == 0) { | |||
errno = save_errno; | |||
return 0; /* satisfied */ | |||
} | |||
nodevrandom: | |||
errno = EIO; | |||
return -1; | |||
} | |||
static const int cl[] = { | |||
CLOCK_REALTIME, | |||
#ifdef CLOCK_MONOTONIC | |||
CLOCK_MONOTONIC, | |||
#endif | |||
#ifdef CLOCK_MONOTONIC_RAW | |||
CLOCK_MONOTONIC_RAW, | |||
#endif | |||
#ifdef CLOCK_TAI | |||
CLOCK_TAI, | |||
#endif | |||
#ifdef CLOCK_VIRTUAL | |||
CLOCK_VIRTUAL, | |||
#endif | |||
#ifdef CLOCK_UPTIME | |||
CLOCK_UPTIME, | |||
#endif | |||
#ifdef CLOCK_PROCESS_CPUTIME_ID | |||
CLOCK_PROCESS_CPUTIME_ID, | |||
#endif | |||
#ifdef CLOCK_THREAD_CPUTIME_ID | |||
CLOCK_THREAD_CPUTIME_ID, | |||
#endif | |||
}; | |||
static int | |||
getentropy_phdr(struct dl_phdr_info *info, size_t size, void *data) | |||
{ | |||
SHA512_CTX *ctx = data; | |||
SHA512_Update(ctx, &info->dlpi_addr, sizeof (info->dlpi_addr)); | |||
return 0; | |||
} | |||
static int | |||
getentropy_fallback(void *buf, size_t len) | |||
{ | |||
uint8_t results[SHA512_DIGEST_LENGTH]; | |||
int save_errno = errno, e, pgs = getpagesize(), faster = 0, repeat; | |||
static int cnt; | |||
struct timespec ts; | |||
struct timeval tv; | |||
double loadavg[3]; | |||
struct rusage ru; | |||
sigset_t sigset; | |||
struct stat st; | |||
SHA512_CTX ctx; | |||
static pid_t lastpid; | |||
pid_t pid; | |||
size_t i, ii, m; | |||
char *p; | |||
pid = getpid(); | |||
if (lastpid == pid) { | |||
faster = 1; | |||
repeat = 2; | |||
} else { | |||
faster = 0; | |||
lastpid = pid; | |||
repeat = REPEAT; | |||
} | |||
for (i = 0; i < len; ) { | |||
int j; | |||
SHA512_Init(&ctx); | |||
for (j = 0; j < repeat; j++) { | |||
HX((e = gettimeofday(&tv, NULL)) == -1, tv); | |||
if (e != -1) { | |||
cnt += (int)tv.tv_sec; | |||
cnt += (int)tv.tv_usec; | |||
} | |||
dl_iterate_phdr(getentropy_phdr, &ctx); | |||
for (ii = 0; ii < sizeof(cl)/sizeof(cl[0]); ii++) | |||
HX(clock_gettime(cl[ii], &ts) == -1, ts); | |||
HX((pid = getpid()) == -1, pid); | |||
HX((pid = getsid(pid)) == -1, pid); | |||
HX((pid = getppid()) == -1, pid); | |||
HX((pid = getpgid(0)) == -1, pid); | |||
HX((e = getpriority(0, 0)) == -1, e); | |||
HX((getloadavg(loadavg, 3) == -1), loadavg); | |||
if (!faster) { | |||
ts.tv_sec = 0; | |||
ts.tv_nsec = 1; | |||
(void) nanosleep(&ts, NULL); | |||
} | |||
HX(sigpending(&sigset) == -1, sigset); | |||
HX(sigprocmask(SIG_BLOCK, NULL, &sigset) == -1, | |||
sigset); | |||
HF(getentropy); /* an addr in this library */ | |||
HF(printf); /* an addr in libc */ | |||
p = (char *)&p; | |||
HD(p); /* an addr on stack */ | |||
p = (char *)&errno; | |||
HD(p); /* the addr of errno */ | |||
if (i == 0) { | |||
struct sockaddr_storage ss; | |||
struct statvfs stvfs; | |||
struct termios tios; | |||
socklen_t ssl; | |||
off_t off; | |||
/* | |||
* Prime-sized mappings encourage fragmentation; | |||
* thus exposing some address entropy. | |||
*/ | |||
struct mm { | |||
size_t npg; | |||
void *p; | |||
} mm[] = { | |||
{ 17, MAP_FAILED }, { 3, MAP_FAILED }, | |||
{ 11, MAP_FAILED }, { 2, MAP_FAILED }, | |||
{ 5, MAP_FAILED }, { 3, MAP_FAILED }, | |||
{ 7, MAP_FAILED }, { 1, MAP_FAILED }, | |||
{ 57, MAP_FAILED }, { 3, MAP_FAILED }, | |||
{ 131, MAP_FAILED }, { 1, MAP_FAILED }, | |||
}; | |||
for (m = 0; m < sizeof mm/sizeof(mm[0]); m++) { | |||
HX(mm[m].p = mmap(NULL, | |||
mm[m].npg * pgs, | |||
PROT_READ|PROT_WRITE, | |||
MAP_PRIVATE|MAP_ANON, -1, | |||
(off_t)0), mm[m].p); | |||
if (mm[m].p != MAP_FAILED) { | |||
size_t mo; | |||
/* Touch some memory... */ | |||
p = mm[m].p; | |||
mo = cnt % | |||
(mm[m].npg * pgs - 1); | |||
p[mo] = 1; | |||
cnt += (int)((long)(mm[m].p) | |||
/ pgs); | |||
} | |||
/* Check cnts and times... */ | |||
for (ii = 0; ii < sizeof(cl)/sizeof(cl[0]); | |||
ii++) { | |||
HX((e = clock_gettime(cl[ii], | |||
&ts)) == -1, ts); | |||
if (e != -1) | |||
cnt += (int)ts.tv_nsec; | |||
} | |||
HX((e = getrusage(RUSAGE_SELF, | |||
&ru)) == -1, ru); | |||
if (e != -1) { | |||
cnt += (int)ru.ru_utime.tv_sec; | |||
cnt += (int)ru.ru_utime.tv_usec; | |||
} | |||
} | |||
for (m = 0; m < sizeof mm/sizeof(mm[0]); m++) { | |||
if (mm[m].p != MAP_FAILED) | |||
munmap(mm[m].p, mm[m].npg * pgs); | |||
mm[m].p = MAP_FAILED; | |||
} | |||
HX(stat(".", &st) == -1, st); | |||
HX(statvfs(".", &stvfs) == -1, stvfs); | |||
HX(stat("/", &st) == -1, st); | |||
HX(statvfs("/", &stvfs) == -1, stvfs); | |||
HX((e = fstat(0, &st)) == -1, st); | |||
if (e == -1) { | |||
if (S_ISREG(st.st_mode) || | |||
S_ISFIFO(st.st_mode) || | |||
S_ISSOCK(st.st_mode)) { | |||
HX(fstatvfs(0, &stvfs) == -1, | |||
stvfs); | |||
HX((off = lseek(0, (off_t)0, | |||
SEEK_CUR)) < 0, off); | |||
} | |||
if (S_ISCHR(st.st_mode)) { | |||
HX(tcgetattr(0, &tios) == -1, | |||
tios); | |||
} else if (S_ISSOCK(st.st_mode)) { | |||
memset(&ss, 0, sizeof ss); | |||
ssl = sizeof(ss); | |||
HX(getpeername(0, | |||
(void *)&ss, &ssl) == -1, | |||
ss); | |||
} | |||
} | |||
HX((e = getrusage(RUSAGE_CHILDREN, | |||
&ru)) == -1, ru); | |||
if (e != -1) { | |||
cnt += (int)ru.ru_utime.tv_sec; | |||
cnt += (int)ru.ru_utime.tv_usec; | |||
} | |||
} else { | |||
/* Subsequent hashes absorb previous result */ | |||
HD(results); | |||
} | |||
HX((e = gettimeofday(&tv, NULL)) == -1, tv); | |||
if (e != -1) { | |||
cnt += (int)tv.tv_sec; | |||
cnt += (int)tv.tv_usec; | |||
} | |||
HD(cnt); | |||
} | |||
SHA512_Final(results, &ctx); | |||
memcpy((char *)buf + i, results, min(sizeof(results), len - i)); | |||
i += min(sizeof(results), len - i); | |||
} | |||
explicit_bzero(&ctx, sizeof ctx); | |||
explicit_bzero(results, sizeof results); | |||
if (gotdata(buf, len) == 0) { | |||
errno = save_errno; | |||
return 0; /* satisfied */ | |||
} | |||
errno = EIO; | |||
return -1; | |||
} |
@ -1,59 +0,0 @@ | |||
/* $OpenBSD: getentropy_win.c,v 1.2 2014/07/13 13:03:09 deraadt Exp $ */ | |||
/* | |||
* Copyright (c) 2014, Theo de Raadt <deraadt@openbsd.org> | |||
* Copyright (c) 2014, Bob Beck <beck@obtuse.com> | |||
* | |||
* Permission to use, copy, modify, and distribute this software for any | |||
* purpose with or without fee is hereby granted, provided that the above | |||
* copyright notice and this permission notice appear in all copies. | |||
* | |||
* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES | |||
* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF | |||
* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR | |||
* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES | |||
* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN | |||
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF | |||
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. | |||
* | |||
* Emulation of getentropy(2) as documented at: | |||
* http://www.openbsd.org/cgi-bin/man.cgi/OpenBSD-current/man2/getentropy.2 | |||
*/ | |||
#include <windows.h> | |||
#include <errno.h> | |||
#include <stdint.h> | |||
#include <sys/types.h> | |||
#include <wincrypt.h> | |||
#include <process.h> | |||
int getentropy(void *buf, size_t len); | |||
/* | |||
* On Windows, CryptGenRandom is supposed to be a well-seeded | |||
* cryptographically strong random number generator. | |||
*/ | |||
int | |||
getentropy(void *buf, size_t len) | |||
{ | |||
HCRYPTPROV provider; | |||
if (len > 256) { | |||
errno = EIO; | |||
return -1; | |||
} | |||
if (CryptAcquireContext(&provider, NULL, NULL, PROV_RSA_FULL, | |||
CRYPT_VERIFYCONTEXT) != 0) | |||
goto fail; | |||
if (CryptGenRandom(provider, len, buf) != 0) { | |||
CryptReleaseContext(provider, 0); | |||
goto fail; | |||
} | |||
CryptReleaseContext(provider, 0); | |||
return (0); | |||
fail: | |||
errno = EIO; | |||
return (-1); | |||
} |