sys/dev/random/random_adaptors.c

   1 /*-
   2  * Copyright (c) 2013 Arthur Mesh <arthurmesh@gmail.com>
   3  * Copyright (c) 2013 David E. O'Brien <obrien@NUXI.org>
   4  * Copyright (c) 2013 Mark R V Murray
   5  * All rights reserved.
   6  *
   7  * Redistribution and use in source and binary forms, with or without
   8  * modification, are permitted provided that the following conditions
   9  * are met:
  10  * 1. Redistributions of source code must retain the above copyright
  11  *    notice, this list of conditions and the following disclaimer
  12  *    in this position and unchanged.
  13  * 2. Redistributions in binary form must reproduce the above copyright
  14  *    notice, this list of conditions and the following disclaimer in the
  15  *    documentation and/or other materials provided with the distribution.
  16  *
  17  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
  18  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  19  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  20  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
  21  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  22  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  23  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  24  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  25  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  26  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  27  */
  28
  29 #include <sys/param.h>
  30 __FBSDID("$FreeBSD$");
  31
  32 #include <sys/systm.h>
  33 #include <sys/kernel.h>
  34 #include <sys/kthread.h>
  35 #include <sys/libkern.h>
  36 #include <sys/lock.h>
  37 #include <sys/malloc.h>
  38 #include <sys/queue.h>
  39 #include <sys/random.h>
  40 #include <sys/selinfo.h>
  41 #include <sys/sx.h>
  42 #include <sys/sysctl.h>
  43 #include <sys/unistd.h>
  44
  45 #include <dev/random/randomdev.h>
  46 #include <dev/random/randomdev_soft.h>
  47 #include <dev/random/random_adaptors.h>
  48
  49 LIST_HEAD(adaptors_head, random_adaptors);
  50 static struct adaptors_head adaptors = LIST_HEAD_INITIALIZER(adaptors);
  51 static struct sx adaptors_lock; /* need a sleepable lock */
  52
  53 /* List for the dynamic sysctls */
  54 static struct sysctl_ctx_list random_clist;
  55
  56 struct random_adaptor *random_adaptor;
  57
  58 MALLOC_DEFINE(M_ENTROPY, "entropy", "Entropy harvesting buffers and data structures");
  59
  60 int
  61 random_adaptor_register(const char *name, struct random_adaptor *rsp)
  62 {
  63         struct random_adaptors *rpp;
  64
  65         KASSERT(name != NULL && rsp != NULL, ("invalid input to %s", __func__));
  66
  67         rpp = malloc(sizeof(struct random_adaptors), M_ENTROPY, M_WAITOK);
  68         rpp->name = name;
  69         rpp->rsp = rsp;
  70
  71         sx_xlock(&adaptors_lock);
  72         LIST_INSERT_HEAD(&adaptors, rpp, entries);
  73         sx_xunlock(&adaptors_lock);
  74
  75         return (0);
  76 }
  77
  78 struct random_adaptor *
  79 random_adaptor_get(const char *name)
  80 {
  81         struct random_adaptors  *rpp;
  82         struct random_adaptor   *rsp;
  83
  84         rsp = NULL;
  85
  86         sx_slock(&adaptors_lock);
  87
  88         LIST_FOREACH(rpp, &adaptors, entries)
  89                 if (strcmp(rpp->name, name) == 0)
  90                         rsp = rpp->rsp;
  91
  92         sx_sunlock(&adaptors_lock);
  93
  94         return (rsp);
  95 }
  96
  97 /*
  98  * Walk a list of registered random(4) adaptors and pick the last non-selected
  99  * one.
 100  *
 101  * If none are selected, use yarrow if available.
 102  */
 103 void
 104 random_adaptor_choose(struct random_adaptor **adaptor)
 105 {
 106         char                     rngs[128], *token, *cp;
 107         struct random_adaptors  *rpp;
 108
 109         KASSERT(adaptor != NULL, ("pre-conditions failed"));
 110
 111         *adaptor = NULL;
 112         if (TUNABLE_STR_FETCH("rngs_want", rngs, sizeof(rngs))) {
 113                 cp = rngs;
 114
 115                 while ((token = strsep(&cp, ",")) != NULL)
 116                         if ((*adaptor = random_adaptor_get(token)) != NULL)
 117                                 break;
 118                         else if (bootverbose)
 119                                 printf("%s random adaptor is not available,"
 120                                     " skipping\n", token);
 121         }
 122
 123         if (*adaptor == NULL) {
 124                 /*
 125                  * Fallback to the first thing that's on the list of
 126                  * available RNGs.
 127                  */
 128                 sx_slock(&adaptors_lock);
 129
 130                 rpp = LIST_FIRST(&adaptors);
 131                 if (rpp != NULL)
 132                         *adaptor = rpp->rsp;
 133
 134                 sx_sunlock(&adaptors_lock);
 135
 136                 if (bootverbose && *adaptor)
 137                         printf("Falling back to <%s> random adaptor\n",
 138                             (*adaptor)->ident);
 139         }
 140 }
 141
 142 static void
 143 random_adaptors_deinit(void *unused)
 144 {
 145
 146         sx_destroy(&adaptors_lock);
 147         sysctl_ctx_free(&random_clist);
 148 }
 149
 150 static int
 151 random_sysctl_adaptors_handler(SYSCTL_HANDLER_ARGS)
 152 {
 153         struct random_adaptors  *rpp;
 154         int error, count;
 155
 156         count = error = 0;
 157
 158         sx_slock(&adaptors_lock);
 159
 160         if (LIST_EMPTY(&adaptors))
 161                 error = SYSCTL_OUT(req, "", 0);
 162         else {
 163                 LIST_FOREACH(rpp, &adaptors, entries) {
 164
 165                         error = SYSCTL_OUT(req, ",", count++ ? 1 : 0);
 166                         if (error)
 167                                 break;
 168
 169                         error = SYSCTL_OUT(req, rpp->name, strlen(rpp->name));
 170                         if (error)
 171                                 break;
 172                 }
 173         }
 174
 175         sx_sunlock(&adaptors_lock);
 176
 177         return (error);
 178 }
 179
 180 static int
 181 random_sysctl_active_adaptor_handler(SYSCTL_HANDLER_ARGS)
 182 {
 183         struct random_adaptor   *rsp;
 184         struct random_adaptors  *rpp;
 185         const char              *name;
 186         int error;
 187
 188         name = NULL;
 189         rsp = random_adaptor;
 190
 191         if (rsp != NULL) {
 192                 sx_slock(&adaptors_lock);
 193
 194                 LIST_FOREACH(rpp, &adaptors, entries)
 195                         if (rpp->rsp == rsp)
 196                                 name = rpp->name;
 197
 198                 sx_sunlock(&adaptors_lock);
 199         }
 200
 201         if (rsp == NULL || name == NULL)
 202                 error = SYSCTL_OUT(req, "", 0);
 203         else
 204                 error = SYSCTL_OUT(req, name, strlen(name));
 205
 206         return (error);
 207 }
 208
 209 static void
 210 random_adaptors_init(void *unused)
 211 {
 212
 213         SYSCTL_PROC(_kern_random, OID_AUTO, adaptors,
 214             CTLTYPE_STRING | CTLFLAG_RD | CTLFLAG_MPSAFE,
 215             NULL, 0, random_sysctl_adaptors_handler, "",
 216             "Random Number Generator adaptors");
 217
 218         SYSCTL_PROC(_kern_random, OID_AUTO, active_adaptor,
 219             CTLTYPE_STRING | CTLFLAG_RD | CTLFLAG_MPSAFE,
 220             NULL, 0, random_sysctl_active_adaptor_handler, "",
 221             "Active Random Number Generator Adaptor");
 222
 223         sx_init(&adaptors_lock, "random_adaptors");
 224 }
 225
 226 SYSCTL_NODE(_kern, OID_AUTO, random, CTLFLAG_RW, 0, "Random Number Generator");
 227
 228 SYSINIT(random_adaptors, SI_SUB_DRIVERS, SI_ORDER_FIRST, random_adaptors_init,
 229     NULL);
 230 SYSUNINIT(random_adaptors, SI_SUB_DRIVERS, SI_ORDER_FIRST,
 231     random_adaptors_deinit, NULL);
 232
 233 static void
 234 random_adaptors_reseed(void *unused)
 235 {
 236
 237         (void)unused;
 238         if (random_adaptor != NULL)
 239                 (*random_adaptor->reseed)();
 240         arc4rand(NULL, 0, 1);
 241 }
 242 SYSINIT(random_reseed, SI_SUB_INTRINSIC_POST, SI_ORDER_SECOND,
 243     random_adaptors_reseed, NULL);