denyhosts/clamav/libclamav/tomsfastmath/bit/fp_lshd.c

39 lines
700 B
C
Raw Normal View History

2022-10-22 18:41:00 +08:00
/* TomsFastMath, a fast ISO C bignum library.
*
* This project is meant to fill in where LibTomMath
* falls short. That is speed ;-)
*
* This project is public domain and free for all purposes.
*
* Tom St Denis, tomstdenis@gmail.com
*/
2023-01-14 18:28:39 +08:00
#include <tfm_private.h>
2022-10-22 18:41:00 +08:00
void fp_lshd(fp_int *a, int x)
{
int y;
/* move up and truncate as required */
y = MIN(a->used + x - 1, (int)(FP_SIZE-1));
/* store new size */
a->used = y + 1;
/* move digits */
for (; y >= x; y--) {
a->dp[y] = a->dp[y-x];
}
/* zero lower digits */
for (; y >= 0; y--) {
a->dp[y] = 0;
}
/* clamp digits */
fp_clamp(a);
}
2023-01-14 18:28:39 +08:00
/* $Source$ */
/* $Revision$ */
/* $Date$ */