crypto/ec/ec_local.h

   1 /*
   2  * Copyright 2001-2021 The OpenSSL Project Authors. All Rights Reserved.
   3  * Copyright (c) 2002, Oracle and/or its affiliates. All rights reserved
   4  *
   5  * Licensed under the Apache License 2.0 (the "License").  You may not use
   6  * this file except in compliance with the License.  You can obtain a copy
   7  * in the file LICENSE in the source distribution or at
   8  * https://www.openssl.org/source/license.html
   9  */
  10
  11 #include <stdlib.h>
  12
  13 #include <openssl/obj_mac.h>
  14 #include <openssl/ec.h>
  15 #include <openssl/bn.h>
  16 #include "internal/refcount.h"
  17 #include "crypto/ec.h"
  18
  19 #if defined(__SUNPRO_C)
  20 # if __SUNPRO_C >= 0x520
  21 #  pragma error_messages (off,E_ARRAY_OF_INCOMPLETE_NONAME,E_ARRAY_OF_INCOMPLETE)
  22 # endif
  23 #endif
  24
  25 /* Use default functions for poin2oct, oct2point and compressed coordinates */
  26 #define EC_FLAGS_DEFAULT_OCT    0x1
  27
  28 /* Use custom formats for EC_GROUP, EC_POINT and EC_KEY */
  29 #define EC_FLAGS_CUSTOM_CURVE   0x2
  30
  31 /* Curve does not support signing operations */
  32 #define EC_FLAGS_NO_SIGN        0x4
  33
  34 #ifdef OPENSSL_NO_DEPRECATED_3_0
  35 typedef struct ec_method_st EC_METHOD;
  36 #endif
  37
  38 /*
  39  * Structure details are not part of the exported interface, so all this may
  40  * change in future versions.
  41  */
  42
  43 struct ec_method_st {
  44     /* Various method flags */
  45     int flags;
  46     /* used by EC_METHOD_get_field_type: */
  47     int field_type;             /* a NID */
  48     /*
  49      * used by EC_GROUP_new, EC_GROUP_free, EC_GROUP_clear_free,
  50      * EC_GROUP_copy:
  51      */
  52     int (*group_init) (EC_GROUP *);
  53     void (*group_finish) (EC_GROUP *);
  54     void (*group_clear_finish) (EC_GROUP *);
  55     int (*group_copy) (EC_GROUP *, const EC_GROUP *);
  56     /* used by EC_GROUP_set_curve, EC_GROUP_get_curve: */
  57     int (*group_set_curve) (EC_GROUP *, const BIGNUM *p, const BIGNUM *a,
  58                             const BIGNUM *b, BN_CTX *);
  59     int (*group_get_curve) (const EC_GROUP *, BIGNUM *p, BIGNUM *a, BIGNUM *b,
  60                             BN_CTX *);
  61     /* used by EC_GROUP_get_degree: */
  62     int (*group_get_degree) (const EC_GROUP *);
  63     int (*group_order_bits) (const EC_GROUP *);
  64     /* used by EC_GROUP_check: */
  65     int (*group_check_discriminant) (const EC_GROUP *, BN_CTX *);
  66     /*
  67      * used by EC_POINT_new, EC_POINT_free, EC_POINT_clear_free,
  68      * EC_POINT_copy:
  69      */
  70     int (*point_init) (EC_POINT *);
  71     void (*point_finish) (EC_POINT *);
  72     void (*point_clear_finish) (EC_POINT *);
  73     int (*point_copy) (EC_POINT *, const EC_POINT *);
  74     /*-
  75      * used by EC_POINT_set_to_infinity,
  76      * EC_POINT_set_Jprojective_coordinates_GFp,
  77      * EC_POINT_get_Jprojective_coordinates_GFp,
  78      * EC_POINT_set_affine_coordinates,
  79      * EC_POINT_get_affine_coordinates,
  80      * EC_POINT_set_compressed_coordinates:
  81      */
  82     int (*point_set_to_infinity) (const EC_GROUP *, EC_POINT *);
  83     int (*point_set_affine_coordinates) (const EC_GROUP *, EC_POINT *,
  84                                          const BIGNUM *x, const BIGNUM *y,
  85                                          BN_CTX *);
  86     int (*point_get_affine_coordinates) (const EC_GROUP *, const EC_POINT *,
  87                                          BIGNUM *x, BIGNUM *y, BN_CTX *);
  88     int (*point_set_compressed_coordinates) (const EC_GROUP *, EC_POINT *,
  89                                              const BIGNUM *x, int y_bit,
  90                                              BN_CTX *);
  91     /* used by EC_POINT_point2oct, EC_POINT_oct2point: */
  92     size_t (*point2oct) (const EC_GROUP *, const EC_POINT *,
  93                          point_conversion_form_t form, unsigned char *buf,
  94                          size_t len, BN_CTX *);
  95     int (*oct2point) (const EC_GROUP *, EC_POINT *, const unsigned char *buf,
  96                       size_t len, BN_CTX *);
  97     /* used by EC_POINT_add, EC_POINT_dbl, ECP_POINT_invert: */
  98     int (*add) (const EC_GROUP *, EC_POINT *r, const EC_POINT *a,
  99                 const EC_POINT *b, BN_CTX *);
 100     int (*dbl) (const EC_GROUP *, EC_POINT *r, const EC_POINT *a, BN_CTX *);
 101     int (*invert) (const EC_GROUP *, EC_POINT *, BN_CTX *);
 102     /*
 103      * used by EC_POINT_is_at_infinity, EC_POINT_is_on_curve, EC_POINT_cmp:
 104      */
 105     int (*is_at_infinity) (const EC_GROUP *, const EC_POINT *);
 106     int (*is_on_curve) (const EC_GROUP *, const EC_POINT *, BN_CTX *);
 107     int (*point_cmp) (const EC_GROUP *, const EC_POINT *a, const EC_POINT *b,
 108                       BN_CTX *);
 109     /* used by EC_POINT_make_affine, EC_POINTs_make_affine: */
 110     int (*make_affine) (const EC_GROUP *, EC_POINT *, BN_CTX *);
 111     int (*points_make_affine) (const EC_GROUP *, size_t num, EC_POINT *[],
 112                                BN_CTX *);
 113     /*
 114      * used by EC_POINTs_mul, EC_POINT_mul, EC_POINT_precompute_mult,
 115      * EC_POINT_have_precompute_mult (default implementations are used if the
 116      * 'mul' pointer is 0):
 117      */
 118     /*-
 119      * mul() calculates the value
 120      *
 121      *   r := generator * scalar
 122      *        + points[0] * scalars[0]
 123      *        + ...
 124      *        + points[num-1] * scalars[num-1].
 125      *
 126      * For a fixed point multiplication (scalar != NULL, num == 0)
 127      * or a variable point multiplication (scalar == NULL, num == 1),
 128      * mul() must use a constant time algorithm: in both cases callers
 129      * should provide an input scalar (either scalar or scalars[0])
 130      * in the range [0, ec_group_order); for robustness, implementers
 131      * should handle the case when the scalar has not been reduced, but
 132      * may treat it as an unusual input, without any constant-timeness
 133      * guarantee.
 134      */
 135     int (*mul) (const EC_GROUP *group, EC_POINT *r, const BIGNUM *scalar,
 136                 size_t num, const EC_POINT *points[], const BIGNUM *scalars[],
 137                 BN_CTX *);
 138     int (*precompute_mult) (EC_GROUP *group, BN_CTX *);
 139     int (*have_precompute_mult) (const EC_GROUP *group);
 140     /* internal functions */
 141     /*
 142      * 'field_mul', 'field_sqr', and 'field_div' can be used by 'add' and
 143      * 'dbl' so that the same implementations of point operations can be used
 144      * with different optimized implementations of expensive field
 145      * operations:
 146      */
 147     int (*field_mul) (const EC_GROUP *, BIGNUM *r, const BIGNUM *a,
 148                       const BIGNUM *b, BN_CTX *);
 149     int (*field_sqr) (const EC_GROUP *, BIGNUM *r, const BIGNUM *a, BN_CTX *);
 150     int (*field_div) (const EC_GROUP *, BIGNUM *r, const BIGNUM *a,
 151                       const BIGNUM *b, BN_CTX *);
 152     /*-
 153      * 'field_inv' computes the multiplicative inverse of a in the field,
 154      * storing the result in r.
 155      *
 156      * If 'a' is zero (or equivalent), you'll get an EC_R_CANNOT_INVERT error.
 157      */
 158     int (*field_inv) (const EC_GROUP *, BIGNUM *r, const BIGNUM *a, BN_CTX *);
 159     /* e.g. to Montgomery */
 160     int (*field_encode) (const EC_GROUP *, BIGNUM *r, const BIGNUM *a,
 161                          BN_CTX *);
 162     /* e.g. from Montgomery */
 163     int (*field_decode) (const EC_GROUP *, BIGNUM *r, const BIGNUM *a,
 164                          BN_CTX *);
 165     int (*field_set_to_one) (const EC_GROUP *, BIGNUM *r, BN_CTX *);
 166     /* private key operations */
 167     size_t (*priv2oct)(const EC_KEY *eckey, unsigned char *buf, size_t len);
 168     int (*oct2priv)(EC_KEY *eckey, const unsigned char *buf, size_t len);
 169     int (*set_private)(EC_KEY *eckey, const BIGNUM *priv_key);
 170     int (*keygen)(EC_KEY *eckey);
 171     int (*keycheck)(const EC_KEY *eckey);
 172     int (*keygenpub)(EC_KEY *eckey);
 173     int (*keycopy)(EC_KEY *dst, const EC_KEY *src);
 174     void (*keyfinish)(EC_KEY *eckey);
 175     /* custom ECDH operation */
 176     int (*ecdh_compute_key)(unsigned char **pout, size_t *poutlen,
 177                             const EC_POINT *pub_key, const EC_KEY *ecdh);
 178     /* custom ECDSA */
 179     int (*ecdsa_sign_setup)(EC_KEY *eckey, BN_CTX *ctx, BIGNUM **kinvp,
 180                             BIGNUM **rp);
 181     ECDSA_SIG *(*ecdsa_sign_sig)(const unsigned char *dgst, int dgstlen,
 182                                  const BIGNUM *kinv, const BIGNUM *r,
 183                                  EC_KEY *eckey);
 184     int (*ecdsa_verify_sig)(const unsigned char *dgst, int dgstlen,
 185                             const ECDSA_SIG *sig, EC_KEY *eckey);
 186     /* Inverse modulo order */
 187     int (*field_inverse_mod_ord)(const EC_GROUP *, BIGNUM *r,
 188                                  const BIGNUM *x, BN_CTX *);
 189     int (*blind_coordinates)(const EC_GROUP *group, EC_POINT *p, BN_CTX *ctx);
 190     int (*ladder_pre)(const EC_GROUP *group,
 191                       EC_POINT *r, EC_POINT *s,
 192                       EC_POINT *p, BN_CTX *ctx);
 193     int (*ladder_step)(const EC_GROUP *group,
 194                        EC_POINT *r, EC_POINT *s,
 195                        EC_POINT *p, BN_CTX *ctx);
 196     int (*ladder_post)(const EC_GROUP *group,
 197                        EC_POINT *r, EC_POINT *s,
 198                        EC_POINT *p, BN_CTX *ctx);
 199 };
 200
 201 /*
 202  * Types and functions to manipulate pre-computed values.
 203  */
 204 typedef struct nistp224_pre_comp_st NISTP224_PRE_COMP;
 205 typedef struct nistp256_pre_comp_st NISTP256_PRE_COMP;
 206 typedef struct nistp521_pre_comp_st NISTP521_PRE_COMP;
 207 typedef struct nistz256_pre_comp_st NISTZ256_PRE_COMP;
 208 typedef struct ec_pre_comp_st EC_PRE_COMP;
 209
 210 struct ec_group_st {
 211     const EC_METHOD *meth;
 212     EC_POINT *generator;        /* optional */
 213     BIGNUM *order, *cofactor;
 214     int curve_name;             /* optional NID for named curve */
 215     int asn1_flag;              /* flag to control the asn1 encoding */
 216     int decoded_from_explicit_params; /* set if decoded from explicit
 217                                        * curve parameters encoding */
 218     point_conversion_form_t asn1_form;
 219     unsigned char *seed;        /* optional seed for parameters (appears in
 220                                  * ASN1) */
 221     size_t seed_len;
 222     /*
 223      * The following members are handled by the method functions, even if
 224      * they appear generic
 225      */
 226     /*
 227      * Field specification. For curves over GF(p), this is the modulus; for
 228      * curves over GF(2^m), this is the irreducible polynomial defining the
 229      * field.
 230      */
 231     BIGNUM *field;
 232     /*
 233      * Field specification for curves over GF(2^m). The irreducible f(t) is
 234      * then of the form: t^poly[0] + t^poly[1] + ... + t^poly[k] where m =
 235      * poly[0] > poly[1] > ... > poly[k] = 0. The array is terminated with
 236      * poly[k+1]=-1. All elliptic curve irreducibles have at most 5 non-zero
 237      * terms.
 238      */
 239     int poly[6];
 240     /*
 241      * Curve coefficients. (Here the assumption is that BIGNUMs can be used
 242      * or abused for all kinds of fields, not just GF(p).) For characteristic
 243      * > 3, the curve is defined by a Weierstrass equation of the form y^2 =
 244      * x^3 + a*x + b. For characteristic 2, the curve is defined by an
 245      * equation of the form y^2 + x*y = x^3 + a*x^2 + b.
 246      */
 247     BIGNUM *a, *b;
 248     /* enable optimized point arithmetic for special case */
 249     int a_is_minus3;
 250     /* method-specific (e.g., Montgomery structure) */
 251     void *field_data1;
 252     /* method-specific */
 253     void *field_data2;
 254     /* method-specific */
 255     int (*field_mod_func) (BIGNUM *, const BIGNUM *, const BIGNUM *,
 256                            BN_CTX *);
 257     /* data for ECDSA inverse */
 258     BN_MONT_CTX *mont_data;
 259
 260     /*
 261      * Precomputed values for speed. The PCT_xxx names match the
 262      * pre_comp.xxx union names; see the SETPRECOMP and HAVEPRECOMP
 263      * macros, below.
 264      */
 265     enum {
 266         PCT_none,
 267         PCT_nistp224, PCT_nistp256, PCT_nistp521, PCT_nistz256,
 268         PCT_ec
 269     } pre_comp_type;
 270     union {
 271         NISTP224_PRE_COMP *nistp224;
 272         NISTP256_PRE_COMP *nistp256;
 273         NISTP521_PRE_COMP *nistp521;
 274         NISTZ256_PRE_COMP *nistz256;
 275         EC_PRE_COMP *ec;
 276     } pre_comp;
 277
 278     OSSL_LIB_CTX *libctx;
 279     char *propq;
 280 };
 281
 282 #define SETPRECOMP(g, type, pre) \
 283     g->pre_comp_type = PCT_##type, g->pre_comp.type = pre
 284 #define HAVEPRECOMP(g, type) \
 285     g->pre_comp_type == PCT_##type && g->pre_comp.type != NULL
 286
 287 struct ec_key_st {
 288     const EC_KEY_METHOD *meth;
 289     ENGINE *engine;
 290     int version;
 291     EC_GROUP *group;
 292     EC_POINT *pub_key;
 293     BIGNUM *priv_key;
 294     unsigned int enc_flag;
 295     point_conversion_form_t conv_form;
 296     CRYPTO_REF_COUNT references;
 297     int flags;
 298 #ifndef FIPS_MODULE
 299     CRYPTO_EX_DATA ex_data;
 300 #endif
 301     OSSL_LIB_CTX *libctx;
 302     char *propq;
 303
 304     /* Provider data */
 305     size_t dirty_cnt; /* If any key material changes, increment this */
 306 };
 307
 308 struct ec_point_st {
 309     const EC_METHOD *meth;
 310     /* NID for the curve if known */
 311     int curve_name;
 312     /*
 313      * All members except 'meth' are handled by the method functions, even if
 314      * they appear generic
 315      */
 316     BIGNUM *X;
 317     BIGNUM *Y;
 318     BIGNUM *Z;                  /* Jacobian projective coordinates: * (X, Y,
 319                                  * Z) represents (X/Z^2, Y/Z^3) if Z != 0 */
 320     int Z_is_one;               /* enable optimized point arithmetic for
 321                                  * special case */
 322 };
 323
 324 static ossl_inline int ec_point_is_compat(const EC_POINT *point,
 325                                           const EC_GROUP *group)
 326 {
 327     return group->meth == point->meth
 328            && (group->curve_name == 0
 329                || point->curve_name == 0
 330                || group->curve_name == point->curve_name);
 331 }
 332
 333 NISTP224_PRE_COMP *EC_nistp224_pre_comp_dup(NISTP224_PRE_COMP *);
 334 NISTP256_PRE_COMP *EC_nistp256_pre_comp_dup(NISTP256_PRE_COMP *);
 335 NISTP521_PRE_COMP *EC_nistp521_pre_comp_dup(NISTP521_PRE_COMP *);
 336 NISTZ256_PRE_COMP *EC_nistz256_pre_comp_dup(NISTZ256_PRE_COMP *);
 337 NISTP256_PRE_COMP *EC_nistp256_pre_comp_dup(NISTP256_PRE_COMP *);
 338 EC_PRE_COMP *EC_ec_pre_comp_dup(EC_PRE_COMP *);
 339
 340 void EC_pre_comp_free(EC_GROUP *group);
 341 void EC_nistp224_pre_comp_free(NISTP224_PRE_COMP *);
 342 void EC_nistp256_pre_comp_free(NISTP256_PRE_COMP *);
 343 void EC_nistp521_pre_comp_free(NISTP521_PRE_COMP *);
 344 void EC_nistz256_pre_comp_free(NISTZ256_PRE_COMP *);
 345 void EC_ec_pre_comp_free(EC_PRE_COMP *);
 346
 347 /*
 348  * method functions in ec_mult.c (ec_lib.c uses these as defaults if
 349  * group->method->mul is 0)
 350  */
 351 int ossl_ec_wNAF_mul(const EC_GROUP *group, EC_POINT *r, const BIGNUM *scalar,
 352                      size_t num, const EC_POINT *points[],
 353                      const BIGNUM *scalars[], BN_CTX *);
 354 int ossl_ec_wNAF_precompute_mult(EC_GROUP *group, BN_CTX *);
 355 int ossl_ec_wNAF_have_precompute_mult(const EC_GROUP *group);
 356
 357 /* method functions in ecp_smpl.c */
 358 int ossl_ec_GFp_simple_group_init(EC_GROUP *);
 359 void ossl_ec_GFp_simple_group_finish(EC_GROUP *);
 360 void ossl_ec_GFp_simple_group_clear_finish(EC_GROUP *);
 361 int ossl_ec_GFp_simple_group_copy(EC_GROUP *, const EC_GROUP *);
 362 int ossl_ec_GFp_simple_group_set_curve(EC_GROUP *, const BIGNUM *p,
 363                                        const BIGNUM *a, const BIGNUM *b,
 364                                        BN_CTX *);
 365 int ossl_ec_GFp_simple_group_get_curve(const EC_GROUP *, BIGNUM *p, BIGNUM *a,
 366                                        BIGNUM *b, BN_CTX *);
 367 int ossl_ec_GFp_simple_group_get_degree(const EC_GROUP *);
 368 int ossl_ec_GFp_simple_group_check_discriminant(const EC_GROUP *, BN_CTX *);
 369 int ossl_ec_GFp_simple_point_init(EC_POINT *);
 370 void ossl_ec_GFp_simple_point_finish(EC_POINT *);
 371 void ossl_ec_GFp_simple_point_clear_finish(EC_POINT *);
 372 int ossl_ec_GFp_simple_point_copy(EC_POINT *, const EC_POINT *);
 373 int ossl_ec_GFp_simple_point_set_to_infinity(const EC_GROUP *, EC_POINT *);
 374 int ossl_ec_GFp_simple_set_Jprojective_coordinates_GFp(const EC_GROUP *,
 375                                                        EC_POINT *,
 376                                                        const BIGNUM *x,
 377                                                        const BIGNUM *y,
 378                                                        const BIGNUM *z,
 379                                                        BN_CTX *);
 380 int ossl_ec_GFp_simple_get_Jprojective_coordinates_GFp(const EC_GROUP *,
 381                                                        const EC_POINT *,
 382                                                        BIGNUM *x,
 383                                                        BIGNUM *y, BIGNUM *z,
 384                                                        BN_CTX *);
 385 int ossl_ec_GFp_simple_point_set_affine_coordinates(const EC_GROUP *, EC_POINT *,
 386                                                     const BIGNUM *x,
 387                                                     const BIGNUM *y, BN_CTX *);
 388 int ossl_ec_GFp_simple_point_get_affine_coordinates(const EC_GROUP *,
 389                                                     const EC_POINT *, BIGNUM *x,
 390                                                     BIGNUM *y, BN_CTX *);
 391 int ossl_ec_GFp_simple_set_compressed_coordinates(const EC_GROUP *, EC_POINT *,
 392                                                   const BIGNUM *x, int y_bit,
 393                                                   BN_CTX *);
 394 size_t ossl_ec_GFp_simple_point2oct(const EC_GROUP *, const EC_POINT *,
 395                                     point_conversion_form_t form,
 396                                     unsigned char *buf, size_t len, BN_CTX *);
 397 int ossl_ec_GFp_simple_oct2point(const EC_GROUP *, EC_POINT *,
 398                                  const unsigned char *buf, size_t len, BN_CTX *);
 399 int ossl_ec_GFp_simple_add(const EC_GROUP *, EC_POINT *r, const EC_POINT *a,
 400                            const EC_POINT *b, BN_CTX *);
 401 int ossl_ec_GFp_simple_dbl(const EC_GROUP *, EC_POINT *r, const EC_POINT *a,
 402                            BN_CTX *);
 403 int ossl_ec_GFp_simple_invert(const EC_GROUP *, EC_POINT *, BN_CTX *);
 404 int ossl_ec_GFp_simple_is_at_infinity(const EC_GROUP *, const EC_POINT *);
 405 int ossl_ec_GFp_simple_is_on_curve(const EC_GROUP *, const EC_POINT *, BN_CTX *);
 406 int ossl_ec_GFp_simple_cmp(const EC_GROUP *, const EC_POINT *a,
 407                            const EC_POINT *b, BN_CTX *);
 408 int ossl_ec_GFp_simple_make_affine(const EC_GROUP *, EC_POINT *, BN_CTX *);
 409 int ossl_ec_GFp_simple_points_make_affine(const EC_GROUP *, size_t num,
 410                                           EC_POINT *[], BN_CTX *);
 411 int ossl_ec_GFp_simple_field_mul(const EC_GROUP *, BIGNUM *r, const BIGNUM *a,
 412                                  const BIGNUM *b, BN_CTX *);
 413 int ossl_ec_GFp_simple_field_sqr(const EC_GROUP *, BIGNUM *r, const BIGNUM *a,
 414                                  BN_CTX *);
 415 int ossl_ec_GFp_simple_field_inv(const EC_GROUP *, BIGNUM *r, const BIGNUM *a,
 416                                  BN_CTX *);
 417 int ossl_ec_GFp_simple_blind_coordinates(const EC_GROUP *group, EC_POINT *p,
 418                                          BN_CTX *ctx);
 419 int ossl_ec_GFp_simple_ladder_pre(const EC_GROUP *group,
 420                                   EC_POINT *r, EC_POINT *s,
 421                                   EC_POINT *p, BN_CTX *ctx);
 422 int ossl_ec_GFp_simple_ladder_step(const EC_GROUP *group,
 423                                    EC_POINT *r, EC_POINT *s,
 424                                    EC_POINT *p, BN_CTX *ctx);
 425 int ossl_ec_GFp_simple_ladder_post(const EC_GROUP *group,
 426                                    EC_POINT *r, EC_POINT *s,
 427                                    EC_POINT *p, BN_CTX *ctx);
 428
 429 /* method functions in ecp_mont.c */
 430 int ossl_ec_GFp_mont_group_init(EC_GROUP *);
 431 int ossl_ec_GFp_mont_group_set_curve(EC_GROUP *, const BIGNUM *p,
 432                                      const BIGNUM *a,
 433                                      const BIGNUM *b, BN_CTX *);
 434 void ossl_ec_GFp_mont_group_finish(EC_GROUP *);
 435 void ossl_ec_GFp_mont_group_clear_finish(EC_GROUP *);
 436 int ossl_ec_GFp_mont_group_copy(EC_GROUP *, const EC_GROUP *);
 437 int ossl_ec_GFp_mont_field_mul(const EC_GROUP *, BIGNUM *r, const BIGNUM *a,
 438                                const BIGNUM *b, BN_CTX *);
 439 int ossl_ec_GFp_mont_field_sqr(const EC_GROUP *, BIGNUM *r, const BIGNUM *a,
 440                                BN_CTX *);
 441 int ossl_ec_GFp_mont_field_inv(const EC_GROUP *, BIGNUM *r, const BIGNUM *a,
 442                                BN_CTX *);
 443 int ossl_ec_GFp_mont_field_encode(const EC_GROUP *, BIGNUM *r, const BIGNUM *a,
 444                                   BN_CTX *);
 445 int ossl_ec_GFp_mont_field_decode(const EC_GROUP *, BIGNUM *r, const BIGNUM *a,
 446                                   BN_CTX *);
 447 int ossl_ec_GFp_mont_field_set_to_one(const EC_GROUP *, BIGNUM *r, BN_CTX *);
 448
 449 /* method functions in ecp_nist.c */
 450 int ossl_ec_GFp_nist_group_copy(EC_GROUP *dest, const EC_GROUP *src);
 451 int ossl_ec_GFp_nist_group_set_curve(EC_GROUP *, const BIGNUM *p,
 452                                      const BIGNUM *a, const BIGNUM *b, BN_CTX *);
 453 int ossl_ec_GFp_nist_field_mul(const EC_GROUP *, BIGNUM *r, const BIGNUM *a,
 454                               const BIGNUM *b, BN_CTX *);
 455 int ossl_ec_GFp_nist_field_sqr(const EC_GROUP *, BIGNUM *r, const BIGNUM *a,
 456                                BN_CTX *);
 457
 458 /* method functions in ec2_smpl.c */
 459 int ossl_ec_GF2m_simple_group_init(EC_GROUP *);
 460 void ossl_ec_GF2m_simple_group_finish(EC_GROUP *);
 461 void ossl_ec_GF2m_simple_group_clear_finish(EC_GROUP *);
 462 int ossl_ec_GF2m_simple_group_copy(EC_GROUP *, const EC_GROUP *);
 463 int ossl_ec_GF2m_simple_group_set_curve(EC_GROUP *, const BIGNUM *p,
 464                                         const BIGNUM *a, const BIGNUM *b,
 465                                         BN_CTX *);
 466 int ossl_ec_GF2m_simple_group_get_curve(const EC_GROUP *, BIGNUM *p, BIGNUM *a,
 467                                         BIGNUM *b, BN_CTX *);
 468 int ossl_ec_GF2m_simple_group_get_degree(const EC_GROUP *);
 469 int ossl_ec_GF2m_simple_group_check_discriminant(const EC_GROUP *, BN_CTX *);
 470 int ossl_ec_GF2m_simple_point_init(EC_POINT *);
 471 void ossl_ec_GF2m_simple_point_finish(EC_POINT *);
 472 void ossl_ec_GF2m_simple_point_clear_finish(EC_POINT *);
 473 int ossl_ec_GF2m_simple_point_copy(EC_POINT *, const EC_POINT *);
 474 int ossl_ec_GF2m_simple_point_set_to_infinity(const EC_GROUP *, EC_POINT *);
 475 int ossl_ec_GF2m_simple_point_set_affine_coordinates(const EC_GROUP *,
 476                                                      EC_POINT *,
 477                                                      const BIGNUM *x,
 478                                                      const BIGNUM *y, BN_CTX *);
 479 int ossl_ec_GF2m_simple_point_get_affine_coordinates(const EC_GROUP *,
 480                                                      const EC_POINT *, BIGNUM *x,
 481                                                      BIGNUM *y, BN_CTX *);
 482 int ossl_ec_GF2m_simple_set_compressed_coordinates(const EC_GROUP *, EC_POINT *,
 483                                                    const BIGNUM *x, int y_bit,
 484                                                    BN_CTX *);
 485 size_t ossl_ec_GF2m_simple_point2oct(const EC_GROUP *, const EC_POINT *,
 486                                      point_conversion_form_t form,
 487                                      unsigned char *buf, size_t len, BN_CTX *);
 488 int ossl_ec_GF2m_simple_oct2point(const EC_GROUP *, EC_POINT *,
 489                                   const unsigned char *buf, size_t len, BN_CTX *);
 490 int ossl_ec_GF2m_simple_add(const EC_GROUP *, EC_POINT *r, const EC_POINT *a,
 491                             const EC_POINT *b, BN_CTX *);
 492 int ossl_ec_GF2m_simple_dbl(const EC_GROUP *, EC_POINT *r, const EC_POINT *a,
 493                             BN_CTX *);
 494 int ossl_ec_GF2m_simple_invert(const EC_GROUP *, EC_POINT *, BN_CTX *);
 495 int ossl_ec_GF2m_simple_is_at_infinity(const EC_GROUP *, const EC_POINT *);
 496 int ossl_ec_GF2m_simple_is_on_curve(const EC_GROUP *, const EC_POINT *, BN_CTX *);
 497 int ossl_ec_GF2m_simple_cmp(const EC_GROUP *, const EC_POINT *a,
 498                             const EC_POINT *b, BN_CTX *);
 499 int ossl_ec_GF2m_simple_make_affine(const EC_GROUP *, EC_POINT *, BN_CTX *);
 500 int ossl_ec_GF2m_simple_points_make_affine(const EC_GROUP *, size_t num,
 501                                            EC_POINT *[], BN_CTX *);
 502 int ossl_ec_GF2m_simple_field_mul(const EC_GROUP *, BIGNUM *r, const BIGNUM *a,
 503                                   const BIGNUM *b, BN_CTX *);
 504 int ossl_ec_GF2m_simple_field_sqr(const EC_GROUP *, BIGNUM *r, const BIGNUM *a,
 505                                   BN_CTX *);
 506 int ossl_ec_GF2m_simple_field_div(const EC_GROUP *, BIGNUM *r, const BIGNUM *a,
 507                                  const BIGNUM *b, BN_CTX *);
 508
 509 #ifndef OPENSSL_NO_EC_NISTP_64_GCC_128
 510 # ifdef B_ENDIAN
 511 #  error "Can not enable ec_nistp_64_gcc_128 on big-endian systems"
 512 # endif
 513
 514 /* method functions in ecp_nistp224.c */
 515 int ossl_ec_GFp_nistp224_group_init(EC_GROUP *group);
 516 int ossl_ec_GFp_nistp224_group_set_curve(EC_GROUP *group, const BIGNUM *p,
 517                                          const BIGNUM *a, const BIGNUM *n,
 518                                          BN_CTX *);
 519 int ossl_ec_GFp_nistp224_point_get_affine_coordinates(const EC_GROUP *group,
 520                                                       const EC_POINT *point,
 521                                                       BIGNUM *x, BIGNUM *y,
 522                                                       BN_CTX *ctx);
 523 int ossl_ec_GFp_nistp224_mul(const EC_GROUP *group, EC_POINT *r,
 524                              const BIGNUM *scalar, size_t num,
 525                              const EC_POINT *points[], const BIGNUM *scalars[],
 526                              BN_CTX *);
 527 int ossl_ec_GFp_nistp224_points_mul(const EC_GROUP *group, EC_POINT *r,
 528                                     const BIGNUM *scalar, size_t num,
 529                                     const EC_POINT *points[],
 530                                     const BIGNUM *scalars[], BN_CTX *ctx);
 531 int ossl_ec_GFp_nistp224_precompute_mult(EC_GROUP *group, BN_CTX *ctx);
 532 int ossl_ec_GFp_nistp224_have_precompute_mult(const EC_GROUP *group);
 533
 534 /* method functions in ecp_nistp256.c */
 535 int ossl_ec_GFp_nistp256_group_init(EC_GROUP *group);
 536 int ossl_ec_GFp_nistp256_group_set_curve(EC_GROUP *group, const BIGNUM *p,
 537                                          const BIGNUM *a, const BIGNUM *n,
 538                                          BN_CTX *);
 539 int ossl_ec_GFp_nistp256_point_get_affine_coordinates(const EC_GROUP *group,
 540                                                       const EC_POINT *point,
 541                                                       BIGNUM *x, BIGNUM *y,
 542                                                       BN_CTX *ctx);
 543 int ossl_ec_GFp_nistp256_mul(const EC_GROUP *group, EC_POINT *r,
 544                              const BIGNUM *scalar, size_t num,
 545                              const EC_POINT *points[], const BIGNUM *scalars[],
 546                              BN_CTX *);
 547 int ossl_ec_GFp_nistp256_points_mul(const EC_GROUP *group, EC_POINT *r,
 548                                     const BIGNUM *scalar, size_t num,
 549                                     const EC_POINT *points[],
 550                                     const BIGNUM *scalars[], BN_CTX *ctx);
 551 int ossl_ec_GFp_nistp256_precompute_mult(EC_GROUP *group, BN_CTX *ctx);
 552 int ossl_ec_GFp_nistp256_have_precompute_mult(const EC_GROUP *group);
 553
 554 /* method functions in ecp_nistp521.c */
 555 int ossl_ec_GFp_nistp521_group_init(EC_GROUP *group);
 556 int ossl_ec_GFp_nistp521_group_set_curve(EC_GROUP *group, const BIGNUM *p,
 557                                          const BIGNUM *a, const BIGNUM *n,
 558                                          BN_CTX *);
 559 int ossl_ec_GFp_nistp521_point_get_affine_coordinates(const EC_GROUP *group,
 560                                                       const EC_POINT *point,
 561                                                       BIGNUM *x, BIGNUM *y,
 562                                                       BN_CTX *ctx);
 563 int ossl_ec_GFp_nistp521_mul(const EC_GROUP *group, EC_POINT *r,
 564                              const BIGNUM *scalar, size_t num,
 565                              const EC_POINT *points[], const BIGNUM *scalars[],
 566                              BN_CTX *);
 567 int ossl_ec_GFp_nistp521_points_mul(const EC_GROUP *group, EC_POINT *r,
 568                                     const BIGNUM *scalar, size_t num,
 569                                     const EC_POINT *points[],
 570                                     const BIGNUM *scalars[], BN_CTX *ctx);
 571 int ossl_ec_GFp_nistp521_precompute_mult(EC_GROUP *group, BN_CTX *ctx);
 572 int ossl_ec_GFp_nistp521_have_precompute_mult(const EC_GROUP *group);
 573
 574 /* utility functions in ecp_nistputil.c */
 575 void ossl_ec_GFp_nistp_points_make_affine_internal(size_t num, void *point_array,
 576                                                    size_t felem_size,
 577                                                    void *tmp_felems,
 578                                                    void (*felem_one) (void *out),
 579                                                    int (*felem_is_zero)
 580                                                        (const void *in),
 581                                                    void (*felem_assign)
 582                                                        (void *out, const void *in),
 583                                                    void (*felem_square)
 584                                                        (void *out, const void *in),
 585                                                    void (*felem_mul)
 586                                                        (void *out,
 587                                                         const void *in1,
 588                                                         const void *in2),
 589                                                    void (*felem_inv)
 590                                                        (void *out, const void *in),
 591                                                    void (*felem_contract)
 592                                                        (void *out, const void *in));
 593 void ossl_ec_GFp_nistp_recode_scalar_bits(unsigned char *sign,
 594                                           unsigned char *digit,
 595                                           unsigned char in);
 596 #endif
 597 int ossl_ec_group_simple_order_bits(const EC_GROUP *group);
 598
 599 /**
 600  *  Creates a new EC_GROUP object
 601  *  \param   libctx The associated library context or NULL for the default
 602  *                  library context
 603  *  \param   propq  Any property query string
 604  *  \param   meth   EC_METHOD to use
 605  *  \return  newly created EC_GROUP object or NULL in case of an error.
 606  */
 607 EC_GROUP *ossl_ec_group_new_ex(OSSL_LIB_CTX *libctx, const char *propq,
 608                                const EC_METHOD *meth);
 609
 610 #ifdef ECP_NISTZ256_ASM
 611 /** Returns GFp methods using montgomery multiplication, with x86-64 optimized
 612  * P256. See http://eprint.iacr.org/2013/816.
 613  *  \return  EC_METHOD object
 614  */
 615 const EC_METHOD *EC_GFp_nistz256_method(void);
 616 #endif
 617 #ifdef S390X_EC_ASM
 618 const EC_METHOD *EC_GFp_s390x_nistp256_method(void);
 619 const EC_METHOD *EC_GFp_s390x_nistp384_method(void);
 620 const EC_METHOD *EC_GFp_s390x_nistp521_method(void);
 621 #endif
 622
 623 size_t ossl_ec_key_simple_priv2oct(const EC_KEY *eckey,
 624                                    unsigned char *buf, size_t len);
 625 int ossl_ec_key_simple_oct2priv(EC_KEY *eckey, const unsigned char *buf,
 626                                 size_t len);
 627 int ossl_ec_key_simple_generate_key(EC_KEY *eckey);
 628 int ossl_ec_key_simple_generate_public_key(EC_KEY *eckey);
 629 int ossl_ec_key_simple_check_key(const EC_KEY *eckey);
 630
 631 int ossl_ec_curve_nid_from_params(const EC_GROUP *group, BN_CTX *ctx);
 632
 633 /* EC_METHOD definitions */
 634
 635 struct ec_key_method_st {
 636     const char *name;
 637     int32_t flags;
 638     int (*init)(EC_KEY *key);
 639     void (*finish)(EC_KEY *key);
 640     int (*copy)(EC_KEY *dest, const EC_KEY *src);
 641     int (*set_group)(EC_KEY *key, const EC_GROUP *grp);
 642     int (*set_private)(EC_KEY *key, const BIGNUM *priv_key);
 643     int (*set_public)(EC_KEY *key, const EC_POINT *pub_key);
 644     int (*keygen)(EC_KEY *key);
 645     int (*compute_key)(unsigned char **pout, size_t *poutlen,
 646                        const EC_POINT *pub_key, const EC_KEY *ecdh);
 647     int (*sign)(int type, const unsigned char *dgst, int dlen, unsigned char
 648                 *sig, unsigned int *siglen, const BIGNUM *kinv,
 649                 const BIGNUM *r, EC_KEY *eckey);
 650     int (*sign_setup)(EC_KEY *eckey, BN_CTX *ctx_in, BIGNUM **kinvp,
 651                       BIGNUM **rp);
 652     ECDSA_SIG *(*sign_sig)(const unsigned char *dgst, int dgst_len,
 653                            const BIGNUM *in_kinv, const BIGNUM *in_r,
 654                            EC_KEY *eckey);
 655
 656     int (*verify)(int type, const unsigned char *dgst, int dgst_len,
 657                   const unsigned char *sigbuf, int sig_len, EC_KEY *eckey);
 658     int (*verify_sig)(const unsigned char *dgst, int dgst_len,
 659                       const ECDSA_SIG *sig, EC_KEY *eckey);
 660 };
 661
 662 #define EC_KEY_METHOD_DYNAMIC   1
 663
 664 EC_KEY *ossl_ec_key_new_method_int(OSSL_LIB_CTX *libctx, const char *propq,
 665                                    ENGINE *engine);
 666
 667 int ossl_ec_key_gen(EC_KEY *eckey);
 668 int ossl_ecdh_compute_key(unsigned char **pout, size_t *poutlen,
 669                           const EC_POINT *pub_key, const EC_KEY *ecdh);
 670 int ossl_ecdh_simple_compute_key(unsigned char **pout, size_t *poutlen,
 671                                  const EC_POINT *pub_key, const EC_KEY *ecdh);
 672
 673 struct ECDSA_SIG_st {
 674     BIGNUM *r;
 675     BIGNUM *s;
 676 };
 677
 678 int ossl_ecdsa_sign_setup(EC_KEY *eckey, BN_CTX *ctx_in, BIGNUM **kinvp,
 679                           BIGNUM **rp);
 680 int ossl_ecdsa_sign(int type, const unsigned char *dgst, int dlen,
 681                     unsigned char *sig, unsigned int *siglen,
 682                     const BIGNUM *kinv, const BIGNUM *r, EC_KEY *eckey);
 683 ECDSA_SIG *ossl_ecdsa_sign_sig(const unsigned char *dgst, int dgst_len,
 684                                const BIGNUM *in_kinv, const BIGNUM *in_r,
 685                                EC_KEY *eckey);
 686 int ossl_ecdsa_verify(int type, const unsigned char *dgst, int dgst_len,
 687                       const unsigned char *sigbuf, int sig_len, EC_KEY *eckey);
 688 int ossl_ecdsa_verify_sig(const unsigned char *dgst, int dgst_len,
 689                           const ECDSA_SIG *sig, EC_KEY *eckey);
 690 int ossl_ecdsa_simple_sign_setup(EC_KEY *eckey, BN_CTX *ctx_in, BIGNUM **kinvp,
 691                                  BIGNUM **rp);
 692 ECDSA_SIG *ossl_ecdsa_simple_sign_sig(const unsigned char *dgst, int dgst_len,
 693                                       const BIGNUM *in_kinv, const BIGNUM *in_r,
 694                                       EC_KEY *eckey);
 695 int ossl_ecdsa_simple_verify_sig(const unsigned char *dgst, int dgst_len,
 696                                  const ECDSA_SIG *sig, EC_KEY *eckey);
 697
 698
 699 /*-
 700  * This functions computes a single point multiplication over the EC group,
 701  * using, at a high level, a Montgomery ladder with conditional swaps, with
 702  * various timing attack defenses.
 703  *
 704  * It performs either a fixed point multiplication
 705  *          (scalar * generator)
 706  * when point is NULL, or a variable point multiplication
 707  *          (scalar * point)
 708  * when point is not NULL.
 709  *
 710  * `scalar` cannot be NULL and should be in the range [0,n) otherwise all
 711  * constant time bets are off (where n is the cardinality of the EC group).
 712  *
 713  * This function expects `group->order` and `group->cardinality` to be well
 714  * defined and non-zero: it fails with an error code otherwise.
 715  *
 716  * NB: This says nothing about the constant-timeness of the ladder step
 717  * implementation (i.e., the default implementation is based on EC_POINT_add and
 718  * EC_POINT_dbl, which of course are not constant time themselves) or the
 719  * underlying multiprecision arithmetic.
 720  *
 721  * The product is stored in `r`.
 722  *
 723  * This is an internal function: callers are in charge of ensuring that the
 724  * input parameters `group`, `r`, `scalar` and `ctx` are not NULL.
 725  *
 726  * Returns 1 on success, 0 otherwise.
 727  */
 728 int ossl_ec_scalar_mul_ladder(const EC_GROUP *group, EC_POINT *r,
 729                               const BIGNUM *scalar, const EC_POINT *point,
 730                               BN_CTX *ctx);
 731
 732 int ossl_ec_point_blind_coordinates(const EC_GROUP *group, EC_POINT *p,
 733                                     BN_CTX *ctx);
 734
 735 static ossl_inline int ec_point_ladder_pre(const EC_GROUP *group,
 736                                            EC_POINT *r, EC_POINT *s,
 737                                            EC_POINT *p, BN_CTX *ctx)
 738 {
 739     if (group->meth->ladder_pre != NULL)
 740         return group->meth->ladder_pre(group, r, s, p, ctx);
 741
 742     if (!EC_POINT_copy(s, p)
 743         || !EC_POINT_dbl(group, r, s, ctx))
 744         return 0;
 745
 746     return 1;
 747 }
 748
 749 static ossl_inline int ec_point_ladder_step(const EC_GROUP *group,
 750                                             EC_POINT *r, EC_POINT *s,
 751                                             EC_POINT *p, BN_CTX *ctx)
 752 {
 753     if (group->meth->ladder_step != NULL)
 754         return group->meth->ladder_step(group, r, s, p, ctx);
 755
 756     if (!EC_POINT_add(group, s, r, s, ctx)
 757         || !EC_POINT_dbl(group, r, r, ctx))
 758         return 0;
 759
 760     return 1;
 761
 762 }
 763
 764 static ossl_inline int ec_point_ladder_post(const EC_GROUP *group,
 765                                             EC_POINT *r, EC_POINT *s,
 766                                             EC_POINT *p, BN_CTX *ctx)
 767 {
 768     if (group->meth->ladder_post != NULL)
 769         return group->meth->ladder_post(group, r, s, p, ctx);
 770
 771     return 1;
 772 }