From 77d2fb233cbd77f27b25756dccf71cdba86cf93e Mon Sep 17 00:00:00 2001
From: J08nY
Date: Fri, 13 Jul 2018 18:37:12 +0200
Subject: Check size of requested CM order when generating.

---
 src/cm/cm.c | 8 ++++++++
 1 file changed, 8 insertions(+)

(limited to 'src')

diff --git a/src/cm/cm.c b/src/cm/cm.c
index c604876..a3a70a2 100644
--- a/src/cm/cm.c
+++ b/src/cm/cm.c
@@ -181,6 +181,14 @@ static int cm_init(exhaustive_t *setup) {
 			fprintf(err, "Order requested not a number: %s\n", cfg->cm_order);
 			return 1;
 		}
+		long ord_log = logint0(order, gen_2, NULL);
+		if (ord_log > cfg->bits) {
+			pari_fprintf(err,
+			             "Order requested does not fit(2^%li) into requested "
+			             "bitsize(2^%li): %Pi\n",
+			             ord_log, cfg->bits, order);
+			return 1;
+		}
 		if (delims == 0) {
 			ord_prime = (bool)isprime(order);
 		} else {
-- 
cgit v1.3.1