-
- if (prime_doit[D_PRIME_TRIAL_DIVISION])
- {
- BIGNUM *rnd = BN_new();
- BIGNUM *add = BN_new();
- BN_CTX *ctx = BN_CTX_new();
-
- BN_set_word(add, 2);
- prime_print_message(prime_names[D_PRIME_TRIAL_DIVISION],
- prime_c[D_PRIME_TRIAL_DIVISION]);
-
- Time_F(START);
- for (count=0, run=1; COND(prime_c[D_PRIME_TRIAL_DIVISION]); count++)
- if (!bn_probable_prime_dh(rnd, 1024, add, NULL, ctx)) count--;
-
- d=Time_F(STOP);
- prime_print_result(D_PRIME_TRIAL_DIVISION, count, d);
-
- BN_CTX_free(ctx);
- BN_free(add);
- BN_free(rnd);
- }
-
- if (prime_doit[D_PRIME_TRIAL_DIVISION_RETRY])
- {
- BIGNUM *rnd = BN_new();
- BN_CTX *ctx = BN_CTX_new();
-
- prime_print_message(prime_names[D_PRIME_TRIAL_DIVISION_RETRY],
- prime_c[D_PRIME_TRIAL_DIVISION_RETRY]);
-
- Time_F(START);
- for (count=0, run=1; COND(prime_c[D_PRIME_TRIAL_DIVISION_RETRY]); count++)
- if (!bn_probable_prime_dh_retry(rnd, 1024, ctx)) count--;
-
- d=Time_F(STOP);
- prime_print_result(D_PRIME_TRIAL_DIVISION_RETRY, count, d);
-
- BN_CTX_free(ctx);
- BN_free(rnd);
- }
-
- if (prime_doit[D_PRIME_COPRIME])
- {
- BIGNUM *rnd = BN_new();
- BN_CTX *ctx = BN_CTX_new();
-
- prime_print_message(prime_names[D_PRIME_COPRIME],
- prime_c[D_PRIME_COPRIME]);
-
- Time_F(START);
- for (count=0, run=1; COND(prime_c[D_PRIME_COPRIME]); count++)
- if (!bn_probable_prime_dh_coprime(rnd, 1024, ctx)) count--;
-
- d=Time_F(STOP);
- prime_print_result(D_PRIME_COPRIME, count, d);
-
- BN_CTX_free(ctx);
- BN_free(rnd);
- }
-