Return an error in ASN1_TYPE_unpack_sequence if argument is NULL
[openssl.git] / crypto / ecdh / ech_kdf.c
1 /* crypto/ecdh/ec_kdf.c */
2 /*
3  * Written by Stephen Henson for the OpenSSL project.
4  */
5 /* ====================================================================
6  * Copyright (c) 2013 The OpenSSL Project.  All rights reserved.
7  *
8  * Redistribution and use in source and binary forms, with or without
9  * modification, are permitted provided that the following conditions
10  * are met:
11  *
12  * 1. Redistributions of source code must retain the above copyright
13  *    notice, this list of conditions and the following disclaimer.
14  *
15  * 2. Redistributions in binary form must reproduce the above copyright
16  *    notice, this list of conditions and the following disclaimer in
17  *    the documentation and/or other materials provided with the
18  *    distribution.
19  *
20  * 3. All advertising materials mentioning features or use of this
21  *    software must display the following acknowledgment:
22  *    "This product includes software developed by the OpenSSL Project
23  *    for use in the OpenSSL Toolkit. (http://www.openssl.org/)"
24  *
25  * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to
26  *    endorse or promote products derived from this software without
27  *    prior written permission. For written permission, please contact
28  *    openssl-core@openssl.org.
29  *
30  * 5. Products derived from this software may not be called "OpenSSL"
31  *    nor may "OpenSSL" appear in their names without prior written
32  *    permission of the OpenSSL Project.
33  *
34  * 6. Redistributions of any form whatsoever must retain the following
35  *    acknowledgment:
36  *    "This product includes software developed by the OpenSSL Project
37  *    for use in the OpenSSL Toolkit (http://www.openssl.org/)"
38  *
39  * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY
40  * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
41  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
42  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE OpenSSL PROJECT OR
43  * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
44  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
45  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
46  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
47  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
48  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
49  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
50  * OF THE POSSIBILITY OF SUCH DAMAGE.
51  * ====================================================================
52  */
53
54 #include <string.h>
55 #include <openssl/ecdh.h>
56 #include <openssl/evp.h>
57
58 /* Key derivation function from X9.62/SECG */
59 /* Way more than we will ever need */
60 #define ECDH_KDF_MAX    (1 << 30)
61
62 int ECDH_KDF_X9_62(unsigned char *out, size_t outlen,
63                    const unsigned char *Z, size_t Zlen,
64                    const unsigned char *sinfo, size_t sinfolen,
65                    const EVP_MD *md)
66 {
67     EVP_MD_CTX mctx;
68     int rv = 0;
69     unsigned int i;
70     size_t mdlen;
71     unsigned char ctr[4];
72     if (sinfolen > ECDH_KDF_MAX || outlen > ECDH_KDF_MAX
73         || Zlen > ECDH_KDF_MAX)
74         return 0;
75     mdlen = EVP_MD_size(md);
76     EVP_MD_CTX_init(&mctx);
77     for (i = 1;; i++) {
78         unsigned char mtmp[EVP_MAX_MD_SIZE];
79         EVP_DigestInit_ex(&mctx, md, NULL);
80         ctr[3] = i & 0xFF;
81         ctr[2] = (i >> 8) & 0xFF;
82         ctr[1] = (i >> 16) & 0xFF;
83         ctr[0] = (i >> 24) & 0xFF;
84         if (!EVP_DigestUpdate(&mctx, Z, Zlen))
85             goto err;
86         if (!EVP_DigestUpdate(&mctx, ctr, sizeof(ctr)))
87             goto err;
88         if (!EVP_DigestUpdate(&mctx, sinfo, sinfolen))
89             goto err;
90         if (outlen >= mdlen) {
91             if (!EVP_DigestFinal(&mctx, out, NULL))
92                 goto err;
93             outlen -= mdlen;
94             if (outlen == 0)
95                 break;
96             out += mdlen;
97         } else {
98             if (!EVP_DigestFinal(&mctx, mtmp, NULL))
99                 goto err;
100             memcpy(out, mtmp, outlen);
101             OPENSSL_cleanse(mtmp, mdlen);
102             break;
103         }
104     }
105     rv = 1;
106  err:
107     EVP_MD_CTX_cleanup(&mctx);
108     return rv;
109 }