#include <sys/param.h>
#include <sys/systm.h>
#include <sys/proc.h>
#include <sys/errno.h>
#include <sys/ioctl.h>
#include <sys/conf.h>
#include <sys/fcntl.h>
#include <string.h>
#include <miscfs/devfs/devfs.h>
#include <kern/locks.h>
#include <kern/clock.h>
#include <sys/time.h>
#include <sys/malloc.h>
#include <sys/sysproto.h>
#include <sys/uio_internal.h>
#include <dev/random/randomdev.h>
#include <libkern/OSByteOrder.h>
#include <libkern/OSAtomic.h>
#include <mach/mach_time.h>
#define RANDOM_MAJOR -1
#define RANDOM_MINOR 0
#define URANDOM_MINOR 1
d_ioctl_t random_ioctl;
static struct cdevsw random_cdevsw =
{
random_open,
random_close,
random_read,
random_write,
random_ioctl,
(stop_fcn_t *)nulldev,
(reset_fcn_t *)nulldev,
NULL,
eno_select,
eno_mmap,
eno_strat,
eno_getc,
eno_putc,
0
};
void
random_init(void)
{
int ret;
ret = cdevsw_add(RANDOM_MAJOR, &random_cdevsw);
if (ret < 0) {
panic("random_init: failed to allocate a major number!");
}
devfs_make_node(makedev (ret, RANDOM_MINOR), DEVFS_CHAR,
UID_ROOT, GID_WHEEL, 0666, "random", 0);
devfs_make_node(makedev (ret, URANDOM_MINOR), DEVFS_CHAR,
UID_ROOT, GID_WHEEL, 0666, "urandom", 0);
}
int
random_ioctl( __unused dev_t dev, u_long cmd, __unused caddr_t data,
__unused int flag, __unused struct proc *p )
{
switch (cmd) {
case FIONBIO:
case FIOASYNC:
break;
default:
return ENODEV;
}
return (0);
}
int
random_open(__unused dev_t dev, int flags, __unused int devtype, __unused struct proc *p)
{
if (flags & FWRITE) {
if (securelevel >= 2)
return (EPERM);
#ifndef __APPLE__
if ((securelevel >= 1) && proc_suser(p))
return (EPERM);
#endif
}
return (0);
}
int
random_close(__unused dev_t dev, __unused int flags, __unused int mode, __unused struct proc *p)
{
return (0);
}
int
random_write (dev_t dev, struct uio *uio, __unused int ioflag)
{
int retCode = 0;
char rdBuffer[256];
if (minor(dev) != RANDOM_MINOR)
return EPERM;
while (uio_resid(uio) > 0 && retCode == 0) {
int bytesToInput = MIN(uio_resid(uio),
(user_ssize_t) sizeof(rdBuffer));
retCode = uiomove(rdBuffer, bytesToInput, uio);
if (retCode != 0)
break;
retCode = write_random(rdBuffer, bytesToInput);
if (retCode != 0)
break;
}
return retCode;
}
int
random_read(__unused dev_t dev, struct uio *uio, __unused int ioflag)
{
int retCode = 0;
char buffer[512];
user_ssize_t bytes_remaining = uio_resid(uio);
while (bytes_remaining > 0 && retCode == 0) {
int bytesToRead = MIN(bytes_remaining,
(user_ssize_t) sizeof(buffer));
read_random(buffer, bytesToRead);
retCode = uiomove(buffer, bytesToRead, uio);
if (retCode != 0)
break;
bytes_remaining = uio_resid(uio);
}
return retCode;
}
u_int32_t
RandomULong(void)
{
u_int32_t buf;
read_random(&buf, sizeof (buf));
return (buf);
}
int
getentropy(__unused struct proc * p, struct getentropy_args *gap, __unused int * ret) {
user_addr_t user_addr;
uint32_t user_size;
char buffer[256];
user_addr = (vm_map_offset_t)gap->buffer;
user_size = gap->size;
if (user_size > sizeof(buffer)) {
return EINVAL;
}
read_random(buffer, user_size);
return copyout(buffer, user_addr, user_size);
}