chiark / gitweb /
Merge event scheduling implementation. This fixes defect #6,
[disorder] / lib / random.c
1 /*
2  * This file is part of DisOrder
3  * Copyright (C) 2008 Richard Kettlewell
4  *
5  * This program is free software; you can redistribute it and/or modify
6  * it under the terms of the GNU General Public License as published by
7  * the Free Software Foundation; either version 2 of the License, or
8  * (at your option) any later version.
9  *
10  * This program is distributed in the hope that it will be useful, but
11  * WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13  * General Public License for more details.
14  *
15  * You should have received a copy of the GNU General Public License
16  * along with this program; if not, write to the Free Software
17  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
18  * USA
19  */
20
21 /** @file lib/random.c
22  * @brief Random number generator
23  *
24  */
25
26 #include <config.h>
27 #include "types.h"
28
29 #include <fcntl.h>
30 #include <unistd.h>
31 #include <errno.h>
32 #include <string.h>
33
34 #include "random.h"
35 #include "log.h"
36 #include "arcfour.h"
37 #include "basen.h"
38 #include "mem.h"
39
40 static int random_count;
41 static int random_fd = -1;
42 static arcfour_context random_ctx[1];
43
44 /** @brief Rekey the RNG
45  *
46  * Resets the RNG's key to a random one read from /dev/urandom
47  */
48 static void random__rekey(void) {
49   char key[128];
50   int n;
51
52   if(random_fd < 0) {
53     if((random_fd = open("/dev/urandom", O_RDONLY)) < 0)
54       fatal(errno, "opening /dev/urandom");
55   }
56   if((n = read(random_fd, key, sizeof key)) < 0)
57     fatal(errno, "reading from /dev/urandom");
58   if((size_t)n < sizeof key)
59     fatal(0, "reading from /dev/urandom: short read");
60   arcfour_setkey(random_ctx, key, sizeof key);
61   random_count = 8 * 1024 * 1024;
62 }
63
64 /** @brief Get random bytes
65  * @param ptr Where to put random bytes
66  * @param bytes How many random bytes to generate
67  */
68 void random_get(void *ptr, size_t bytes) {
69   if(random_count == 0)
70     random__rekey();
71   /* Encrypting 0s == just returning the keystream */
72   memset(ptr, 0, bytes);
73   arcfour_stream(random_ctx, (char *)ptr, (char *)ptr, bytes);
74   if(bytes > (size_t)random_count)
75     random_count = 0;
76   else
77     random_count -= bytes;
78 }
79
80 /** @brief Return a random ID string */
81 char *random_id(void) {
82   unsigned long words[2];
83   char id[128];
84
85   random_get(words, sizeof words);
86   basen(words, sizeof words / sizeof *words, id, sizeof id, 62);
87   return xstrdup(id);
88 }
89
90 /*
91 Local Variables:
92 c-basic-offset:2
93 comment-column:40
94 fill-column:79
95 indent-tabs-mode:nil
96 End:
97 */