2018-05-02 15:43:17 -04:00
|
|
|
#include "tommath_private.h"
|
2014-10-14 08:36:38 -04:00
|
|
|
#ifdef BN_MP_GET_LONG_C
|
2011-11-13 13:17:46 -05:00
|
|
|
/* LibTomMath, multiple-precision integer library -- Tom St Denis
|
|
|
|
*
|
|
|
|
* LibTomMath is a library that provides multiple-precision
|
|
|
|
* integer arithmetic as well as number theoretic functionality.
|
|
|
|
*
|
|
|
|
* The library was designed directly after the MPI library by
|
|
|
|
* Michael Fromberger but has been written from scratch with
|
|
|
|
* additional optimizations in place.
|
|
|
|
*
|
2018-12-29 11:56:20 -05:00
|
|
|
* SPDX-License-Identifier: Unlicense
|
2011-11-13 13:17:46 -05:00
|
|
|
*/
|
|
|
|
|
|
|
|
/* get the lower unsigned long of an mp_int, platform dependent */
|
2017-09-20 10:59:43 -04:00
|
|
|
unsigned long mp_get_long(const mp_int *a)
|
2011-11-13 13:17:46 -05:00
|
|
|
{
|
2017-08-29 16:23:48 -04:00
|
|
|
int i;
|
|
|
|
unsigned long res;
|
2011-11-13 13:17:46 -05:00
|
|
|
|
2017-08-29 16:23:48 -04:00
|
|
|
if (a->used == 0) {
|
|
|
|
return 0;
|
|
|
|
}
|
2011-11-13 13:17:46 -05:00
|
|
|
|
2017-08-29 16:23:48 -04:00
|
|
|
/* get number of digits of the lsb we have to read */
|
2017-10-15 13:58:35 -04:00
|
|
|
i = MIN(a->used, ((((int)sizeof(unsigned long) * CHAR_BIT) + DIGIT_BIT - 1) / DIGIT_BIT)) - 1;
|
2011-11-13 13:17:46 -05:00
|
|
|
|
2017-08-29 16:23:48 -04:00
|
|
|
/* get most significant digit of result */
|
|
|
|
res = DIGIT(a, i);
|
2014-10-14 08:37:17 -04:00
|
|
|
|
2015-11-13 04:28:23 -05:00
|
|
|
#if (ULONG_MAX != 0xffffffffuL) || (DIGIT_BIT < 32)
|
2017-08-29 16:23:48 -04:00
|
|
|
while (--i >= 0) {
|
|
|
|
res = (res << DIGIT_BIT) | DIGIT(a, i);
|
|
|
|
}
|
2014-10-14 08:37:17 -04:00
|
|
|
#endif
|
2017-08-29 16:23:48 -04:00
|
|
|
return res;
|
2011-11-13 13:17:46 -05:00
|
|
|
}
|
|
|
|
#endif
|
2018-12-02 07:10:09 -05:00
|
|
|
|
|
|
|
/* ref: $Format:%D$ */
|
|
|
|
/* git commit: $Format:%H$ */
|
|
|
|
/* commit time: $Format:%ai$ */
|