2 Unix SMB/CIFS implementation.
4 Functions to create reasonable random numbers for crypto use.
6 Copyright (C) Jeremy Allison 2001
8 This program is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 2 of the License, or
11 (at your option) any later version.
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with this program; if not, write to the Free Software
20 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
24 #include "system/iconv.h"
25 #include "system/filesys.h"
26 #include "lib/crypto/crypto.h"
28 static unsigned char hash
[258];
29 static uint32_t counter
;
31 static BOOL done_reseed
= False
;
32 static void (*reseed_callback
)(int *newseed
);
34 /****************************************************************
35 Copy any user given reseed data.
36 *****************************************************************/
38 void set_rand_reseed_callback(void (*fn
)(int *))
41 set_need_random_reseed();
44 void set_need_random_reseed(void)
49 static void get_rand_reseed_data(int *reseed_data
)
51 if (reseed_callback
) {
52 reseed_callback(reseed_data
);
58 /****************************************************************
60 *****************************************************************/
62 static void seed_random_stream(unsigned char *seedval
, size_t seedlen
)
67 for (ind
= 0; ind
< 256; ind
++)
68 hash
[ind
] = (unsigned char)ind
;
70 for( ind
= 0; ind
< 256; ind
++) {
73 j
+= (hash
[ind
] + seedval
[ind
%seedlen
]);
84 /****************************************************************
85 Get datasize bytes worth of random data.
86 *****************************************************************/
88 static void get_random_stream(unsigned char *data
, size_t datasize
)
90 unsigned char index_i
= hash
[256];
91 unsigned char index_j
= hash
[257];
94 for( ind
= 0; ind
< datasize
; ind
++) {
99 index_j
+= hash
[index_i
];
102 hash
[index_i
] = hash
[index_j
];
105 t
= hash
[index_i
] + hash
[index_j
];
113 /****************************************************************
114 Get a 16 byte hash from the contents of a file.
116 Note that the hash is initialised, because the extra entropy is not
117 worth the valgrind pain.
118 *****************************************************************/
120 static void do_filehash(const char *fname
, unsigned char *the_hash
)
122 unsigned char buf
[1011]; /* deliberate weird size */
123 unsigned char tmp_md4
[16];
126 ZERO_STRUCT(tmp_md4
);
128 fd
= open(fname
,O_RDONLY
,0);
132 while ((n
= read(fd
, (char *)buf
, sizeof(buf
))) > 0) {
133 mdfour(tmp_md4
, buf
, n
);
135 the_hash
[n
] ^= tmp_md4
[n
];
140 /**************************************************************
141 Try and get a good random number seed. Try a number of
142 different factors. Firstly, try /dev/urandom - use if exists.
144 We use /dev/urandom as a read of /dev/random can block if
145 the entropy pool dries up. This leads clients to timeout
146 or be very slow on connect.
148 If we can't use /dev/urandom then seed the stream random generator
150 **************************************************************/
152 static int do_reseed(BOOL use_fd
, int fd
)
154 unsigned char seed_inbuf
[40];
155 uint32_t v1
, v2
; struct timeval tval
; pid_t mypid
;
162 fd
= open( "/dev/urandom", O_RDONLY
,0);
167 /* Add in some secret file contents */
169 do_filehash("/etc/shadow", &seed_inbuf
[0]);
172 * Add the counter, time of day, and pid.
177 v1
= (counter
++) + mypid
+ tval
.tv_sec
;
178 v2
= (counter
++) * mypid
+ tval
.tv_usec
;
180 SIVAL(seed_inbuf
, 32, v1
^ IVAL(seed_inbuf
, 32));
181 SIVAL(seed_inbuf
, 36, v2
^ IVAL(seed_inbuf
, 36));
184 * Add any user-given reseed data.
187 get_rand_reseed_data(&reseed_data
);
190 for (i
= 0; i
< sizeof(seed_inbuf
); i
++)
191 seed_inbuf
[i
] ^= ((char *)(&reseed_data
))[i
% sizeof(reseed_data
)];
194 seed_random_stream(seed_inbuf
, sizeof(seed_inbuf
));
200 Interface to the (hopefully) good crypto random number generator.
202 void generate_random_buffer(uint8_t *out
, int len
)
204 static int urand_fd
= -1;
205 unsigned char md4_buf
[64];
206 unsigned char tmp_buf
[16];
210 urand_fd
= do_reseed(True
, urand_fd
);
214 if (urand_fd
!= -1 && len
> 0) {
216 if (read(urand_fd
, out
, len
) == len
)
217 return; /* len bytes of random data read from urandom. */
219 /* Read of urand error, drop back to non urand method. */
222 do_reseed(False
, -1);
227 * Generate random numbers in chunks of 64 bytes,
228 * then md4 them & copy to the output buffer.
229 * This way the raw state of the stream is never externally
235 int copy_len
= len
> 16 ? 16 : len
;
237 get_random_stream(md4_buf
, sizeof(md4_buf
));
238 mdfour(tmp_buf
, md4_buf
, sizeof(md4_buf
));
239 memcpy(p
, tmp_buf
, copy_len
);
246 generate a single random uint32_t
248 uint32_t generate_random(void)
251 generate_random_buffer(v
, 4);
257 very basic password quality checker
259 BOOL
check_password_quality(const char *s
)
261 int has_digit
=0, has_capital
=0, has_lower
=0;
263 if (isdigit((unsigned char)*s
)) {
265 } else if (isupper((unsigned char)*s
)) {
267 } else if (islower((unsigned char)*s
)) {
273 return has_digit
&& has_lower
&& has_capital
;
276 /*******************************************************************
277 Use the random number generator to generate a random string.
278 ********************************************************************/
280 char *generate_random_str_list(TALLOC_CTX
*mem_ctx
, size_t len
, const char *list
)
283 size_t list_len
= strlen(list
);
285 char *retstr
= talloc_array(mem_ctx
, char, len
+ 1);
286 if (!retstr
) return NULL
;
288 generate_random_buffer((uint8_t *)retstr
, len
);
289 for (i
= 0; i
< len
; i
++) {
290 retstr
[i
] = list
[retstr
[i
] % list_len
];
297 char *generate_random_str(TALLOC_CTX
*mem_ctx
, size_t len
)
300 const char *c_list
= "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+_-#.,";
303 retstr
= generate_random_str_list(mem_ctx
, len
, c_list
);
304 if (!retstr
) return NULL
;
306 /* we need to make sure the random string passes basic quality tests
307 or it might be rejected by windows as a password */
308 if (len
>= 7 && !check_password_quality(retstr
)) {