pqc/external/libtompoly-0.04/pb_init.c

50 lines
1.2 KiB
C

/* LibTomPoly, Polynomial Basis Math -- Tom St Denis
*
* LibTomPoly is a public domain library that provides
* polynomial basis arithmetic support. It relies on
* LibTomMath for large integer support.
*
* This library is free for all purposes without any
* express guarantee that it works.
*
* Tom St Denis, tomstdenis@iahu.ca, http://poly.libtomcrypt.org
*/
#include <tompoly.h>
/* initialize a */
int pb_init(pb_poly *a, mp_int *characteristic)
{
int x, y, err;
/* init characteristic */
if ((err = mp_init_copy(&(a->characteristic), characteristic)) != MP_OKAY) {
return err;
}
/* now allocate an array of mp_ints */
if ((a->terms = calloc(PB_TERMS, sizeof(mp_int))) == NULL) {
mp_clear(&(a->characteristic));
return MP_MEM;
}
/* now initialize them all */
for (x = 0; x < PB_TERMS; x++) {
if ((err = mp_init(&(a->terms[x]))) != MP_OKAY) {
/* free stuff */
for (y = 0; y < x; y++) {
mp_clear(&(a->terms[y]));
}
free(a->terms);
mp_clear(&(a->characteristic));
return err;
}
}
/* set our parameters */
a->used = 0;
a->alloc = PB_TERMS;
return MP_OKAY;
}