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); | |||||
} |