/* 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;
}