nhyatt/putty-source
1
0
Fork 0
mirror of https://git.tartarus.org/simon/putty.git synced 2025-07-01 11:32:48 -05:00
Code Issues Projects Releases Wiki Activity

Add some tests of Miller-Rabin to cryptsuite.

Browse Source 
I'm about to rewrite the Miller-Rabin testing code, so let's start by
introducing a test suite that the old version passes, and then I can
make sure the new one does too.
This commit is contained in:
Simon Tatham
2021-08-27 17:43:40 +01:00
parent 59409d0947
commit 23431f8ff4
6 changed files with 112 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

29
keygen/millerrabin.c
View File

@ -135,17 +135,19 @@ void miller_rabin_free(MillerRabin *mr)
sfree(mr);
}
struct mr_result {
bool passed;
bool potential_primitive_root;
};
static struct mr_result miller_rabin_test_inner(MillerRabin *mr, mp_int *w)
/*
* The main internal function that implements a single M-R test.
*
* Expects the witness integer to be in Montgomery representation.
* (Since in live use witnesses are invented at random, this imposes
* no extra cost on the callers, and saves effort in here.)
*/
static struct mr_result miller_rabin_test_inner(MillerRabin *mr, mp_int *mw)
{
/*
* Compute w^q mod p.
*/
mp_int *wqp = monty_pow(mr->mc, w, mr->q);
mp_int *wqp = monty_pow(mr->mc, mw, mr->q);
/*
* See if this is 1, or if it is -1, or if it becomes -1
@ -175,6 +177,19 @@ static struct mr_result miller_rabin_test_inner(MillerRabin *mr, mp_int *w)
return result;
}
/*
* Wrapper on miller_rabin_test_inner for the convenience of
* testcrypt. Expects the witness integer to be literal, so we
* monty_import it before running the real test.
*/
struct mr_result miller_rabin_test(MillerRabin *mr, mp_int *w)
{
mp_int *mw = monty_import(mr->mc, w);
struct mr_result result = miller_rabin_test_inner(mr, mw);
mp_free(mw);
return result;
}
bool miller_rabin_test_random(MillerRabin *mr)
{
mp_int *mw = mp_random_in_range(mr->two, mr->pm1);