comparison libtomcrypt/src/misc/mpi/is_prime.c @ 293:9d110777f345 contrib-blacklist

propagate from branch 'au.asn.ucc.matt.dropbear' (head 7ad1775ed65e75dbece27fe6b65bf1a234db386a) to branch 'au.asn.ucc.matt.dropbear.contrib.blacklist' (head 1d86a4f0a401cc68c2670d821a2f6366c37af143)
author Matt Johnston <matt@ucc.asn.au>
date Fri, 10 Mar 2006 06:31:29 +0000
parents 1b9e69c058d2
children
comparison
equal deleted inserted replaced
247:c07de41b53d7 293:9d110777f345
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 is_prime.c
15 Determines if integer is prime for LTC, Tom St Denis
16 */
17
18 #ifdef MPI
19
20 /* figures out if a number is prime (MR test) */
21 int is_prime(mp_int *N, int *result)
22 {
23 int err;
24 LTC_ARGCHK(N != NULL);
25 LTC_ARGCHK(result != NULL);
26 if ((err = mp_prime_is_prime(N, mp_prime_rabin_miller_trials(mp_count_bits(N)), result)) != MP_OKAY) {
27 return mpi_to_ltc_error(err);
28 }
29 return CRYPT_OK;
30 }
31
32 #endif
33
34 /* $Source: /cvs/libtom/libtomcrypt/src/misc/mpi/is_prime.c,v $ */
35 /* $Revision: 1.3 $ */
36 /* $Date: 2005/05/05 14:35:59 $ */