Mercurial > dropbear
comparison src/misc/mpi/rand_prime.c @ 192:9cc34777b479 libtomcrypt
propagate from branch 'au.asn.ucc.matt.ltc-orig' (head 9ba8f01f44320e9cb9f19881105ae84f84a43ea9)
to branch 'au.asn.ucc.matt.dropbear.ltc' (head dbf51c569bc34956ad948e4cc87a0eeb2170b768)
author | Matt Johnston <matt@ucc.asn.au> |
---|---|
date | Sun, 08 May 2005 06:36:47 +0000 |
parents | 1c15b283127b |
children | 39d5d58461d6 |
comparison
equal
deleted
inserted
replaced
164:cd1143579f00 | 192:9cc34777b479 |
---|---|
1 /* LibTomCrypt, modular cryptographic library -- Tom St Denis | |
2 * | |
3 * LibTomCrypt is a library that provides various cryptographic | |
4 * algorithms in a highly modular and flexible manner. | |
5 * | |
6 * The library is free for all purposes without any express | |
7 * guarantee it works. | |
8 * | |
9 * Tom St Denis, [email protected], http://libtomcrypt.org | |
10 */ | |
11 #include "tomcrypt.h" | |
12 | |
13 /** | |
14 @file rand_prime.c | |
15 Generate a random prime, Tom St Denis | |
16 */ | |
17 #ifdef MPI | |
18 | |
19 struct rng_data { | |
20 prng_state *prng; | |
21 int wprng; | |
22 }; | |
23 | |
24 static int rand_prime_helper(unsigned char *dst, int len, void *dat) | |
25 { | |
26 return (int)prng_descriptor[((struct rng_data *)dat)->wprng].read(dst, len, ((struct rng_data *)dat)->prng); | |
27 } | |
28 | |
29 int rand_prime(mp_int *N, long len, prng_state *prng, int wprng) | |
30 { | |
31 struct rng_data rng; | |
32 int type, err; | |
33 | |
34 LTC_ARGCHK(N != NULL); | |
35 | |
36 /* allow sizes between 2 and 256 bytes for a prime size */ | |
37 if (len < 16 || len > 4096) { | |
38 return CRYPT_INVALID_PRIME_SIZE; | |
39 } | |
40 | |
41 /* valid PRNG? Better be! */ | |
42 if ((err = prng_is_valid(wprng)) != CRYPT_OK) { | |
43 return err; | |
44 } | |
45 | |
46 /* setup our callback data, then world domination! */ | |
47 rng.prng = prng; | |
48 rng.wprng = wprng; | |
49 | |
50 /* get type */ | |
51 if (len < 0) { | |
52 type = LTM_PRIME_BBS; | |
53 len = -len; | |
54 } else { | |
55 type = 0; | |
56 } | |
57 type |= LTM_PRIME_2MSB_ON; | |
58 | |
59 /* New prime generation makes the code even more cryptoish-insane. Do you know what this means!!! | |
60 -- Gir: Yeah, oh wait, er, no. | |
61 */ | |
62 return mpi_to_ltc_error(mp_prime_random_ex(N, mp_prime_rabin_miller_trials(len), len, type, rand_prime_helper, &rng)); | |
63 } | |
64 | |
65 #endif | |
66 |