| // Copyright 2002-2016 The OpenSSL Project Authors. All Rights Reserved. | 
 | // Copyright (c) 2002, Oracle and/or its affiliates. All rights reserved. | 
 | // | 
 | // Licensed under the Apache License, Version 2.0 (the "License"); | 
 | // you may not use this file except in compliance with the License. | 
 | // You may obtain a copy of the License at | 
 | // | 
 | //     https://www.apache.org/licenses/LICENSE-2.0 | 
 | // | 
 | // Unless required by applicable law or agreed to in writing, software | 
 | // distributed under the License is distributed on an "AS IS" BASIS, | 
 | // WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. | 
 | // See the License for the specific language governing permissions and | 
 | // limitations under the License. | 
 |  | 
 | #include <openssl/ecdh.h> | 
 |  | 
 | #include <limits.h> | 
 | #include <string.h> | 
 |  | 
 | #include <openssl/digest.h> | 
 | #include <openssl/err.h> | 
 | #include <openssl/mem.h> | 
 |  | 
 | #include "../fipsmodule/ec/internal.h" | 
 | #include "../internal.h" | 
 |  | 
 |  | 
 | int ECDH_compute_key(void *out, size_t out_len, const EC_POINT *pub_key, | 
 |                      const EC_KEY *priv_key, | 
 |                      void *(*kdf)(const void *in, size_t inlen, void *out, | 
 |                                   size_t *out_len)) { | 
 |   if (priv_key->priv_key == NULL) { | 
 |     OPENSSL_PUT_ERROR(ECDH, ECDH_R_NO_PRIVATE_VALUE); | 
 |     return -1; | 
 |   } | 
 |   const EC_SCALAR *const priv = &priv_key->priv_key->scalar; | 
 |   const EC_GROUP *const group = EC_KEY_get0_group(priv_key); | 
 |   if (EC_GROUP_cmp(group, pub_key->group, NULL) != 0) { | 
 |     OPENSSL_PUT_ERROR(EC, EC_R_INCOMPATIBLE_OBJECTS); | 
 |     return -1; | 
 |   } | 
 |  | 
 |   EC_JACOBIAN shared_point; | 
 |   uint8_t buf[EC_MAX_BYTES]; | 
 |   size_t buf_len; | 
 |   if (!ec_point_mul_scalar(group, &shared_point, &pub_key->raw, priv) || | 
 |       !ec_get_x_coordinate_as_bytes(group, buf, &buf_len, sizeof(buf), | 
 |                                     &shared_point)) { | 
 |     OPENSSL_PUT_ERROR(ECDH, ECDH_R_POINT_ARITHMETIC_FAILURE); | 
 |     return -1; | 
 |   } | 
 |  | 
 |   if (kdf != NULL) { | 
 |     if (kdf(buf, buf_len, out, &out_len) == NULL) { | 
 |       OPENSSL_PUT_ERROR(ECDH, ECDH_R_KDF_FAILED); | 
 |       return -1; | 
 |     } | 
 |   } else { | 
 |     // no KDF, just copy as much as we can | 
 |     if (buf_len < out_len) { | 
 |       out_len = buf_len; | 
 |     } | 
 |     OPENSSL_memcpy(out, buf, out_len); | 
 |   } | 
 |  | 
 |   if (out_len > INT_MAX) { | 
 |     OPENSSL_PUT_ERROR(ECDH, ERR_R_OVERFLOW); | 
 |     return -1; | 
 |   } | 
 |  | 
 |   return (int)out_len; | 
 | } |