X-Git-Url: https://git.distorted.org.uk/u/mdw/catacomb/blobdiff_plain/e40955b56456a6191ebff48b00c667a0674b3bdb..f4535c6454395e6d56ce0091a07b6d4f7d54a47f:/mp-exp.h diff --git a/mp-exp.h b/mp-exp.h new file mode 100644 index 0000000..13f5d28 --- /dev/null +++ b/mp-exp.h @@ -0,0 +1,69 @@ +/* -*-c-*- + * + * $Id$ + * + * Exponentiation for large integers + * + * (c) 2004 Straylight/Edgeware + */ + +/*----- Licensing notice --------------------------------------------------* + * + * This file is part of Catacomb. + * + * Catacomb is free software; you can redistribute it and/or modify + * it under the terms of the GNU Library General Public License as + * published by the Free Software Foundation; either version 2 of the + * License, or (at your option) any later version. + * + * Catacomb is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU Library General Public License for more details. + * + * You should have received a copy of the GNU Library General Public + * License along with Catacomb; if not, write to the Free + * Software Foundation, Inc., 59 Temple Place - Suite 330, Boston, + * MA 02111-1307, USA. + */ + +#ifndef CATACOMB_MP_EXP_H +#define CATACOMB_MP_EXP_H + +#ifdef __cplusplus + extern "C" { +#endif + +/*----- Exponentiation ----------------------------------------------------*/ + +#define EXP_TYPE mp * + +#define EXP_COPY(d, x) d = MP_COPY(x) +#define EXP_DROP(x) MP_DROP(x) + +#define EXP_MUL(a, x) do { \ + mp *t = mp_mul(spare, a, x); \ + spare = a; \ + a = t; \ +} while (0) + +#define EXP_SQR(a) do { \ + mp *t = mp_sqr(spare, a); \ + spare = a; \ + a = t; \ +} while (0) + +#define EXP_FIX(x) + +#define EXP_SETMUL(d, x, y) d = mp_mul(MP_NEW, x, y) +#define EXP_SETSQR(d, x) d = mp_sqr(MP_NEW, x) + +#include "exp.h" + +/*----- That's all, folks -------------------------------------------------*/ + +#ifdef __cplusplus + } +#endif + +#endif