contrib/openssl/include/openssl/bn.h

   1 /* crypto/bn/bn.h */\r
   2 /* Copyright (C) 1995-1997 Eric Young (eay@cryptsoft.com)\r
   3  * All rights reserved.\r
   4  *\r
   5  * This package is an SSL implementation written\r
   6  * by Eric Young (eay@cryptsoft.com).\r
   7  * The implementation was written so as to conform with Netscapes SSL.\r
   8  *\r
   9  * This library is free for commercial and non-commercial use as long as\r
  10  * the following conditions are aheared to.  The following conditions\r
  11  * apply to all code found in this distribution, be it the RC4, RSA,\r
  12  * lhash, DES, etc., code; not just the SSL code.  The SSL documentation\r
  13  * included with this distribution is covered by the same copyright terms\r
  14  * except that the holder is Tim Hudson (tjh@cryptsoft.com).\r
  15  *\r
  16  * Copyright remains Eric Young's, and as such any Copyright notices in\r
  17  * the code are not to be removed.\r
  18  * If this package is used in a product, Eric Young should be given attribution\r
  19  * as the author of the parts of the library used.\r
  20  * This can be in the form of a textual message at program startup or\r
  21  * in documentation (online or textual) provided with the package.\r
  22  *\r
  23  * Redistribution and use in source and binary forms, with or without\r
  24  * modification, are permitted provided that the following conditions\r
  25  * are met:\r
  26  * 1. Redistributions of source code must retain the copyright\r
  27  *    notice, this list of conditions and the following disclaimer.\r
  28  * 2. Redistributions in binary form must reproduce the above copyright\r
  29  *    notice, this list of conditions and the following disclaimer in the\r
  30  *    documentation and/or other materials provided with the distribution.\r
  31  * 3. All advertising materials mentioning features or use of this software\r
  32  *    must display the following acknowledgement:\r
  33  *    "This product includes cryptographic software written by\r
  34  *     Eric Young (eay@cryptsoft.com)"\r
  35  *    The word 'cryptographic' can be left out if the rouines from the library\r
  36  *    being used are not cryptographic related :-).\r
  37  * 4. If you include any Windows specific code (or a derivative thereof) from\r
  38  *    the apps directory (application code) you must include an acknowledgement:\r
  39  *    "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"\r
  40  *\r
  41  * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND\r
  42  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE\r
  43  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE\r
  44  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE\r
  45  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL\r
  46  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS\r
  47  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)\r
  48  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT\r
  49  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY\r
  50  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF\r
  51  * SUCH DAMAGE.\r
  52  *\r
  53  * The licence and distribution terms for any publically available version or\r
  54  * derivative of this code cannot be changed.  i.e. this code cannot simply be\r
  55  * copied and put under another distribution licence\r
  56  * [including the GNU Public Licence.]\r
  57  */\r
  58 /* ====================================================================\r
  59  * Copyright (c) 1998-2006 The OpenSSL Project.  All rights reserved.\r
  60  *\r
  61  * Redistribution and use in source and binary forms, with or without\r
  62  * modification, are permitted provided that the following conditions\r
  63  * are met:\r
  64  *\r
  65  * 1. Redistributions of source code must retain the above copyright\r
  66  *    notice, this list of conditions and the following disclaimer.\r
  67  *\r
  68  * 2. Redistributions in binary form must reproduce the above copyright\r
  69  *    notice, this list of conditions and the following disclaimer in\r
  70  *    the documentation and/or other materials provided with the\r
  71  *    distribution.\r
  72  *\r
  73  * 3. All advertising materials mentioning features or use of this\r
  74  *    software must display the following acknowledgment:\r
  75  *    "This product includes software developed by the OpenSSL Project\r
  76  *    for use in the OpenSSL Toolkit. (http://www.openssl.org/)"\r
  77  *\r
  78  * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to\r
  79  *    endorse or promote products derived from this software without\r
  80  *    prior written permission. For written permission, please contact\r
  81  *    openssl-core@openssl.org.\r
  82  *\r
  83  * 5. Products derived from this software may not be called "OpenSSL"\r
  84  *    nor may "OpenSSL" appear in their names without prior written\r
  85  *    permission of the OpenSSL Project.\r
  86  *\r
  87  * 6. Redistributions of any form whatsoever must retain the following\r
  88  *    acknowledgment:\r
  89  *    "This product includes software developed by the OpenSSL Project\r
  90  *    for use in the OpenSSL Toolkit (http://www.openssl.org/)"\r
  91  *\r
  92  * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY\r
  93  * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE\r
  94  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR\r
  95  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE OpenSSL PROJECT OR\r
  96  * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,\r
  97  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT\r
  98  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;\r
  99  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)\r
 100  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,\r
 101  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)\r
 102  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED\r
 103  * OF THE POSSIBILITY OF SUCH DAMAGE.\r
 104  * ====================================================================\r
 105  *\r
 106  * This product includes cryptographic software written by Eric Young\r
 107  * (eay@cryptsoft.com).  This product includes software written by Tim\r
 108  * Hudson (tjh@cryptsoft.com).\r
 109  *\r
 110  */\r
 111 /* ====================================================================\r
 112  * Copyright 2002 Sun Microsystems, Inc. ALL RIGHTS RESERVED.\r
 113  *\r
 114  * Portions of the attached software ("Contribution") are developed by\r
 115  * SUN MICROSYSTEMS, INC., and are contributed to the OpenSSL project.\r
 116  *\r
 117  * The Contribution is licensed pursuant to the Eric Young open source\r
 118  * license provided above.\r
 119  *\r
 120  * The binary polynomial arithmetic software is originally written by\r
 121  * Sheueling Chang Shantz and Douglas Stebila of Sun Microsystems Laboratories.\r
 122  *\r
 123  */\r
 124 \r
 125 #ifndef HEADER_BN_H\r
 126 #define HEADER_BN_H\r
 127 \r
 128 #include <openssl/e_os2.h>\r
 129 #ifndef OPENSSL_NO_FP_API\r
 130 #include <stdio.h> /* FILE */\r
 131 #endif\r
 132 #include <openssl/ossl_typ.h>\r
 133 #include <openssl/crypto.h>\r
 134 \r
 135 #ifdef  __cplusplus\r
 136 extern "C" {\r
 137 #endif\r
 138 \r
 139 /* These preprocessor symbols control various aspects of the bignum headers and\r
 140  * library code. They're not defined by any "normal" configuration, as they are\r
 141  * intended for development and testing purposes. NB: defining all three can be\r
 142  * useful for debugging application code as well as openssl itself.\r
 143  *\r
 144  * BN_DEBUG - turn on various debugging alterations to the bignum code\r
 145  * BN_DEBUG_RAND - uses random poisoning of unused words to trip up\r
 146  * mismanagement of bignum internals. You must also define BN_DEBUG.\r
 147  */\r
 148 /* #define BN_DEBUG */\r
 149 /* #define BN_DEBUG_RAND */\r
 150 \r
 151 #ifndef OPENSSL_SMALL_FOOTPRINT\r
 152 #define BN_MUL_COMBA\r
 153 #define BN_SQR_COMBA\r
 154 #define BN_RECURSION\r
 155 #endif\r
 156 \r
 157 /* This next option uses the C libraries (2 word)/(1 word) function.\r
 158  * If it is not defined, I use my C version (which is slower).\r
 159  * The reason for this flag is that when the particular C compiler\r
 160  * library routine is used, and the library is linked with a different\r
 161  * compiler, the library is missing.  This mostly happens when the\r
 162  * library is built with gcc and then linked using normal cc.  This would\r
 163  * be a common occurrence because gcc normally produces code that is\r
 164  * 2 times faster than system compilers for the big number stuff.\r
 165  * For machines with only one compiler (or shared libraries), this should\r
 166  * be on.  Again this in only really a problem on machines\r
 167  * using "long long's", are 32bit, and are not using my assembler code. */\r
 168 #if defined(OPENSSL_SYS_MSDOS) || defined(OPENSSL_SYS_WINDOWS) || \\r
 169     defined(OPENSSL_SYS_WIN32) || defined(linux)\r
 170 # ifndef BN_DIV2W\r
 171 #  define BN_DIV2W\r
 172 # endif\r
 173 #endif\r
 174 \r
 175 /* assuming long is 64bit - this is the DEC Alpha\r
 176  * unsigned long long is only 64 bits :-(, don't define\r
 177  * BN_LLONG for the DEC Alpha */\r
 178 #ifdef SIXTY_FOUR_BIT_LONG\r
 179 #define BN_ULLONG       unsigned long long\r
 180 #define BN_ULONG        unsigned long\r
 181 #define BN_LONG         long\r
 182 #define BN_BITS         128\r
 183 #define BN_BYTES        8\r
 184 #define BN_BITS2        64\r
 185 #define BN_BITS4        32\r
 186 #define BN_MASK         (0xffffffffffffffffffffffffffffffffLL)\r
 187 #define BN_MASK2        (0xffffffffffffffffL)\r
 188 #define BN_MASK2l       (0xffffffffL)\r
 189 #define BN_MASK2h       (0xffffffff00000000L)\r
 190 #define BN_MASK2h1      (0xffffffff80000000L)\r
 191 #define BN_TBIT         (0x8000000000000000L)\r
 192 #define BN_DEC_CONV     (10000000000000000000UL)\r
 193 #define BN_DEC_FMT1     "%lu"\r
 194 #define BN_DEC_FMT2     "%019lu"\r
 195 #define BN_DEC_NUM      19\r
 196 #define BN_HEX_FMT1     "%lX"\r
 197 #define BN_HEX_FMT2     "%016lX"\r
 198 #endif\r
 199 \r
 200 /* This is where the long long data type is 64 bits, but long is 32.\r
 201  * For machines where there are 64bit registers, this is the mode to use.\r
 202  * IRIX, on R4000 and above should use this mode, along with the relevant\r
 203  * assembler code :-).  Do NOT define BN_LLONG.\r
 204  */\r
 205 #ifdef SIXTY_FOUR_BIT\r
 206 #undef BN_LLONG\r
 207 #undef BN_ULLONG\r
 208 #define BN_ULONG        unsigned long long\r
 209 #define BN_LONG         long long\r
 210 #define BN_BITS         128\r
 211 #define BN_BYTES        8\r
 212 #define BN_BITS2        64\r
 213 #define BN_BITS4        32\r
 214 #define BN_MASK2        (0xffffffffffffffffLL)\r
 215 #define BN_MASK2l       (0xffffffffL)\r
 216 #define BN_MASK2h       (0xffffffff00000000LL)\r
 217 #define BN_MASK2h1      (0xffffffff80000000LL)\r
 218 #define BN_TBIT         (0x8000000000000000LL)\r
 219 #define BN_DEC_CONV     (10000000000000000000ULL)\r
 220 #define BN_DEC_FMT1     "%llu"\r
 221 #define BN_DEC_FMT2     "%019llu"\r
 222 #define BN_DEC_NUM      19\r
 223 #define BN_HEX_FMT1     "%llX"\r
 224 #define BN_HEX_FMT2     "%016llX"\r
 225 #endif\r
 226 \r
 227 #ifdef THIRTY_TWO_BIT\r
 228 #ifdef BN_LLONG\r
 229 # if defined(_WIN32) && !defined(__GNUC__)\r
 230 #  define BN_ULLONG     unsigned __int64\r
 231 #  define BN_MASK       (0xffffffffffffffffI64)\r
 232 # else\r
 233 #  define BN_ULLONG     unsigned long long\r
 234 #  define BN_MASK       (0xffffffffffffffffLL)\r
 235 # endif\r
 236 #endif\r
 237 #define BN_ULONG        unsigned int\r
 238 #define BN_LONG         int\r
 239 #define BN_BITS         64\r
 240 #define BN_BYTES        4\r
 241 #define BN_BITS2        32\r
 242 #define BN_BITS4        16\r
 243 #define BN_MASK2        (0xffffffffL)\r
 244 #define BN_MASK2l       (0xffff)\r
 245 #define BN_MASK2h1      (0xffff8000L)\r
 246 #define BN_MASK2h       (0xffff0000L)\r
 247 #define BN_TBIT         (0x80000000L)\r
 248 #define BN_DEC_CONV     (1000000000L)\r
 249 #define BN_DEC_FMT1     "%u"\r
 250 #define BN_DEC_FMT2     "%09u"\r
 251 #define BN_DEC_NUM      9\r
 252 #define BN_HEX_FMT1     "%X"\r
 253 #define BN_HEX_FMT2     "%08X"\r
 254 #endif\r
 255 \r
 256 /* 2011-02-22 SMS.\r
 257  * In various places, a size_t variable or a type cast to size_t was\r
 258  * used to perform integer-only operations on pointers.  This failed on\r
 259  * VMS with 64-bit pointers (CC /POINTER_SIZE = 64) because size_t is\r
 260  * still only 32 bits.  What's needed in these cases is an integer type\r
 261  * with the same size as a pointer, which size_t is not certain to be.\r
 262  * The only fix here is VMS-specific.\r
 263  */\r
 264 #if defined(OPENSSL_SYS_VMS)\r
 265 # if __INITIAL_POINTER_SIZE == 64\r
 266 #  define PTR_SIZE_INT long long\r
 267 # else /* __INITIAL_POINTER_SIZE == 64 */\r
 268 #  define PTR_SIZE_INT int\r
 269 # endif /* __INITIAL_POINTER_SIZE == 64 [else] */\r
 270 #else /* defined(OPENSSL_SYS_VMS) */\r
 271 # define PTR_SIZE_INT size_t\r
 272 #endif /* defined(OPENSSL_SYS_VMS) [else] */\r
 273 \r
 274 #define BN_DEFAULT_BITS 1280\r
 275 \r
 276 #define BN_FLG_MALLOCED         0x01\r
 277 #define BN_FLG_STATIC_DATA      0x02\r
 278 #define BN_FLG_CONSTTIME        0x04 /* avoid leaking exponent information through timing,\r
 279                                       * BN_mod_exp_mont() will call BN_mod_exp_mont_consttime,\r
 280                                       * BN_div() will call BN_div_no_branch,\r
 281                                       * BN_mod_inverse() will call BN_mod_inverse_no_branch.\r
 282                                       */\r
 283 \r
 284 #ifndef OPENSSL_NO_DEPRECATED\r
 285 #define BN_FLG_EXP_CONSTTIME BN_FLG_CONSTTIME /* deprecated name for the flag */\r
 286                                       /* avoid leaking exponent information through timings\r
 287                                       * (BN_mod_exp_mont() will call BN_mod_exp_mont_consttime) */\r
 288 #endif\r
 289 \r
 290 #ifndef OPENSSL_NO_DEPRECATED\r
 291 #define BN_FLG_FREE             0x8000  /* used for debuging */\r
 292 #endif\r
 293 #define BN_set_flags(b,n)       ((b)->flags|=(n))\r
 294 #define BN_get_flags(b,n)       ((b)->flags&(n))\r
 295 \r
 296 /* get a clone of a BIGNUM with changed flags, for *temporary* use only\r
 297  * (the two BIGNUMs cannot not be used in parallel!) */\r
 298 #define BN_with_flags(dest,b,n)  ((dest)->d=(b)->d, \\r
 299                                   (dest)->top=(b)->top, \\r
 300                                   (dest)->dmax=(b)->dmax, \\r
 301                                   (dest)->neg=(b)->neg, \\r
 302                                   (dest)->flags=(((dest)->flags & BN_FLG_MALLOCED) \\r
 303                                                  |  ((b)->flags & ~BN_FLG_MALLOCED) \\r
 304                                                  |  BN_FLG_STATIC_DATA \\r
 305                                                  |  (n)))\r
 306 \r
 307 /* Already declared in ossl_typ.h */\r
 308 #if 0\r
 309 typedef struct bignum_st BIGNUM;\r
 310 /* Used for temp variables (declaration hidden in bn_lcl.h) */\r
 311 typedef struct bignum_ctx BN_CTX;\r
 312 typedef struct bn_blinding_st BN_BLINDING;\r
 313 typedef struct bn_mont_ctx_st BN_MONT_CTX;\r
 314 typedef struct bn_recp_ctx_st BN_RECP_CTX;\r
 315 typedef struct bn_gencb_st BN_GENCB;\r
 316 #endif\r
 317 \r
 318 struct bignum_st\r
 319         {\r
 320         BN_ULONG *d;    /* Pointer to an array of 'BN_BITS2' bit chunks. */\r
 321         int top;        /* Index of last used d +1. */\r
 322         /* The next are internal book keeping for bn_expand. */\r
 323         int dmax;       /* Size of the d array. */\r
 324         int neg;        /* one if the number is negative */\r
 325         int flags;\r
 326         };\r
 327 \r
 328 /* Used for montgomery multiplication */\r
 329 struct bn_mont_ctx_st\r
 330         {\r
 331         int ri;        /* number of bits in R */\r
 332         BIGNUM RR;     /* used to convert to montgomery form */\r
 333         BIGNUM N;      /* The modulus */\r
 334         BIGNUM Ni;     /* R*(1/R mod N) - N*Ni = 1\r
 335                         * (Ni is only stored for bignum algorithm) */\r
 336         BN_ULONG n0[2];/* least significant word(s) of Ni;\r
 337                           (type changed with 0.9.9, was "BN_ULONG n0;" before) */\r
 338         int flags;\r
 339         };\r
 340 \r
 341 /* Used for reciprocal division/mod functions\r
 342  * It cannot be shared between threads\r
 343  */\r
 344 struct bn_recp_ctx_st\r
 345         {\r
 346         BIGNUM N;       /* the divisor */\r
 347         BIGNUM Nr;      /* the reciprocal */\r
 348         int num_bits;\r
 349         int shift;\r
 350         int flags;\r
 351         };\r
 352 \r
 353 /* Used for slow "generation" functions. */\r
 354 struct bn_gencb_st\r
 355         {\r
 356         unsigned int ver;       /* To handle binary (in)compatibility */\r
 357         void *arg;              /* callback-specific data */\r
 358         union\r
 359                 {\r
 360                 /* if(ver==1) - handles old style callbacks */\r
 361                 void (*cb_1)(int, int, void *);\r
 362                 /* if(ver==2) - new callback style */\r
 363                 int (*cb_2)(int, int, BN_GENCB *);\r
 364                 } cb;\r
 365         };\r
 366 /* Wrapper function to make using BN_GENCB easier,  */\r
 367 int BN_GENCB_call(BN_GENCB *cb, int a, int b);\r
 368 /* Macro to populate a BN_GENCB structure with an "old"-style callback */\r
 369 #define BN_GENCB_set_old(gencb, callback, cb_arg) { \\r
 370                 BN_GENCB *tmp_gencb = (gencb); \\r
 371                 tmp_gencb->ver = 1; \\r
 372                 tmp_gencb->arg = (cb_arg); \\r
 373                 tmp_gencb->cb.cb_1 = (callback); }\r
 374 /* Macro to populate a BN_GENCB structure with a "new"-style callback */\r
 375 #define BN_GENCB_set(gencb, callback, cb_arg) { \\r
 376                 BN_GENCB *tmp_gencb = (gencb); \\r
 377                 tmp_gencb->ver = 2; \\r
 378                 tmp_gencb->arg = (cb_arg); \\r
 379                 tmp_gencb->cb.cb_2 = (callback); }\r
 380 \r
 381 #define BN_prime_checks 0 /* default: select number of iterations\r
 382                              based on the size of the number */\r
 383 \r
 384 /* number of Miller-Rabin iterations for an error rate  of less than 2^-80\r
 385  * for random 'b'-bit input, b >= 100 (taken from table 4.4 in the Handbook\r
 386  * of Applied Cryptography [Menezes, van Oorschot, Vanstone; CRC Press 1996];\r
 387  * original paper: Damgaard, Landrock, Pomerance: Average case error estimates\r
 388  * for the strong probable prime test. -- Math. Comp. 61 (1993) 177-194) */\r
 389 #define BN_prime_checks_for_size(b) ((b) >= 1300 ?  2 : \\r
 390                                 (b) >=  850 ?  3 : \\r
 391                                 (b) >=  650 ?  4 : \\r
 392                                 (b) >=  550 ?  5 : \\r
 393                                 (b) >=  450 ?  6 : \\r
 394                                 (b) >=  400 ?  7 : \\r
 395                                 (b) >=  350 ?  8 : \\r
 396                                 (b) >=  300 ?  9 : \\r
 397                                 (b) >=  250 ? 12 : \\r
 398                                 (b) >=  200 ? 15 : \\r
 399                                 (b) >=  150 ? 18 : \\r
 400                                 /* b >= 100 */ 27)\r
 401 \r
 402 #define BN_num_bytes(a) ((BN_num_bits(a)+7)/8)\r
 403 \r
 404 /* Note that BN_abs_is_word didn't work reliably for w == 0 until 0.9.8 */\r
 405 #define BN_abs_is_word(a,w) ((((a)->top == 1) && ((a)->d[0] == (BN_ULONG)(w))) || \\r
 406                                 (((w) == 0) && ((a)->top == 0)))\r
 407 #define BN_is_zero(a)       ((a)->top == 0)\r
 408 #define BN_is_one(a)        (BN_abs_is_word((a),1) && !(a)->neg)\r
 409 #define BN_is_word(a,w)     (BN_abs_is_word((a),(w)) && (!(w) || !(a)->neg))\r
 410 #define BN_is_odd(a)        (((a)->top > 0) && ((a)->d[0] & 1))\r
 411 \r
 412 #define BN_one(a)       (BN_set_word((a),1))\r
 413 #define BN_zero_ex(a) \\r
 414         do { \\r
 415                 BIGNUM *_tmp_bn = (a); \\r
 416                 _tmp_bn->top = 0; \\r
 417                 _tmp_bn->neg = 0; \\r
 418         } while(0)\r
 419 #ifdef OPENSSL_NO_DEPRECATED\r
 420 #define BN_zero(a)      BN_zero_ex(a)\r
 421 #else\r
 422 #define BN_zero(a)      (BN_set_word((a),0))\r
 423 #endif\r
 424 \r
 425 const BIGNUM *BN_value_one(void);\r
 426 char *  BN_options(void);\r
 427 BN_CTX *BN_CTX_new(void);\r
 428 #ifndef OPENSSL_NO_DEPRECATED\r
 429 void    BN_CTX_init(BN_CTX *c);\r
 430 #endif\r
 431 void    BN_CTX_free(BN_CTX *c);\r
 432 void    BN_CTX_start(BN_CTX *ctx);\r
 433 BIGNUM *BN_CTX_get(BN_CTX *ctx);\r
 434 void    BN_CTX_end(BN_CTX *ctx);\r
 435 int     BN_rand(BIGNUM *rnd, int bits, int top,int bottom);\r
 436 int     BN_pseudo_rand(BIGNUM *rnd, int bits, int top,int bottom);\r
 437 int     BN_rand_range(BIGNUM *rnd, const BIGNUM *range);\r
 438 int     BN_pseudo_rand_range(BIGNUM *rnd, const BIGNUM *range);\r
 439 int     BN_num_bits(const BIGNUM *a);\r
 440 int     BN_num_bits_word(BN_ULONG);\r
 441 BIGNUM *BN_new(void);\r
 442 void    BN_init(BIGNUM *);\r
 443 void    BN_clear_free(BIGNUM *a);\r
 444 BIGNUM *BN_copy(BIGNUM *a, const BIGNUM *b);\r
 445 void    BN_swap(BIGNUM *a, BIGNUM *b);\r
 446 BIGNUM *BN_bin2bn(const unsigned char *s,int len,BIGNUM *ret);\r
 447 int     BN_bn2bin(const BIGNUM *a, unsigned char *to);\r
 448 BIGNUM *BN_mpi2bn(const unsigned char *s,int len,BIGNUM *ret);\r
 449 int     BN_bn2mpi(const BIGNUM *a, unsigned char *to);\r
 450 int     BN_sub(BIGNUM *r, const BIGNUM *a, const BIGNUM *b);\r
 451 int     BN_usub(BIGNUM *r, const BIGNUM *a, const BIGNUM *b);\r
 452 int     BN_uadd(BIGNUM *r, const BIGNUM *a, const BIGNUM *b);\r
 453 int     BN_add(BIGNUM *r, const BIGNUM *a, const BIGNUM *b);\r
 454 int     BN_mul(BIGNUM *r, const BIGNUM *a, const BIGNUM *b, BN_CTX *ctx);\r
 455 int     BN_sqr(BIGNUM *r, const BIGNUM *a,BN_CTX *ctx);\r
 456 /** BN_set_negative sets sign of a BIGNUM\r
 457  * \param  b  pointer to the BIGNUM object\r
 458  * \param  n  0 if the BIGNUM b should be positive and a value != 0 otherwise\r
 459  */\r
 460 void    BN_set_negative(BIGNUM *b, int n);\r
 461 /** BN_is_negative returns 1 if the BIGNUM is negative\r
 462  * \param  a  pointer to the BIGNUM object\r
 463  * \return 1 if a < 0 and 0 otherwise\r
 464  */\r
 465 #define BN_is_negative(a) ((a)->neg != 0)\r
 466 \r
 467 int     BN_div(BIGNUM *dv, BIGNUM *rem, const BIGNUM *m, const BIGNUM *d,\r
 468         BN_CTX *ctx);\r
 469 #define BN_mod(rem,m,d,ctx) BN_div(NULL,(rem),(m),(d),(ctx))\r
 470 int     BN_nnmod(BIGNUM *r, const BIGNUM *m, const BIGNUM *d, BN_CTX *ctx);\r
 471 int     BN_mod_add(BIGNUM *r, const BIGNUM *a, const BIGNUM *b, const BIGNUM *m, BN_CTX *ctx);\r
 472 int     BN_mod_add_quick(BIGNUM *r, const BIGNUM *a, const BIGNUM *b, const BIGNUM *m);\r
 473 int     BN_mod_sub(BIGNUM *r, const BIGNUM *a, const BIGNUM *b, const BIGNUM *m, BN_CTX *ctx);\r
 474 int     BN_mod_sub_quick(BIGNUM *r, const BIGNUM *a, const BIGNUM *b, const BIGNUM *m);\r
 475 int     BN_mod_mul(BIGNUM *r, const BIGNUM *a, const BIGNUM *b,\r
 476         const BIGNUM *m, BN_CTX *ctx);\r
 477 int     BN_mod_sqr(BIGNUM *r, const BIGNUM *a, const BIGNUM *m, BN_CTX *ctx);\r
 478 int     BN_mod_lshift1(BIGNUM *r, const BIGNUM *a, const BIGNUM *m, BN_CTX *ctx);\r
 479 int     BN_mod_lshift1_quick(BIGNUM *r, const BIGNUM *a, const BIGNUM *m);\r
 480 int     BN_mod_lshift(BIGNUM *r, const BIGNUM *a, int n, const BIGNUM *m, BN_CTX *ctx);\r
 481 int     BN_mod_lshift_quick(BIGNUM *r, const BIGNUM *a, int n, const BIGNUM *m);\r
 482 \r
 483 BN_ULONG BN_mod_word(const BIGNUM *a, BN_ULONG w);\r
 484 BN_ULONG BN_div_word(BIGNUM *a, BN_ULONG w);\r
 485 int     BN_mul_word(BIGNUM *a, BN_ULONG w);\r
 486 int     BN_add_word(BIGNUM *a, BN_ULONG w);\r
 487 int     BN_sub_word(BIGNUM *a, BN_ULONG w);\r
 488 int     BN_set_word(BIGNUM *a, BN_ULONG w);\r
 489 BN_ULONG BN_get_word(const BIGNUM *a);\r
 490 \r
 491 int     BN_cmp(const BIGNUM *a, const BIGNUM *b);\r
 492 void    BN_free(BIGNUM *a);\r
 493 int     BN_is_bit_set(const BIGNUM *a, int n);\r
 494 int     BN_lshift(BIGNUM *r, const BIGNUM *a, int n);\r
 495 int     BN_lshift1(BIGNUM *r, const BIGNUM *a);\r
 496 int     BN_exp(BIGNUM *r, const BIGNUM *a, const BIGNUM *p,BN_CTX *ctx);\r
 497 \r
 498 int     BN_mod_exp(BIGNUM *r, const BIGNUM *a, const BIGNUM *p,\r
 499         const BIGNUM *m,BN_CTX *ctx);\r
 500 int     BN_mod_exp_mont(BIGNUM *r, const BIGNUM *a, const BIGNUM *p,\r
 501         const BIGNUM *m, BN_CTX *ctx, BN_MONT_CTX *m_ctx);\r
 502 int BN_mod_exp_mont_consttime(BIGNUM *rr, const BIGNUM *a, const BIGNUM *p,\r
 503         const BIGNUM *m, BN_CTX *ctx, BN_MONT_CTX *in_mont);\r
 504 int     BN_mod_exp_mont_word(BIGNUM *r, BN_ULONG a, const BIGNUM *p,\r
 505         const BIGNUM *m, BN_CTX *ctx, BN_MONT_CTX *m_ctx);\r
 506 int     BN_mod_exp2_mont(BIGNUM *r, const BIGNUM *a1, const BIGNUM *p1,\r
 507         const BIGNUM *a2, const BIGNUM *p2,const BIGNUM *m,\r
 508         BN_CTX *ctx,BN_MONT_CTX *m_ctx);\r
 509 int     BN_mod_exp_simple(BIGNUM *r, const BIGNUM *a, const BIGNUM *p,\r
 510         const BIGNUM *m,BN_CTX *ctx);\r
 511 \r
 512 int     BN_mask_bits(BIGNUM *a,int n);\r
 513 #ifndef OPENSSL_NO_FP_API\r
 514 int     BN_print_fp(FILE *fp, const BIGNUM *a);\r
 515 #endif\r
 516 #ifdef HEADER_BIO_H\r
 517 int     BN_print(BIO *fp, const BIGNUM *a);\r
 518 #else\r
 519 int     BN_print(void *fp, const BIGNUM *a);\r
 520 #endif\r
 521 int     BN_reciprocal(BIGNUM *r, const BIGNUM *m, int len, BN_CTX *ctx);\r
 522 int     BN_rshift(BIGNUM *r, const BIGNUM *a, int n);\r
 523 int     BN_rshift1(BIGNUM *r, const BIGNUM *a);\r
 524 void    BN_clear(BIGNUM *a);\r
 525 BIGNUM *BN_dup(const BIGNUM *a);\r
 526 int     BN_ucmp(const BIGNUM *a, const BIGNUM *b);\r
 527 int     BN_set_bit(BIGNUM *a, int n);\r
 528 int     BN_clear_bit(BIGNUM *a, int n);\r
 529 char *  BN_bn2hex(const BIGNUM *a);\r
 530 char *  BN_bn2dec(const BIGNUM *a);\r
 531 int     BN_hex2bn(BIGNUM **a, const char *str);\r
 532 int     BN_dec2bn(BIGNUM **a, const char *str);\r
 533 int     BN_asc2bn(BIGNUM **a, const char *str);\r
 534 int     BN_gcd(BIGNUM *r,const BIGNUM *a,const BIGNUM *b,BN_CTX *ctx);\r
 535 int     BN_kronecker(const BIGNUM *a,const BIGNUM *b,BN_CTX *ctx); /* returns -2 for error */\r
 536 BIGNUM *BN_mod_inverse(BIGNUM *ret,\r
 537         const BIGNUM *a, const BIGNUM *n,BN_CTX *ctx);\r
 538 BIGNUM *BN_mod_sqrt(BIGNUM *ret,\r
 539         const BIGNUM *a, const BIGNUM *n,BN_CTX *ctx);\r
 540 \r
 541 /* Deprecated versions */\r
 542 #ifndef OPENSSL_NO_DEPRECATED\r
 543 BIGNUM *BN_generate_prime(BIGNUM *ret,int bits,int safe,\r
 544         const BIGNUM *add, const BIGNUM *rem,\r
 545         void (*callback)(int,int,void *),void *cb_arg);\r
 546 int     BN_is_prime(const BIGNUM *p,int nchecks,\r
 547         void (*callback)(int,int,void *),\r
 548         BN_CTX *ctx,void *cb_arg);\r
 549 int     BN_is_prime_fasttest(const BIGNUM *p,int nchecks,\r
 550         void (*callback)(int,int,void *),BN_CTX *ctx,void *cb_arg,\r
 551         int do_trial_division);\r
 552 #endif /* !defined(OPENSSL_NO_DEPRECATED) */\r
 553 \r
 554 /* Newer versions */\r
 555 int     BN_generate_prime_ex(BIGNUM *ret,int bits,int safe, const BIGNUM *add,\r
 556                 const BIGNUM *rem, BN_GENCB *cb);\r
 557 int     BN_is_prime_ex(const BIGNUM *p,int nchecks, BN_CTX *ctx, BN_GENCB *cb);\r
 558 int     BN_is_prime_fasttest_ex(const BIGNUM *p,int nchecks, BN_CTX *ctx,\r
 559                 int do_trial_division, BN_GENCB *cb);\r
 560 \r
 561 BN_MONT_CTX *BN_MONT_CTX_new(void );\r
 562 void BN_MONT_CTX_init(BN_MONT_CTX *ctx);\r
 563 int BN_mod_mul_montgomery(BIGNUM *r,const BIGNUM *a,const BIGNUM *b,\r
 564         BN_MONT_CTX *mont, BN_CTX *ctx);\r
 565 #define BN_to_montgomery(r,a,mont,ctx)  BN_mod_mul_montgomery(\\r
 566         (r),(a),&((mont)->RR),(mont),(ctx))\r
 567 int BN_from_montgomery(BIGNUM *r,const BIGNUM *a,\r
 568         BN_MONT_CTX *mont, BN_CTX *ctx);\r
 569 void BN_MONT_CTX_free(BN_MONT_CTX *mont);\r
 570 int BN_MONT_CTX_set(BN_MONT_CTX *mont,const BIGNUM *mod,BN_CTX *ctx);\r
 571 BN_MONT_CTX *BN_MONT_CTX_copy(BN_MONT_CTX *to,BN_MONT_CTX *from);\r
 572 BN_MONT_CTX *BN_MONT_CTX_set_locked(BN_MONT_CTX **pmont, int lock,\r
 573                                         const BIGNUM *mod, BN_CTX *ctx);\r
 574 \r
 575 /* BN_BLINDING flags */\r
 576 #define BN_BLINDING_NO_UPDATE   0x00000001\r
 577 #define BN_BLINDING_NO_RECREATE 0x00000002\r
 578 \r
 579 BN_BLINDING *BN_BLINDING_new(const BIGNUM *A, const BIGNUM *Ai, BIGNUM *mod);\r
 580 void BN_BLINDING_free(BN_BLINDING *b);\r
 581 int BN_BLINDING_update(BN_BLINDING *b,BN_CTX *ctx);\r
 582 int BN_BLINDING_convert(BIGNUM *n, BN_BLINDING *b, BN_CTX *ctx);\r
 583 int BN_BLINDING_invert(BIGNUM *n, BN_BLINDING *b, BN_CTX *ctx);\r
 584 int BN_BLINDING_convert_ex(BIGNUM *n, BIGNUM *r, BN_BLINDING *b, BN_CTX *);\r
 585 int BN_BLINDING_invert_ex(BIGNUM *n, const BIGNUM *r, BN_BLINDING *b, BN_CTX *);\r
 586 #ifndef OPENSSL_NO_DEPRECATED\r
 587 unsigned long BN_BLINDING_get_thread_id(const BN_BLINDING *);\r
 588 void BN_BLINDING_set_thread_id(BN_BLINDING *, unsigned long);\r
 589 #endif\r
 590 CRYPTO_THREADID *BN_BLINDING_thread_id(BN_BLINDING *);\r
 591 unsigned long BN_BLINDING_get_flags(const BN_BLINDING *);\r
 592 void BN_BLINDING_set_flags(BN_BLINDING *, unsigned long);\r
 593 BN_BLINDING *BN_BLINDING_create_param(BN_BLINDING *b,\r
 594         const BIGNUM *e, BIGNUM *m, BN_CTX *ctx,\r
 595         int (*bn_mod_exp)(BIGNUM *r, const BIGNUM *a, const BIGNUM *p,\r
 596                           const BIGNUM *m, BN_CTX *ctx, BN_MONT_CTX *m_ctx),\r
 597         BN_MONT_CTX *m_ctx);\r
 598 \r
 599 #ifndef OPENSSL_NO_DEPRECATED\r
 600 void BN_set_params(int mul,int high,int low,int mont);\r
 601 int BN_get_params(int which); /* 0, mul, 1 high, 2 low, 3 mont */\r
 602 #endif\r
 603 \r
 604 void    BN_RECP_CTX_init(BN_RECP_CTX *recp);\r
 605 BN_RECP_CTX *BN_RECP_CTX_new(void);\r
 606 void    BN_RECP_CTX_free(BN_RECP_CTX *recp);\r
 607 int     BN_RECP_CTX_set(BN_RECP_CTX *recp,const BIGNUM *rdiv,BN_CTX *ctx);\r
 608 int     BN_mod_mul_reciprocal(BIGNUM *r, const BIGNUM *x, const BIGNUM *y,\r
 609         BN_RECP_CTX *recp,BN_CTX *ctx);\r
 610 int     BN_mod_exp_recp(BIGNUM *r, const BIGNUM *a, const BIGNUM *p,\r
 611         const BIGNUM *m, BN_CTX *ctx);\r
 612 int     BN_div_recp(BIGNUM *dv, BIGNUM *rem, const BIGNUM *m,\r
 613         BN_RECP_CTX *recp, BN_CTX *ctx);\r
 614 \r
 615 /* Functions for arithmetic over binary polynomials represented by BIGNUMs.\r
 616  *\r
 617  * The BIGNUM::neg property of BIGNUMs representing binary polynomials is\r
 618  * ignored.\r
 619  *\r
 620  * Note that input arguments are not const so that their bit arrays can\r
 621  * be expanded to the appropriate size if needed.\r
 622  */\r
 623 \r
 624 int     BN_GF2m_add(BIGNUM *r, const BIGNUM *a, const BIGNUM *b); /*r = a + b*/\r
 625 #define BN_GF2m_sub(r, a, b) BN_GF2m_add(r, a, b)\r
 626 int     BN_GF2m_mod(BIGNUM *r, const BIGNUM *a, const BIGNUM *p); /*r=a mod p*/\r
 627 int     BN_GF2m_mod_mul(BIGNUM *r, const BIGNUM *a, const BIGNUM *b,\r
 628         const BIGNUM *p, BN_CTX *ctx); /* r = (a * b) mod p */\r
 629 int     BN_GF2m_mod_sqr(BIGNUM *r, const BIGNUM *a, const BIGNUM *p,\r
 630         BN_CTX *ctx); /* r = (a * a) mod p */\r
 631 int     BN_GF2m_mod_inv(BIGNUM *r, const BIGNUM *b, const BIGNUM *p,\r
 632         BN_CTX *ctx); /* r = (1 / b) mod p */\r
 633 int     BN_GF2m_mod_div(BIGNUM *r, const BIGNUM *a, const BIGNUM *b,\r
 634         const BIGNUM *p, BN_CTX *ctx); /* r = (a / b) mod p */\r
 635 int     BN_GF2m_mod_exp(BIGNUM *r, const BIGNUM *a, const BIGNUM *b,\r
 636         const BIGNUM *p, BN_CTX *ctx); /* r = (a ^ b) mod p */\r
 637 int     BN_GF2m_mod_sqrt(BIGNUM *r, const BIGNUM *a, const BIGNUM *p,\r
 638         BN_CTX *ctx); /* r = sqrt(a) mod p */\r
 639 int     BN_GF2m_mod_solve_quad(BIGNUM *r, const BIGNUM *a, const BIGNUM *p,\r
 640         BN_CTX *ctx); /* r^2 + r = a mod p */\r
 641 #define BN_GF2m_cmp(a, b) BN_ucmp((a), (b))\r
 642 /* Some functions allow for representation of the irreducible polynomials\r
 643  * as an unsigned int[], say p.  The irreducible f(t) is then of the form:\r
 644  *     t^p[0] + t^p[1] + ... + t^p[k]\r
 645  * where m = p[0] > p[1] > ... > p[k] = 0.\r
 646  */\r
 647 int     BN_GF2m_mod_arr(BIGNUM *r, const BIGNUM *a, const int p[]);\r
 648         /* r = a mod p */\r
 649 int     BN_GF2m_mod_mul_arr(BIGNUM *r, const BIGNUM *a, const BIGNUM *b,\r
 650         const int p[], BN_CTX *ctx); /* r = (a * b) mod p */\r
 651 int     BN_GF2m_mod_sqr_arr(BIGNUM *r, const BIGNUM *a, const int p[],\r
 652         BN_CTX *ctx); /* r = (a * a) mod p */\r
 653 int     BN_GF2m_mod_inv_arr(BIGNUM *r, const BIGNUM *b, const int p[],\r
 654         BN_CTX *ctx); /* r = (1 / b) mod p */\r
 655 int     BN_GF2m_mod_div_arr(BIGNUM *r, const BIGNUM *a, const BIGNUM *b,\r
 656         const int p[], BN_CTX *ctx); /* r = (a / b) mod p */\r
 657 int     BN_GF2m_mod_exp_arr(BIGNUM *r, const BIGNUM *a, const BIGNUM *b,\r
 658         const int p[], BN_CTX *ctx); /* r = (a ^ b) mod p */\r
 659 int     BN_GF2m_mod_sqrt_arr(BIGNUM *r, const BIGNUM *a,\r
 660         const int p[], BN_CTX *ctx); /* r = sqrt(a) mod p */\r
 661 int     BN_GF2m_mod_solve_quad_arr(BIGNUM *r, const BIGNUM *a,\r
 662         const int p[], BN_CTX *ctx); /* r^2 + r = a mod p */\r
 663 int     BN_GF2m_poly2arr(const BIGNUM *a, int p[], int max);\r
 664 int     BN_GF2m_arr2poly(const int p[], BIGNUM *a);\r
 665 \r
 666 /* faster mod functions for the 'NIST primes'\r
 667  * 0 <= a < p^2 */\r
 668 int BN_nist_mod_192(BIGNUM *r, const BIGNUM *a, const BIGNUM *p, BN_CTX *ctx);\r
 669 int BN_nist_mod_224(BIGNUM *r, const BIGNUM *a, const BIGNUM *p, BN_CTX *ctx);\r
 670 int BN_nist_mod_256(BIGNUM *r, const BIGNUM *a, const BIGNUM *p, BN_CTX *ctx);\r
 671 int BN_nist_mod_384(BIGNUM *r, const BIGNUM *a, const BIGNUM *p, BN_CTX *ctx);\r
 672 int BN_nist_mod_521(BIGNUM *r, const BIGNUM *a, const BIGNUM *p, BN_CTX *ctx);\r
 673 \r
 674 const BIGNUM *BN_get0_nist_prime_192(void);\r
 675 const BIGNUM *BN_get0_nist_prime_224(void);\r
 676 const BIGNUM *BN_get0_nist_prime_256(void);\r
 677 const BIGNUM *BN_get0_nist_prime_384(void);\r
 678 const BIGNUM *BN_get0_nist_prime_521(void);\r
 679 \r
 680 /* library internal functions */\r
 681 \r
 682 #define bn_expand(a,bits) ((((((bits+BN_BITS2-1))/BN_BITS2)) <= (a)->dmax)?\\r
 683         (a):bn_expand2((a),(bits+BN_BITS2-1)/BN_BITS2))\r
 684 #define bn_wexpand(a,words) (((words) <= (a)->dmax)?(a):bn_expand2((a),(words)))\r
 685 BIGNUM *bn_expand2(BIGNUM *a, int words);\r
 686 #ifndef OPENSSL_NO_DEPRECATED\r
 687 BIGNUM *bn_dup_expand(const BIGNUM *a, int words); /* unused */\r
 688 #endif\r
 689 \r
 690 /* Bignum consistency macros\r
 691  * There is one "API" macro, bn_fix_top(), for stripping leading zeroes from\r
 692  * bignum data after direct manipulations on the data. There is also an\r
 693  * "internal" macro, bn_check_top(), for verifying that there are no leading\r
 694  * zeroes. Unfortunately, some auditing is required due to the fact that\r
 695  * bn_fix_top() has become an overabused duct-tape because bignum data is\r
 696  * occasionally passed around in an inconsistent state. So the following\r
 697  * changes have been made to sort this out;\r
 698  * - bn_fix_top()s implementation has been moved to bn_correct_top()\r
 699  * - if BN_DEBUG isn't defined, bn_fix_top() maps to bn_correct_top(), and\r
 700  *   bn_check_top() is as before.\r
 701  * - if BN_DEBUG *is* defined;\r
 702  *   - bn_check_top() tries to pollute unused words even if the bignum 'top' is\r
 703  *     consistent. (ed: only if BN_DEBUG_RAND is defined)\r
 704  *   - bn_fix_top() maps to bn_check_top() rather than "fixing" anything.\r
 705  * The idea is to have debug builds flag up inconsistent bignums when they\r
 706  * occur. If that occurs in a bn_fix_top(), we examine the code in question; if\r
 707  * the use of bn_fix_top() was appropriate (ie. it follows directly after code\r
 708  * that manipulates the bignum) it is converted to bn_correct_top(), and if it\r
 709  * was not appropriate, we convert it permanently to bn_check_top() and track\r
 710  * down the cause of the bug. Eventually, no internal code should be using the\r
 711  * bn_fix_top() macro. External applications and libraries should try this with\r
 712  * their own code too, both in terms of building against the openssl headers\r
 713  * with BN_DEBUG defined *and* linking with a version of OpenSSL built with it\r
 714  * defined. This not only improves external code, it provides more test\r
 715  * coverage for openssl's own code.\r
 716  */\r
 717 \r
 718 #ifdef BN_DEBUG\r
 719 \r
 720 /* We only need assert() when debugging */\r
 721 #include <assert.h>\r
 722 \r
 723 #ifdef BN_DEBUG_RAND\r
 724 /* To avoid "make update" cvs wars due to BN_DEBUG, use some tricks */\r
 725 #ifndef RAND_pseudo_bytes\r
 726 int RAND_pseudo_bytes(unsigned char *buf,int num);\r
 727 #define BN_DEBUG_TRIX\r
 728 #endif\r
 729 #define bn_pollute(a) \\r
 730         do { \\r
 731                 const BIGNUM *_bnum1 = (a); \\r
 732                 if(_bnum1->top < _bnum1->dmax) { \\r
 733                         unsigned char _tmp_char; \\r
 734                         /* We cast away const without the compiler knowing, any \\r
 735                          * *genuinely* constant variables that aren't mutable \\r
 736                          * wouldn't be constructed with top!=dmax. */ \\r
 737                         BN_ULONG *_not_const; \\r
 738                         memcpy(&_not_const, &_bnum1->d, sizeof(BN_ULONG*)); \\r
 739                         RAND_pseudo_bytes(&_tmp_char, 1); \\r
 740                         memset((unsigned char *)(_not_const + _bnum1->top), _tmp_char, \\r
 741                                 (_bnum1->dmax - _bnum1->top) * sizeof(BN_ULONG)); \\r
 742                 } \\r
 743         } while(0)\r
 744 #ifdef BN_DEBUG_TRIX\r
 745 #undef RAND_pseudo_bytes\r
 746 #endif\r
 747 #else\r
 748 #define bn_pollute(a)\r
 749 #endif\r
 750 #define bn_check_top(a) \\r
 751         do { \\r
 752                 const BIGNUM *_bnum2 = (a); \\r
 753                 if (_bnum2 != NULL) { \\r
 754                         assert((_bnum2->top == 0) || \\r
 755                                 (_bnum2->d[_bnum2->top - 1] != 0)); \\r
 756                         bn_pollute(_bnum2); \\r
 757                 } \\r
 758         } while(0)\r
 759 \r
 760 #define bn_fix_top(a)           bn_check_top(a)\r
 761 \r
 762 #else /* !BN_DEBUG */\r
 763 \r
 764 #define bn_pollute(a)\r
 765 #define bn_check_top(a)\r
 766 #define bn_fix_top(a)           bn_correct_top(a)\r
 767 \r
 768 #endif\r
 769 \r
 770 #define bn_correct_top(a) \\r
 771         { \\r
 772         BN_ULONG *ftl; \\r
 773         int tmp_top = (a)->top; \\r
 774         if (tmp_top > 0) \\r
 775                 { \\r
 776                 for (ftl= &((a)->d[tmp_top-1]); tmp_top > 0; tmp_top--) \\r
 777                         if (*(ftl--)) break; \\r
 778                 (a)->top = tmp_top; \\r
 779                 } \\r
 780         bn_pollute(a); \\r
 781         }\r
 782 \r
 783 BN_ULONG bn_mul_add_words(BN_ULONG *rp, const BN_ULONG *ap, int num, BN_ULONG w);\r
 784 BN_ULONG bn_mul_words(BN_ULONG *rp, const BN_ULONG *ap, int num, BN_ULONG w);\r
 785 void     bn_sqr_words(BN_ULONG *rp, const BN_ULONG *ap, int num);\r
 786 BN_ULONG bn_div_words(BN_ULONG h, BN_ULONG l, BN_ULONG d);\r
 787 BN_ULONG bn_add_words(BN_ULONG *rp, const BN_ULONG *ap, const BN_ULONG *bp,int num);\r
 788 BN_ULONG bn_sub_words(BN_ULONG *rp, const BN_ULONG *ap, const BN_ULONG *bp,int num);\r
 789 \r
 790 /* Primes from RFC 2409 */\r
 791 BIGNUM *get_rfc2409_prime_768(BIGNUM *bn);\r
 792 BIGNUM *get_rfc2409_prime_1024(BIGNUM *bn);\r
 793 \r
 794 /* Primes from RFC 3526 */\r
 795 BIGNUM *get_rfc3526_prime_1536(BIGNUM *bn);\r
 796 BIGNUM *get_rfc3526_prime_2048(BIGNUM *bn);\r
 797 BIGNUM *get_rfc3526_prime_3072(BIGNUM *bn);\r
 798 BIGNUM *get_rfc3526_prime_4096(BIGNUM *bn);\r
 799 BIGNUM *get_rfc3526_prime_6144(BIGNUM *bn);\r
 800 BIGNUM *get_rfc3526_prime_8192(BIGNUM *bn);\r
 801 \r
 802 int BN_bntest_rand(BIGNUM *rnd, int bits, int top,int bottom);\r
 803 \r
 804 /* BEGIN ERROR CODES */\r
 805 /* The following lines are auto generated by the script mkerr.pl. Any changes\r
 806  * made after this point may be overwritten when the script is next run.\r
 807  */\r
 808 void ERR_load_BN_strings(void);\r
 809 \r
 810 /* Error codes for the BN functions. */\r
 811 \r
 812 /* Function codes. */\r
 813 #define BN_F_BNRAND                                      127\r
 814 #define BN_F_BN_BLINDING_CONVERT_EX                      100\r
 815 #define BN_F_BN_BLINDING_CREATE_PARAM                    128\r
 816 #define BN_F_BN_BLINDING_INVERT_EX                       101\r
 817 #define BN_F_BN_BLINDING_NEW                             102\r
 818 #define BN_F_BN_BLINDING_UPDATE                          103\r
 819 #define BN_F_BN_BN2DEC                                   104\r
 820 #define BN_F_BN_BN2HEX                                   105\r
 821 #define BN_F_BN_CTX_GET                                  116\r
 822 #define BN_F_BN_CTX_NEW                                  106\r
 823 #define BN_F_BN_CTX_START                                129\r
 824 #define BN_F_BN_DIV                                      107\r
 825 #define BN_F_BN_DIV_NO_BRANCH                            138\r
 826 #define BN_F_BN_DIV_RECP                                 130\r
 827 #define BN_F_BN_EXP                                      123\r
 828 #define BN_F_BN_EXPAND2                                  108\r
 829 #define BN_F_BN_EXPAND_INTERNAL                          120\r
 830 #define BN_F_BN_GF2M_MOD                                 131\r
 831 #define BN_F_BN_GF2M_MOD_EXP                             132\r
 832 #define BN_F_BN_GF2M_MOD_MUL                             133\r
 833 #define BN_F_BN_GF2M_MOD_SOLVE_QUAD                      134\r
 834 #define BN_F_BN_GF2M_MOD_SOLVE_QUAD_ARR                  135\r
 835 #define BN_F_BN_GF2M_MOD_SQR                             136\r
 836 #define BN_F_BN_GF2M_MOD_SQRT                            137\r
 837 #define BN_F_BN_MOD_EXP2_MONT                            118\r
 838 #define BN_F_BN_MOD_EXP_MONT                             109\r
 839 #define BN_F_BN_MOD_EXP_MONT_CONSTTIME                   124\r
 840 #define BN_F_BN_MOD_EXP_MONT_WORD                        117\r
 841 #define BN_F_BN_MOD_EXP_RECP                             125\r
 842 #define BN_F_BN_MOD_EXP_SIMPLE                           126\r
 843 #define BN_F_BN_MOD_INVERSE                              110\r
 844 #define BN_F_BN_MOD_INVERSE_NO_BRANCH                    139\r
 845 #define BN_F_BN_MOD_LSHIFT_QUICK                         119\r
 846 #define BN_F_BN_MOD_MUL_RECIPROCAL                       111\r
 847 #define BN_F_BN_MOD_SQRT                                 121\r
 848 #define BN_F_BN_MPI2BN                                   112\r
 849 #define BN_F_BN_NEW                                      113\r
 850 #define BN_F_BN_RAND                                     114\r
 851 #define BN_F_BN_RAND_RANGE                               122\r
 852 #define BN_F_BN_USUB                                     115\r
 853 \r
 854 /* Reason codes. */\r
 855 #define BN_R_ARG2_LT_ARG3                                100\r
 856 #define BN_R_BAD_RECIPROCAL                              101\r
 857 #define BN_R_BIGNUM_TOO_LONG                             114\r
 858 #define BN_R_CALLED_WITH_EVEN_MODULUS                    102\r
 859 #define BN_R_DIV_BY_ZERO                                 103\r
 860 #define BN_R_ENCODING_ERROR                              104\r
 861 #define BN_R_EXPAND_ON_STATIC_BIGNUM_DATA                105\r
 862 #define BN_R_INPUT_NOT_REDUCED                           110\r
 863 #define BN_R_INVALID_LENGTH                              106\r
 864 #define BN_R_INVALID_RANGE                               115\r
 865 #define BN_R_NOT_A_SQUARE                                111\r
 866 #define BN_R_NOT_INITIALIZED                             107\r
 867 #define BN_R_NO_INVERSE                                  108\r
 868 #define BN_R_NO_SOLUTION                                 116\r
 869 #define BN_R_P_IS_NOT_PRIME                              112\r
 870 #define BN_R_TOO_MANY_ITERATIONS                         113\r
 871 #define BN_R_TOO_MANY_TEMPORARY_VARIABLES                109\r
 872 \r
 873 #ifdef  __cplusplus\r
 874 }\r
 875 #endif\r
 876 #endif\r