crypto/ecdh/ech_lib.c

   1 /* crypto/ecdh/ech_lib.c */
   2 /* ====================================================================
   3  * Copyright 2002 Sun Microsystems, Inc. ALL RIGHTS RESERVED.
   4  *
   5  * The Elliptic Curve Public-Key Crypto Library (ECC Code) included
   6  * herein is developed by SUN MICROSYSTEMS, INC., and is contributed
   7  * to the OpenSSL project.
   8  *
   9  * The ECC Code is licensed pursuant to the OpenSSL open source
  10  * license provided below.
  11  *
  12  * In addition, Sun covenants to all licensees who provide a reciprocal
  13  * covenant with respect to their own patents if any, not to sue under
  14  * current and future patent claims necessarily infringed by the making,
  15  * using, practicing, selling, offering for sale and/or otherwise
  16  * disposing of the ECC Code as delivered hereunder (or portions thereof),
  17  * provided that such covenant shall not apply:
  18  *  1) for code that a licensee deletes from the ECC Code;
  19  *  2) separates from the ECC Code; or
  20  *  3) for infringements caused by:
  21  *       i) the modification of the ECC Code or
  22  *      ii) the combination of the ECC Code with other software or
  23  *          devices where such combination causes the infringement.
  24  *
  25  * The ECDH software is originally written by Douglas Stebila of
  26  * Sun Microsystems Laboratories.
  27  *
  28  */
  29 /* ====================================================================
  30  * Copyright (c) 1998-2002 The OpenSSL Project.  All rights reserved.
  31  *
  32  * Redistribution and use in source and binary forms, with or without
  33  * modification, are permitted provided that the following conditions
  34  * are met:
  35  *
  36  * 1. Redistributions of source code must retain the above copyright
  37  *    notice, this list of conditions and the following disclaimer.
  38  *
  39  * 2. Redistributions in binary form must reproduce the above copyright
  40  *    notice, this list of conditions and the following disclaimer in
  41  *    the documentation and/or other materials provided with the
  42  *    distribution.
  43  *
  44  * 3. All advertising materials mentioning features or use of this
  45  *    software must display the following acknowledgment:
  46  *    "This product includes software developed by the OpenSSL Project
  47  *    for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)"
  48  *
  49  * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to
  50  *    endorse or promote products derived from this software without
  51  *    prior written permission. For written permission, please contact
  52  *    openssl-core@OpenSSL.org.
  53  *
  54  * 5. Products derived from this software may not be called "OpenSSL"
  55  *    nor may "OpenSSL" appear in their names without prior written
  56  *    permission of the OpenSSL Project.
  57  *
  58  * 6. Redistributions of any form whatsoever must retain the following
  59  *    acknowledgment:
  60  *    "This product includes software developed by the OpenSSL Project
  61  *    for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)"
  62  *
  63  * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY
  64  * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  65  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
  66  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE OpenSSL PROJECT OR
  67  * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
  68  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  69  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
  70  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  71  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
  72  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
  73  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
  74  * OF THE POSSIBILITY OF SUCH DAMAGE.
  75  * ====================================================================
  76  *
  77  * This product includes cryptographic software written by Eric Young
  78  * (eay@cryptsoft.com).  This product includes software written by Tim
  79  * Hudson (tjh@cryptsoft.com).
  80  *
  81  */
  82
  83 #include "ecdh.h"
  84 #include <string.h>
  85 #include <openssl/engine.h>
  86
  87 const char *ECDH_version="ECDH" OPENSSL_VERSION_PTEXT;
  88
  89 static void ecdh_finish(EC_KEY *);
  90
  91 static const ECDH_METHOD *default_ECDH_method = NULL;
  92
  93 void ECDH_set_default_method(const ECDH_METHOD *meth)
  94         {
  95         default_ECDH_method = meth;
  96         }
  97
  98 const ECDH_METHOD *ECDH_get_default_method(void)
  99         {
 100         if(!default_ECDH_method)
 101                 default_ECDH_method = ECDH_OpenSSL();
 102         return default_ECDH_method;
 103         }
 104
 105 int ECDH_set_method(EC_KEY *eckey, const ECDH_METHOD *meth)
 106         {
 107         const ECDH_METHOD *mtmp;
 108         ECDH_DATA *ecdh;
 109
 110         ecdh = ecdh_check(eckey);
 111
 112         if (ecdh == NULL)
 113                 return 0;
 114
 115         mtmp = ecdh->meth;
 116 #if 0
 117         if (mtmp->finish)
 118                 mtmp->finish(eckey);
 119 #endif
 120         if (ecdh->engine)
 121                 {
 122                 ENGINE_finish(ecdh->engine);
 123                 ecdh->engine = NULL;
 124                 }
 125         ecdh->meth = meth;
 126 #if 0
 127         if (meth->init)
 128                 meth->init(eckey);
 129 #endif
 130         return 1;
 131         }
 132
 133 ECDH_DATA *ECDH_DATA_new(void)
 134         {
 135         return ECDH_DATA_new_method(NULL);
 136         }
 137
 138 ECDH_DATA *ECDH_DATA_new_method(ENGINE *engine)
 139         {
 140         ECDH_DATA *ret;
 141
 142         ret=(ECDH_DATA *)OPENSSL_malloc(sizeof(ECDH_DATA));
 143         if (ret == NULL)
 144                 {
 145                 ECDHerr(ECDH_F_ECDH_DATA_NEW, ERR_R_MALLOC_FAILURE);
 146                 return(NULL);
 147                 }
 148
 149         ret->init = NULL;
 150         ret->finish = ecdh_finish;
 151
 152         ret->meth = ECDH_get_default_method();
 153         ret->engine = engine;
 154         if (!ret->engine)
 155                 ret->engine = ENGINE_get_default_ECDH();
 156         if (ret->engine)
 157                 {
 158                 ret->meth = ENGINE_get_ECDH(ret->engine);
 159                 if (!ret->meth)
 160                         {
 161                         ECDHerr(ECDH_F_ECDH_DATA_NEW, ERR_R_ENGINE_LIB);
 162                         ENGINE_finish(ret->engine);
 163                         OPENSSL_free(ret);
 164                         return NULL;
 165                         }
 166                 }
 167
 168         ret->flags = ret->meth->flags;
 169         CRYPTO_new_ex_data(CRYPTO_EX_INDEX_ECDH, ret, &ret->ex_data);
 170 #if 0
 171         if ((ret->meth->init != NULL) && !ret->meth->init(ret))
 172                 {
 173                 CRYPTO_free_ex_data(CRYPTO_EX_INDEX_ECDH, ret, &ret->ex_data);
 174                 OPENSSL_free(ret);
 175                 ret=NULL;
 176                 }
 177 #endif
 178         return(ret);
 179         }
 180
 181 void ECDH_DATA_free(ECDH_DATA *r)
 182         {
 183 #if 0
 184         if (r->meth->finish)
 185                 r->meth->finish(r);
 186 #endif
 187         if (r->engine)
 188                 ENGINE_finish(r->engine);
 189
 190         CRYPTO_free_ex_data(CRYPTO_EX_INDEX_ECDH, r, &r->ex_data);
 191
 192         memset((void *)r, 0x0, sizeof(ECDH_DATA));
 193
 194         OPENSSL_free(r);
 195         }
 196
 197 ECDH_DATA *ecdh_check(EC_KEY *key)
 198         {
 199         if (key->meth_data)
 200                 {
 201                 if (key->meth_data->finish != ecdh_finish)
 202                         {
 203                         key->meth_data->finish(key);
 204                         key->meth_data = (EC_KEY_METH_DATA *)ECDH_DATA_new();
 205                         }
 206                 }
 207         else
 208                 key->meth_data = (EC_KEY_METH_DATA *)ECDH_DATA_new();
 209         return (ECDH_DATA *)key->meth_data;
 210         }
 211
 212 static void ecdh_finish(EC_KEY *key)
 213         {
 214         if (key->meth_data && key->meth_data->finish == ecdh_finish)
 215                 ECDH_DATA_free((ECDH_DATA *)key->meth_data);
 216         }
 217
 218
 219 int ECDH_size(const EC_KEY *ecdh)
 220         {
 221         return 20;
 222         }
 223
 224
 225 int ECDH_get_ex_new_index(long argl, void *argp, CRYPTO_EX_new *new_func,
 226              CRYPTO_EX_dup *dup_func, CRYPTO_EX_free *free_func)
 227         {
 228         return CRYPTO_get_ex_new_index(CRYPTO_EX_INDEX_ECDH, argl, argp,
 229                                 new_func, dup_func, free_func);
 230         }
 231
 232 int ECDH_set_ex_data(EC_KEY *d, int idx, void *arg)
 233         {
 234         ECDH_DATA *ecdh;
 235         ecdh = ecdh_check(d);
 236         if (ecdh == NULL)
 237                 return 0;
 238         return(CRYPTO_set_ex_data(&ecdh->ex_data,idx,arg));
 239         }
 240
 241 void *ECDH_get_ex_data(EC_KEY *d, int idx)
 242         {
 243         ECDH_DATA *ecdh;
 244         ecdh = ecdh_check(d);
 245         if (ecdh == NULL)
 246                 return NULL;
 247         return(CRYPTO_get_ex_data(&ecdh->ex_data,idx));
 248         }