libtommath/bn_mp_jacobi.c

24 lines
574 B
C
Raw Normal View History

#include "tommath_private.h"
2004-10-29 22:07:18 +00:00
#ifdef BN_MP_JACOBI_C
2019-04-07 13:29:11 +00:00
/* LibTomMath, multiple-precision integer library -- Tom St Denis */
/* SPDX-License-Identifier: Unlicense */
2003-02-28 16:08:34 +00:00
2003-05-17 12:33:54 +00:00
/* computes the jacobi c = (a | n) (or Legendre if n is prime)
* Kept for legacy reasons, please use mp_kronecker() instead
2003-02-28 16:08:34 +00:00
*/
2017-09-20 14:59:43 +00:00
int mp_jacobi(const mp_int *a, const mp_int *n, int *c)
2003-02-28 16:08:34 +00:00
{
2017-08-30 18:23:46 +00:00
/* if a < 0 return MP_VAL */
2018-12-28 08:34:02 +00:00
if (a->sign == MP_NEG) {
2017-08-30 18:23:46 +00:00
return MP_VAL;
}
2017-08-30 18:23:46 +00:00
/* if n <= 0 return MP_VAL */
2017-10-15 14:11:09 +00:00
if (mp_cmp_d(n, 0uL) != MP_GT) {
2017-08-30 18:23:46 +00:00
return MP_VAL;
}
2003-08-05 01:24:44 +00:00
2018-12-26 07:47:47 +00:00
return mp_kronecker(a, n, c);
2003-02-28 16:08:34 +00:00
}
2004-10-29 22:07:18 +00:00
#endif