2003-06-16 Moritz Schulte <moritz@g10code.com>
authorMoritz Schulte <mo@g10code.com>
Tue, 17 Jun 2003 17:41:00 +0000 (17:41 +0000)
committerMoritz Schulte <mo@g10code.com>
Tue, 17 Jun 2003 17:41:00 +0000 (17:41 +0000)
* mpi-add.c: Replace last occurences of old type names with newer
names (i.e. replace MPI with gcry_mpi_t).
* mpi-bit.c: Likewise.
* mpi-cmp.c: Likewise.
* mpi-div.c: Likewise.
* mpi-gcd.c: Likewise.
* mpi-internal.h: Likewise.
* mpi-inv.c: Likewise.
* mpi-mpow.c: Likewise.
* mpi-mul.c: Likewise.
* mpi-pow.c: Likewise.
* mpi-scan.c: Likewise.
* mpicoder.c: Likewise.
* mpiutil.c: Likewise.

15 files changed:
mpi/ChangeLog
mpi/Makefile.am
mpi/mpi-add.c
mpi/mpi-bit.c
mpi/mpi-cmp.c
mpi/mpi-div.c
mpi/mpi-gcd.c
mpi/mpi-internal.h
mpi/mpi-inv.c
mpi/mpi-mpow.c
mpi/mpi-mul.c
mpi/mpi-pow.c
mpi/mpi-scan.c
mpi/mpicoder.c
mpi/mpiutil.c

index d97846c..5a69e66 100644 (file)
@@ -1,3 +1,20 @@
+2003-06-16  Moritz Schulte  <moritz@g10code.com>
+
+       * mpi-add.c: Replace last occurences of old type names with newer
+       names (i.e. replace MPI with gcry_mpi_t).
+       * mpi-bit.c: Likewise.
+       * mpi-cmp.c: Likewise.
+       * mpi-div.c: Likewise.
+       * mpi-gcd.c: Likewise.
+       * mpi-internal.h: Likewise.
+       * mpi-inv.c: Likewise.
+       * mpi-mpow.c: Likewise.
+       * mpi-mul.c: Likewise.
+       * mpi-pow.c: Likewise.
+       * mpi-scan.c: Likewise.
+       * mpicoder.c: Likewise.
+       * mpiutil.c: Likewise.
+
 2003-06-09  Moritz Schulte  <moritz@g10code.com>
 
        * mpicoder.c (gcry_mpi_scan): Adjust for libgpg-error.
index c001a6e..7c79256 100644 (file)
@@ -22,7 +22,6 @@
 # not anymore required: AUTOMAKE_OPTIONS = 1.6
 
 INCLUDES =  -I$(top_srcdir)/src
-AM_CFLAGS = @MPI_OPT_FLAGS@
 ASFLAGS = @MPI_SFLAGS@
 
 # We don't have .S sources listed, so automake does not autocreate these
@@ -151,6 +150,7 @@ CLEANFILES = _*.s __*.s
 
 noinst_LTLIBRARIES = libmpi.la
 
+AM_CFLAGS = @GPG_ERROR_CFLAGS@
 libmpi_la_LDFLAGS =
 libmpi_la_SOURCES = longlong.h    \
              mpi-add.c      \
index 9e6b6dd..ada257a 100644 (file)
@@ -36,7 +36,7 @@
  * result in W. U and V may be the same.
  */
 void
-gcry_mpi_add_ui(MPI w, MPI u, unsigned long v )
+gcry_mpi_add_ui(gcry_mpi_t w, gcry_mpi_t u, unsigned long v )
 {
     mpi_ptr_t wp, up;
     mpi_size_t usize, wsize;
@@ -85,7 +85,7 @@ gcry_mpi_add_ui(MPI w, MPI u, unsigned long v )
 
 
 void
-gcry_mpi_add(MPI w, MPI u, MPI v)
+gcry_mpi_add(gcry_mpi_t w, gcry_mpi_t u, gcry_mpi_t v)
 {
     mpi_ptr_t wp, up, vp;
     mpi_size_t usize, vsize, wsize;
@@ -162,7 +162,7 @@ gcry_mpi_add(MPI w, MPI u, MPI v)
  * result in W.
  */
 void
-gcry_mpi_sub_ui(MPI w, MPI u, unsigned long v )
+gcry_mpi_sub_ui(gcry_mpi_t w, gcry_mpi_t u, unsigned long v )
 {
     mpi_ptr_t wp, up;
     mpi_size_t usize, wsize;
@@ -211,9 +211,9 @@ gcry_mpi_sub_ui(MPI w, MPI u, unsigned long v )
 }
 
 void
-gcry_mpi_sub(MPI w, MPI u, MPI v)
+gcry_mpi_sub(gcry_mpi_t w, gcry_mpi_t u, gcry_mpi_t v)
 {
-  MPI vv = mpi_copy (v);
+  gcry_mpi_t vv = mpi_copy (v);
   vv->sign = ! vv->sign;
   gcry_mpi_add (w, u, vv);
   mpi_free (vv);
@@ -221,14 +221,14 @@ gcry_mpi_sub(MPI w, MPI u, MPI v)
 
 
 void
-gcry_mpi_addm( MPI w, MPI u, MPI v, MPI m)
+gcry_mpi_addm( gcry_mpi_t w, gcry_mpi_t u, gcry_mpi_t v, gcry_mpi_t m)
 {
     gcry_mpi_add(w, u, v);
     _gcry_mpi_fdiv_r( w, w, m );
 }
 
 void
-gcry_mpi_subm( MPI w, MPI u, MPI v, MPI m)
+gcry_mpi_subm( gcry_mpi_t w, gcry_mpi_t u, gcry_mpi_t v, gcry_mpi_t m)
 {
     gcry_mpi_sub(w, u, v);
     _gcry_mpi_fdiv_r( w, w, m );
index 1949a40..71f8c42 100644 (file)
@@ -53,7 +53,7 @@ __clz_tab[] =
  * this is for some reasons not good, so this function removes them.
  */
 void
-_gcry_mpi_normalize( MPI a )
+_gcry_mpi_normalize( gcry_mpi_t a )
 {
     if( mpi_is_opaque(a) )
        return;
@@ -68,7 +68,7 @@ _gcry_mpi_normalize( MPI a )
  * Return the number of bits in A.
  */
 unsigned int
-gcry_mpi_get_nbits( MPI a )
+gcry_mpi_get_nbits( gcry_mpi_t a )
 {
     unsigned n;
 
@@ -95,7 +95,7 @@ gcry_mpi_get_nbits( MPI a )
  * Test whether bit N is set.
  */
 int
-gcry_mpi_test_bit( MPI a, unsigned int n )
+gcry_mpi_test_bit( gcry_mpi_t a, unsigned int n )
 {
     unsigned int limbno, bitno;
     mpi_limb_t limb;
@@ -114,7 +114,7 @@ gcry_mpi_test_bit( MPI a, unsigned int n )
  * Set bit N of A.
  */
 void
-gcry_mpi_set_bit( MPI a, unsigned int n )
+gcry_mpi_set_bit( gcry_mpi_t a, unsigned int n )
 {
     unsigned int limbno, bitno;
 
@@ -133,7 +133,7 @@ gcry_mpi_set_bit( MPI a, unsigned int n )
  * Set bit N of A. and clear all bits above
  */
 void
-gcry_mpi_set_highbit( MPI a, unsigned int n )
+gcry_mpi_set_highbit( gcry_mpi_t a, unsigned int n )
 {
     unsigned int limbno, bitno;
 
@@ -155,7 +155,7 @@ gcry_mpi_set_highbit( MPI a, unsigned int n )
  * clear bit N of A and all bits above
  */
 void
-gcry_mpi_clear_highbit( MPI a, unsigned int n )
+gcry_mpi_clear_highbit( gcry_mpi_t a, unsigned int n )
 {
     unsigned int limbno, bitno;
 
@@ -174,7 +174,7 @@ gcry_mpi_clear_highbit( MPI a, unsigned int n )
  * Clear bit N of A.
  */
 void
-gcry_mpi_clear_bit( MPI a, unsigned int n )
+gcry_mpi_clear_bit( gcry_mpi_t a, unsigned int n )
 {
     unsigned int limbno, bitno;
 
@@ -192,7 +192,7 @@ gcry_mpi_clear_bit( MPI a, unsigned int n )
  * FIXME: should use alloc_limb if X and A are same.
  */
 void
-gcry_mpi_rshift( MPI x, MPI a, unsigned n )
+gcry_mpi_rshift( gcry_mpi_t x, gcry_mpi_t a, unsigned n )
 {
     mpi_ptr_t xp;
     mpi_size_t xsize;
@@ -215,7 +215,7 @@ gcry_mpi_rshift( MPI x, MPI a, unsigned n )
  * This is used only within the MPI library
  */
 void
-_gcry_mpi_lshift_limbs( MPI a, unsigned int count )
+_gcry_mpi_lshift_limbs( gcry_mpi_t a, unsigned int count )
 {
     mpi_ptr_t ap = a->d;
     int n = a->nlimbs;
@@ -239,7 +239,7 @@ _gcry_mpi_lshift_limbs( MPI a, unsigned int count )
  * This is used only within the MPI library
  */
 void
-_gcry_mpi_rshift_limbs( MPI a, unsigned int count )
+_gcry_mpi_rshift_limbs( gcry_mpi_t a, unsigned int count )
 {
     mpi_ptr_t ap = a->d;
     mpi_size_t n = a->nlimbs;
index 8d9ae71..6036255 100644 (file)
@@ -24,7 +24,7 @@
 #include "mpi-internal.h"
 
 int
-gcry_mpi_cmp_ui( MPI u, unsigned long v )
+gcry_mpi_cmp_ui( gcry_mpi_t u, unsigned long v )
 {
     mpi_limb_t limb = v;
 
@@ -45,7 +45,7 @@ gcry_mpi_cmp_ui( MPI u, unsigned long v )
 }
 
 int
-gcry_mpi_cmp( MPI u, MPI v )
+gcry_mpi_cmp( gcry_mpi_t u, gcry_mpi_t v )
 {
     mpi_size_t usize, vsize;
     int cmp;
index 6ccc67c..378a45a 100644 (file)
@@ -1,5 +1,5 @@
 /* mpi-div.c  -  MPI functions
- * Copyright (C) 1994, 1996, 1998, 2001, 2002 Free Software Foundation, Inc.
+ * Copyright (C) 1994, 1996, 1998, 2001, 2002, 2003 Free Software Foundation, Inc.
  *
  * This file is part of Libgcrypt.
  *
 
 
 void
-_gcry_mpi_fdiv_r( MPI rem, MPI dividend, MPI divisor )
+_gcry_mpi_fdiv_r( gcry_mpi_t rem, gcry_mpi_t dividend, gcry_mpi_t divisor )
 {
     int divisor_sign = divisor->sign;
-    MPI temp_divisor = NULL;
+    gcry_mpi_t temp_divisor = NULL;
 
     /* We need the original value of the divisor after the remainder has been
      * preliminary calculated. We have to copy it to temporary space if it's
@@ -64,7 +64,7 @@ _gcry_mpi_fdiv_r( MPI rem, MPI dividend, MPI divisor )
  */
 
 ulong
-_gcry_mpi_fdiv_r_ui( MPI rem, MPI dividend, ulong divisor )
+_gcry_mpi_fdiv_r_ui( gcry_mpi_t rem, gcry_mpi_t dividend, ulong divisor )
 {
     mpi_limb_t rlimb;
 
@@ -81,18 +81,18 @@ _gcry_mpi_fdiv_r_ui( MPI rem, MPI dividend, ulong divisor )
 
 
 void
-_gcry_mpi_fdiv_q( MPI quot, MPI dividend, MPI divisor )
+_gcry_mpi_fdiv_q( gcry_mpi_t quot, gcry_mpi_t dividend, gcry_mpi_t divisor )
 {
-    MPI tmp = mpi_alloc( mpi_get_nlimbs(quot) );
+    gcry_mpi_t tmp = mpi_alloc( mpi_get_nlimbs(quot) );
     _gcry_mpi_fdiv_qr( quot, tmp, dividend, divisor);
     mpi_free(tmp);
 }
 
 void
-_gcry_mpi_fdiv_qr( MPI quot, MPI rem, MPI dividend, MPI divisor )
+_gcry_mpi_fdiv_qr( gcry_mpi_t quot, gcry_mpi_t rem, gcry_mpi_t dividend, gcry_mpi_t divisor )
 {
     int divisor_sign = divisor->sign;
-    MPI temp_divisor = NULL;
+    gcry_mpi_t temp_divisor = NULL;
 
     if( quot == divisor || rem == divisor ) {
        temp_divisor = mpi_copy( divisor );
@@ -119,13 +119,13 @@ _gcry_mpi_fdiv_qr( MPI quot, MPI rem, MPI dividend, MPI divisor )
  */
 
 void
-_gcry_mpi_tdiv_r( MPI rem, MPI num, MPI den)
+_gcry_mpi_tdiv_r( gcry_mpi_t rem, gcry_mpi_t num, gcry_mpi_t den)
 {
     _gcry_mpi_tdiv_qr(NULL, rem, num, den );
 }
 
 void
-_gcry_mpi_tdiv_qr( MPI quot, MPI rem, MPI num, MPI den)
+_gcry_mpi_tdiv_qr( gcry_mpi_t quot, gcry_mpi_t rem, gcry_mpi_t num, gcry_mpi_t den)
 {
     mpi_ptr_t np, dp;
     mpi_ptr_t qp, rp;
@@ -276,7 +276,7 @@ _gcry_mpi_tdiv_qr( MPI quot, MPI rem, MPI num, MPI den)
 }
 
 void
-_gcry_mpi_tdiv_q_2exp( MPI w, MPI u, unsigned int count )
+_gcry_mpi_tdiv_q_2exp( gcry_mpi_t w, gcry_mpi_t u, unsigned int count )
 {
     mpi_size_t usize, wsize;
     mpi_size_t limb_cnt;
@@ -312,20 +312,20 @@ _gcry_mpi_tdiv_q_2exp( MPI w, MPI u, unsigned int count )
  * (note: divisor must fit into a limb)
  */
 int
-_gcry_mpi_divisible_ui(MPI dividend, ulong divisor )
+_gcry_mpi_divisible_ui(gcry_mpi_t dividend, ulong divisor )
 {
     return !_gcry_mpih_mod_1( dividend->d, dividend->nlimbs, divisor );
 }
 
 
 void
-gcry_mpi_div (MPI quot, MPI rem, MPI dividend, MPI divisor, int round)
+gcry_mpi_div (gcry_mpi_t quot, gcry_mpi_t rem, gcry_mpi_t dividend, gcry_mpi_t divisor, int round)
 {
   if (!round)
     {
       if (!rem)
         {
-          MPI tmp = mpi_alloc (mpi_get_nlimbs(quot));
+          gcry_mpi_t tmp = mpi_alloc (mpi_get_nlimbs(quot));
           _gcry_mpi_tdiv_qr (quot, tmp, dividend, divisor);
           mpi_free (tmp);
         }
@@ -347,7 +347,7 @@ gcry_mpi_div (MPI quot, MPI rem, MPI dividend, MPI divisor, int round)
 
 
 void
-gcry_mpi_mod (MPI rem, MPI dividend, MPI divisor)
+gcry_mpi_mod (gcry_mpi_t rem, gcry_mpi_t dividend, gcry_mpi_t divisor)
 {
   _gcry_mpi_fdiv_r (rem, dividend, divisor);
   rem->sign = 0;
index 8819871..51841e7 100644 (file)
@@ -1,5 +1,5 @@
 /* mpi-gcd.c  -  MPI functions
- *     Copyright (C) 1998, 2001, 2002 Free Software Foundation, Inc.
+ *     Copyright (C) 1998, 2001, 2002, 2003 Free Software Foundation, Inc.
  *
  * This file is part of Libgcrypt.
  *
@@ -28,9 +28,9 @@
  * Return: true if this 1, false in all other cases
  */
 int
-gcry_mpi_gcd( MPI g, MPI xa, MPI xb )
+gcry_mpi_gcd( gcry_mpi_t g, gcry_mpi_t xa, gcry_mpi_t xb )
 {
-    MPI a, b;
+    gcry_mpi_t a, b;
 
     a = mpi_copy(xa);
     b = mpi_copy(xb);
index 4fbd8e5..22699c6 100644 (file)
@@ -1,6 +1,6 @@
 /* mpi-internal.h  -  Internal to the Multi Precision Integers
  *     Copyright (C) 1998 Free Software Foundation, Inc.
- *     Copyright (C) 1994, 1996, 2000, 2002 Free Software Foundation, Inc.
+ *     Copyright (C) 1994, 1996, 2000, 2002, 2003 Free Software Foundation, Inc.
  *
  * This file is part of Libgcrypt.
  *
@@ -180,11 +180,11 @@ typedef int mpi_size_t;        /* (must be a signed type) */
   mpi_ptr_t _gcry_mpi_alloc_limb_space( unsigned nlimbs, int sec );
   void _gcry_mpi_free_limb_space( mpi_ptr_t a );
 #endif
-void _gcry_mpi_assign_limb_space( MPI a, mpi_ptr_t ap, unsigned nlimbs );
+void _gcry_mpi_assign_limb_space( gcry_mpi_t a, mpi_ptr_t ap, unsigned nlimbs );
 
 /*-- mpi-bit.c --*/
-void _gcry_mpi_rshift_limbs( MPI a, unsigned int count );
-void _gcry_mpi_lshift_limbs( MPI a, unsigned int count );
+void _gcry_mpi_rshift_limbs( gcry_mpi_t a, unsigned int count );
+void _gcry_mpi_lshift_limbs( gcry_mpi_t a, unsigned int count );
 
 
 /*-- mpih-add.c --*/
index b44cb67..2e737b8 100644 (file)
@@ -1,5 +1,5 @@
 /* mpi-inv.c  -  MPI functions
- *     Copyright (C) 1998, 2001, 2002 Free Software Foundation, Inc.
+ *     Copyright (C) 1998, 2001, 2002, 2003 Free Software Foundation, Inc.
  *
  * This file is part of Libgcrypt.
  *
  *             1 = (a*x) mod n
  */
 void
-_gcry_mpi_invm( MPI x, MPI a, MPI n )
+_gcry_mpi_invm( gcry_mpi_t x, gcry_mpi_t a, gcry_mpi_t n )
 {
 #if 0
-    MPI u, v, u1, u2, u3, v1, v2, v3, q, t1, t2, t3;
-    MPI ta, tb, tc;
+    gcry_mpi_t u, v, u1, u2, u3, v1, v2, v3, q, t1, t2, t3;
+    gcry_mpi_t ta, tb, tc;
 
     u = mpi_copy(a);
     v = mpi_copy(n);
@@ -81,7 +81,7 @@ _gcry_mpi_invm( MPI x, MPI a, MPI n )
      * modified according to Michael Penk's solution for Exercise 35 */
 
     /* FIXME: we can simplify this in most cases (see Knuth) */
-    MPI u, v, u1, u2, u3, v1, v2, v3, t1, t2, t3;
+    gcry_mpi_t u, v, u1, u2, u3, v1, v2, v3, t1, t2, t3;
     unsigned k;
     int sign;
 
@@ -161,7 +161,7 @@ _gcry_mpi_invm( MPI x, MPI a, MPI n )
     /* Extended Euclid's algorithm (See TAOCP Vol II, 4.5.2, Alg X)
      * modified according to Michael Penk's solution for Exercise 35
      * with further enhancement */
-    MPI u, v, u1, u2=NULL, u3, v1, v2=NULL, v3, t1, t2=NULL, t3;
+    gcry_mpi_t u, v, u1, u2=NULL, u3, v1, v2=NULL, v3, t1, t2=NULL, t3;
     unsigned k;
     int sign;
     int odd ;
@@ -268,7 +268,7 @@ _gcry_mpi_invm( MPI x, MPI a, MPI n )
 
 
 int
-gcry_mpi_invm (MPI x, MPI a, MPI n)
+gcry_mpi_invm (gcry_mpi_t x, gcry_mpi_t a, gcry_mpi_t n)
 {
   _gcry_mpi_invm (x, a, n);
   return 1;
index e8f43d1..f37c6f9 100644 (file)
@@ -1,5 +1,5 @@
 /* mpi-mpow.c  -  MPI functions
- *     Copyright (C) 1998, 1999, 2001, 2002 Free Software Foundation, Inc.
+ *     Copyright (C) 1998, 1999, 2001, 2002, 2003 Free Software Foundation, Inc.
  *
  * This file is part of Libgcrypt.
  *
 
 
 #ifdef USE_BARRETT
-static void barrett_mulm( MPI w, MPI u, MPI v, MPI m, MPI y, int k, MPI r1, MPI r2 );
-static MPI init_barrett( MPI m, int *k, MPI *r1, MPI *r2 );
-static int calc_barrett( MPI r, MPI x, MPI m, MPI y, int k, MPI r1, MPI r2  );
+static void barrett_mulm( gcry_mpi_t w, gcry_mpi_t u, gcry_mpi_t v, gcry_mpi_t m, gcry_mpi_t y, int k, gcry_mpi_t r1, gcry_mpi_t r2 );
+static gcry_mpi_t init_barrett( gcry_mpi_t m, int *k, gcry_mpi_t *r1, gcry_mpi_t *r2 );
+static int calc_barrett( gcry_mpi_t r, gcry_mpi_t x, gcry_mpi_t m, gcry_mpi_t y, int k, gcry_mpi_t r1, gcry_mpi_t r2  );
 #else
 #define barrett_mulm( w, u, v, m, y, k, r1, r2 ) gcry_mpi_mulm( (w), (u), (v), (m) )
 #endif
 
 
 static int
-build_index( MPI *exparray, int k, int i, int t )
+build_index( gcry_mpi_t *exparray, int k, int i, int t )
 {
     int j, bitno;
     int idx = 0;
@@ -63,15 +63,15 @@ build_index( MPI *exparray, int k, int i, int t )
  * RES = (BASE[0] ^ EXP[0]) *  (BASE[1] ^ EXP[1]) * ... * mod M
  */
 void
-_gcry_mpi_mulpowm( MPI res, MPI *basearray, MPI *exparray, MPI m)
+_gcry_mpi_mulpowm( gcry_mpi_t res, gcry_mpi_t *basearray, gcry_mpi_t *exparray, gcry_mpi_t m)
 {
     int k;     /* number of elements */
     int t;     /* bit size of largest exponent */
     int i, j, idx;
-    MPI *G;    /* table with precomputed values of size 2^k */
-    MPI tmp;
+    gcry_mpi_t *G;     /* table with precomputed values of size 2^k */
+    gcry_mpi_t tmp;
 #ifdef USE_BARRETT
-    MPI barrett_y, barrett_r1, barrett_r2;
+    gcry_mpi_t barrett_y, barrett_r1, barrett_r2;
     int barrett_k;
 #endif
 
@@ -137,7 +137,7 @@ _gcry_mpi_mulpowm( MPI res, MPI *basearray, MPI *exparray, MPI m)
 
 #ifdef USE_BARRETT
 static void
-barrett_mulm( MPI w, MPI u, MPI v, MPI m, MPI y, int k, MPI r1, MPI r2 )
+barrett_mulm( gcry_mpi_t w, gcry_mpi_t u, gcry_mpi_t v, gcry_mpi_t m, gcry_mpi_t y, int k, gcry_mpi_t r1, gcry_mpi_t r2        )
 {
     mpi_mul(w, u, v);
     if( calc_barrett( w, w, m, y, k, r1, r2 ) )
@@ -147,10 +147,10 @@ barrett_mulm( MPI w, MPI u, MPI v, MPI m, MPI y, int k, MPI r1, MPI r2    )
 /****************
  * Barrett precalculation: y = floor(b^(2k) / m)
  */
-static MPI
-init_barrett( MPI m, int *k, MPI *r1, MPI *r2 )
+static gcry_mpi_t
+init_barrett( gcry_mpi_t m, int *k, gcry_mpi_t *r1, gcry_mpi_t *r2 )
 {
-    MPI tmp;
+    gcry_mpi_t tmp;
 
     mpi_normalize( m );
     *k = mpi_get_nlimbs( m );
@@ -173,7 +173,7 @@ init_barrett( MPI m, int *k, MPI *r1, MPI *r2 )
  *         true = can't perform barret reduction
  */
 static int
-calc_barrett( MPI r, MPI x, MPI m, MPI y, int k, MPI r1, MPI r2 )
+calc_barrett( gcry_mpi_t r, gcry_mpi_t x, gcry_mpi_t m, gcry_mpi_t y, int k, gcry_mpi_t r1, gcry_mpi_t r2 )
 {
     int xx = k > 3 ? k-3:0;
 
@@ -205,7 +205,7 @@ calc_barrett( MPI r, MPI x, MPI m, MPI y, int k, MPI r1, MPI r2 )
     mpi_sub( r, r1, r2 );
 
     if( mpi_is_neg( r ) ) {
-       MPI tmp;
+       gcry_mpi_t tmp;
 
        tmp = mpi_alloc( k + 2 );
        mpi_set_ui( tmp, 1 );
index 432daa7..317a3c5 100644 (file)
@@ -1,5 +1,5 @@
 /* mpi-mul.c  -  MPI functions
- * Copyright (C) 1994, 1996, 1998, 2001, 2002 Free Software Foundation, Inc.
+ * Copyright (C) 1994, 1996, 1998, 2001, 2002, 2003 Free Software Foundation, Inc.
  *
  * This file is part of Libgcrypt.
  *
@@ -31,7 +31,7 @@
 
 
 void
-gcry_mpi_mul_ui( MPI prod, MPI mult, unsigned long small_mult )
+gcry_mpi_mul_ui( gcry_mpi_t prod, gcry_mpi_t mult, unsigned long small_mult )
 {
     mpi_size_t size, prod_size;
     mpi_ptr_t  prod_ptr;
@@ -61,7 +61,7 @@ gcry_mpi_mul_ui( MPI prod, MPI mult, unsigned long small_mult )
 
 
 void
-_gcry_mpi_mul_2exp( MPI w, MPI u, unsigned long cnt)
+_gcry_mpi_mul_2exp( gcry_mpi_t w, gcry_mpi_t u, unsigned long cnt)
 {
     mpi_size_t usize, wsize, limb_cnt;
     mpi_ptr_t wp;
@@ -107,14 +107,14 @@ _gcry_mpi_mul_2exp( MPI w, MPI u, unsigned long cnt)
 
 
 void
-gcry_mpi_mul_2exp( MPI w, MPI u, unsigned long cnt)
+gcry_mpi_mul_2exp( gcry_mpi_t w, gcry_mpi_t u, unsigned long cnt)
 {
   _gcry_mpi_mul_2exp (w, u, cnt);
 }
 
 
 void
-gcry_mpi_mul( MPI w, MPI u, MPI v)
+gcry_mpi_mul( gcry_mpi_t w, gcry_mpi_t u, gcry_mpi_t v)
 {
     mpi_size_t usize, vsize, wsize;
     mpi_ptr_t up, vp, wp;
@@ -210,7 +210,7 @@ gcry_mpi_mul( MPI w, MPI u, MPI v)
 
 
 void
-gcry_mpi_mulm( MPI w, MPI u, MPI v, MPI m)
+gcry_mpi_mulm( gcry_mpi_t w, gcry_mpi_t u, gcry_mpi_t v, gcry_mpi_t m)
 {
     gcry_mpi_mul(w, u, v);
     _gcry_mpi_fdiv_r( w, w, m );
index 33c2165..7f4b650 100644 (file)
@@ -1,5 +1,5 @@
 /* mpi-pow.c  -  MPI functions
- * Copyright (C) 1994, 1996, 1998, 2000, 2002 Free Software Foundation, Inc.
+ * Copyright (C) 1994, 1996, 1998, 2000, 2002, 2003 Free Software Foundation, Inc.
  *
  * This file is part of Libgcrypt.
  *
@@ -37,7 +37,7 @@
  * RES = BASE ^ EXP mod MOD
  */
 void
-gcry_mpi_powm( MPI res, MPI base, MPI exp, MPI mod)
+gcry_mpi_powm( gcry_mpi_t res, gcry_mpi_t base, gcry_mpi_t exp, gcry_mpi_t mod)
 {
     mpi_ptr_t  rp, ep, mp, bp;
     mpi_size_t esize, msize, bsize, rsize;
index d25b356..90699cd 100644 (file)
@@ -1,5 +1,5 @@
 /* mpi-scan.c  -  MPI functions
- *     Copyright (C) 1998, 2001, 2002 Free Software Foundation, Inc.
+ *     Copyright (C) 1998, 2001, 2002, 2003 Free Software Foundation, Inc.
  *
  * This file is part of Libgcrypt.
  *
@@ -32,7 +32,7 @@
  * FIXME: This code is VERY ugly!
  */
 int
-_gcry_mpi_getbyte( MPI a, unsigned idx )
+_gcry_mpi_getbyte( gcry_mpi_t a, unsigned idx )
 {
     int i, j;
     unsigned n;
@@ -54,7 +54,7 @@ _gcry_mpi_getbyte( MPI a, unsigned idx )
  * Put a value at position IDX into A. idx counts from lsb to msb
  */
 void
-_gcry_mpi_putbyte( MPI a, unsigned idx, int xc )
+_gcry_mpi_putbyte( gcry_mpi_t a, unsigned idx, int xc )
 {
     int i, j;
     unsigned n;
@@ -110,7 +110,7 @@ _gcry_mpi_putbyte( MPI a, unsigned idx, int xc )
  * Count the number of zerobits at the low end of A
  */
 unsigned
-_gcry_mpi_trailing_zeros( MPI a )
+_gcry_mpi_trailing_zeros( gcry_mpi_t a )
 {
     unsigned n, count = 0;
 
index ad5a5ce..20ad498 100644 (file)
 #define MAX_EXTERN_MPI_BITS 16384
 
 
-static MPI
+static gcry_mpi_t
 mpi_read_from_buffer(byte *buffer, unsigned *ret_nread, int secure)
 {
     int i, j;
     unsigned int nbits, nbytes, nlimbs, nread=0;
     mpi_limb_t a;
-    MPI val = MPI_NULL;
+    gcry_mpi_t val = MPI_NULL;
 
     if( *ret_nread < 2 )
        goto leave;
@@ -82,7 +82,7 @@ mpi_read_from_buffer(byte *buffer, unsigned *ret_nread, int secure)
  * Make an mpi from a hex character string.
  */
 static int
-mpi_fromstr(MPI val, const char *str)
+mpi_fromstr(gcry_mpi_t val, const char *str)
 {
     int sign=0, prepend_zero=0, i, j, c, c1, c2;
     unsigned nbits, nbytes, nlimbs;
@@ -159,7 +159,7 @@ mpi_fromstr(MPI val, const char *str)
  * FIXME: Replace this by the more generic gcry_mpi_print()
  */
 static int
-mpi_print( FILE *fp, MPI a, int mode )
+mpi_print( FILE *fp, gcry_mpi_t a, int mode )
 {
     int i, n=0;
 
@@ -196,7 +196,7 @@ mpi_print( FILE *fp, MPI a, int mode )
 #warning We should move this function to elsewhere
 #endif
 void
-_gcry_log_mpidump( const char *text, MPI a )
+_gcry_log_mpidump( const char *text, gcry_mpi_t a )
 {
     FILE *fp = stderr; /* used to be log_stream() */
 
@@ -216,7 +216,7 @@ _gcry_log_mpidump( const char *text, MPI a )
  * be set to the sign of the A.
  */
 static byte *
-do_get_buffer( MPI a, unsigned *nbytes, int *sign, int force_secure )
+do_get_buffer( gcry_mpi_t a, unsigned *nbytes, int *sign, int force_secure )
 {
     byte *p, *buffer;
     mpi_limb_t alimb;
@@ -262,13 +262,13 @@ do_get_buffer( MPI a, unsigned *nbytes, int *sign, int force_secure )
 
 
 byte *
-_gcry_mpi_get_buffer( MPI a, unsigned *nbytes, int *sign )
+_gcry_mpi_get_buffer( gcry_mpi_t a, unsigned *nbytes, int *sign )
 {
     return do_get_buffer( a, nbytes, sign, 0 );
 }
 
 byte *
-_gcry_mpi_get_secure_buffer( MPI a, unsigned *nbytes, int *sign )
+_gcry_mpi_get_secure_buffer( gcry_mpi_t a, unsigned *nbytes, int *sign )
 {
     return do_get_buffer( a, nbytes, sign, 1 );
 }
@@ -277,7 +277,7 @@ _gcry_mpi_get_secure_buffer( MPI a, unsigned *nbytes, int *sign )
  * Use BUFFER to update MPI.
  */
 void
-_gcry_mpi_set_buffer( MPI a, const byte *buffer, unsigned nbytes, int sign )
+_gcry_mpi_set_buffer( gcry_mpi_t a, const byte *buffer, unsigned nbytes, int sign )
 {
     const byte *p;
     mpi_limb_t alimb;
index 89631d3..2a5c036 100644 (file)
  *
  *       But mpi_alloc is used in a lot of places :-)
  */
-MPI
+gcry_mpi_t
 _gcry_mpi_alloc( unsigned nlimbs )
 {
-    MPI a;
+    gcry_mpi_t a;
 
     a = gcry_xmalloc( sizeof *a );
     a->d = nlimbs? mpi_alloc_limb_space( nlimbs, 0 ) : NULL;
@@ -50,16 +50,16 @@ _gcry_mpi_alloc( unsigned nlimbs )
 }
 
 void
-_gcry_mpi_m_check( MPI a )
+_gcry_mpi_m_check( gcry_mpi_t a )
 {
     _gcry_check_heap(a);
     _gcry_check_heap(a->d);
 }
 
-MPI
+gcry_mpi_t
 _gcry_mpi_alloc_secure( unsigned nlimbs )
 {
-    MPI a;
+    gcry_mpi_t a;
 
     a = gcry_xmalloc( sizeof *a );
     a->d = nlimbs? mpi_alloc_limb_space( nlimbs, 1 ) : NULL;
@@ -94,7 +94,7 @@ _gcry_mpi_free_limb_space( mpi_ptr_t a )
 
 
 void
-_gcry_mpi_assign_limb_space( MPI a, mpi_ptr_t ap, unsigned nlimbs )
+_gcry_mpi_assign_limb_space( gcry_mpi_t a, mpi_ptr_t ap, unsigned nlimbs )
 {
     mpi_free_limb_space(a->d);
     a->d = ap;
@@ -108,7 +108,7 @@ _gcry_mpi_assign_limb_space( MPI a, mpi_ptr_t ap, unsigned nlimbs )
  * (set to 0) [done by gcry_realloc()]
  */
 void
-_gcry_mpi_resize (MPI a, unsigned nlimbs)
+_gcry_mpi_resize (gcry_mpi_t a, unsigned nlimbs)
 {
   if (nlimbs <= a->alloced)
     return; /* no need to do it */
@@ -128,7 +128,7 @@ _gcry_mpi_resize (MPI a, unsigned nlimbs)
 }
 
 void
-_gcry_mpi_clear( MPI a )
+_gcry_mpi_clear( gcry_mpi_t a )
 {
     a->nlimbs = 0;
     a->flags = 0;
@@ -136,7 +136,7 @@ _gcry_mpi_clear( MPI a )
 
 
 void
-_gcry_mpi_free( MPI a )
+_gcry_mpi_free( gcry_mpi_t a )
 {
     if( !a )
        return;
@@ -151,7 +151,7 @@ _gcry_mpi_free( MPI a )
 }
 
 static void
-mpi_set_secure( MPI a )
+mpi_set_secure( gcry_mpi_t a )
 {
     mpi_ptr_t ap, bp;
 
@@ -170,8 +170,8 @@ mpi_set_secure( MPI a )
 }
 
 
-MPI
-gcry_mpi_set_opaque( MPI a, void *p, unsigned int nbits )
+gcry_mpi_t
+gcry_mpi_set_opaque( gcry_mpi_t a, void *p, unsigned int nbits )
 {
     if( !a ) {
        a = mpi_alloc(0);
@@ -193,7 +193,7 @@ gcry_mpi_set_opaque( MPI a, void *p, unsigned int nbits )
 
 
 void *
-gcry_mpi_get_opaque( MPI a, unsigned int *nbits )
+gcry_mpi_get_opaque( gcry_mpi_t a, unsigned int *nbits )
 {
     if( !(a->flags & 4) )
        log_bug("mpi_get_opaque on normal mpi\n");
@@ -207,11 +207,11 @@ gcry_mpi_get_opaque( MPI a, unsigned int *nbits )
  * Note: This copy function should not interpret the MPI
  *      but copy it transparently.
  */
-MPI
-_gcry_mpi_copy( MPI a )
+gcry_mpi_t
+_gcry_mpi_copy( gcry_mpi_t a )
 {
     int i;
-    MPI b;
+    gcry_mpi_t b;
 
     if( a && (a->flags & 4) ) {
        void *p = gcry_is_secure(a->d)? gcry_xmalloc_secure( (a->sign+7)/8 )
@@ -239,10 +239,10 @@ _gcry_mpi_copy( MPI a )
  * a value as large as the one given in the argument and allocates it
  * with the same flags as A.
  */
-MPI
-_gcry_mpi_alloc_like( MPI a )
+gcry_mpi_t
+_gcry_mpi_alloc_like( gcry_mpi_t a )
 {
-    MPI b;
+    gcry_mpi_t b;
 
     if( a && (a->flags & 4) ) {
        int n = (a->sign+7)/8;
@@ -265,7 +265,7 @@ _gcry_mpi_alloc_like( MPI a )
 
 
 void
-_gcry_mpi_set( MPI w, MPI u)
+_gcry_mpi_set( gcry_mpi_t w, gcry_mpi_t u)
 {
     mpi_ptr_t wp, up;
     mpi_size_t usize = u->nlimbs;
@@ -282,7 +282,7 @@ _gcry_mpi_set( MPI w, MPI u)
 
 
 void
-_gcry_mpi_set_ui( MPI w, unsigned long u)
+_gcry_mpi_set_ui( gcry_mpi_t w, unsigned long u)
 {
     RESIZE_IF_NEEDED(w, 1);
     w->d[0] = u;
@@ -292,10 +292,10 @@ _gcry_mpi_set_ui( MPI w, unsigned long u)
 }
 
 
-MPI
+gcry_mpi_t
 _gcry_mpi_alloc_set_ui( unsigned long u)
 {
-    MPI w = mpi_alloc(1);
+    gcry_mpi_t w = mpi_alloc(1);
     w->d[0] = u;
     w->nlimbs = u? 1:0;
     w->sign = 0;
@@ -304,7 +304,7 @@ _gcry_mpi_alloc_set_ui( unsigned long u)
 
 
 void
-_gcry_mpi_swap( MPI a, MPI b)
+_gcry_mpi_swap( gcry_mpi_t a, gcry_mpi_t b)
 {
     struct gcry_mpi tmp;
 
@@ -312,7 +312,7 @@ _gcry_mpi_swap( MPI a, MPI b)
 }
 
 void
-gcry_mpi_swap( MPI a, MPI b)
+gcry_mpi_swap( gcry_mpi_t a, gcry_mpi_t b)
 {
   _gcry_mpi_swap (a, b);
 }