/* -*-c-*-
*
- * $Id: ec-exp.h,v 1.1 2002/01/13 13:48:44 mdw Exp $
+ * $Id: ec-exp.h,v 1.2.4.1 2004/03/20 00:13:31 mdw Exp $
*
* Exponentiation operations for elliptic curves
*
/*----- Revision history --------------------------------------------------*
*
* $Log: ec-exp.h,v $
+ * Revision 1.2.4.1 2004/03/20 00:13:31 mdw
+ * Projective coordinates for prime curves
+ *
+ * Revision 1.2 2003/05/15 23:25:59 mdw
+ * Make elliptic curve stuff build.
+ *
* Revision 1.1 2002/01/13 13:48:44 mdw
* Further progress.
*
#define EXP_TYPE ec
-#define EXP_COPY(d, x) do { \
- d.x = MP_COPY(x.x); \
- d.y = MP_COPY(x.y); \
- d.z = x.z ? MP_COPY(x.x) : MP_NEW; \
+#define EXP_COPY(d, p) do { \
+ (d).x = MP_COPY((p).x); \
+ (d).y = MP_COPY((p).y); \
+ (d).z = (p).z ? MP_COPY((p).z) : MP_NEW; \
} while (0)
-#define EXP_DROP(x) EC_DESTROY(c, &x)
+#define EXP_DROP(x) EC_DESTROY(&(x))
-#define EXP_MUL(a, x) EC_ADD(c, &a, &a, &x)
-#define EXP_SQR(a) EC_DBL(c, &a, &a);
+#define EXP_MUL(a, x) EC_ADD(c, &(a), &(a), &(x))
+#define EXP_SQR(a) EC_DBL(c, &(a), &(a));
+#define EXP_FIX(x) EC_FIX(c, &(x), &(x));
#define EXP_SETMUL(d, x, y) do { \
- EC_CREATE(&d); \
- EC_ADD(c, &d, &x, &y); \
+ EC_CREATE(&(d)); \
+ EC_ADD(c, &(d), &(x), &(y)); \
} while (0)
#define EXP_SETSQR(d, x) do { \
- EC_CREATE(&d); \
- EC_DBL(c, &d, &x); \
+ EC_CREATE(&(d)); \
+ EC_DBL(c, &(d), &(x)); \
} while (0)
#include "exp.h"