crypto/evp/names.c

   1 /*
   2  * Copyright 1995-2018 The OpenSSL Project Authors. All Rights Reserved.
   3  *
   4  * Licensed under the Apache License 2.0 (the "License").  You may not use
   5  * this file except in compliance with the License.  You can obtain a copy
   6  * in the file LICENSE in the source distribution or at
   7  * https://www.openssl.org/source/license.html
   8  */
   9
  10 #include <stdio.h>
  11 #include "internal/cryptlib.h"
  12 #include <openssl/evp.h>
  13 #include <openssl/kdf.h>
  14 #include "internal/objects.h"
  15 #include <openssl/x509.h>
  16 #include "internal/evp_int.h"
  17
  18 int EVP_add_cipher(const EVP_CIPHER *c)
  19 {
  20     int r;
  21
  22     if (c == NULL)
  23         return 0;
  24
  25     r = OBJ_NAME_add(OBJ_nid2sn(c->nid), OBJ_NAME_TYPE_CIPHER_METH,
  26                      (const char *)c);
  27     if (r == 0)
  28         return 0;
  29     r = OBJ_NAME_add(OBJ_nid2ln(c->nid), OBJ_NAME_TYPE_CIPHER_METH,
  30                      (const char *)c);
  31     return r;
  32 }
  33
  34 int EVP_add_digest(const EVP_MD *md)
  35 {
  36     int r;
  37     const char *name;
  38
  39     name = OBJ_nid2sn(md->type);
  40     r = OBJ_NAME_add(name, OBJ_NAME_TYPE_MD_METH, (const char *)md);
  41     if (r == 0)
  42         return 0;
  43     r = OBJ_NAME_add(OBJ_nid2ln(md->type), OBJ_NAME_TYPE_MD_METH,
  44                      (const char *)md);
  45     if (r == 0)
  46         return 0;
  47
  48     if (md->pkey_type && md->type != md->pkey_type) {
  49         r = OBJ_NAME_add(OBJ_nid2sn(md->pkey_type),
  50                          OBJ_NAME_TYPE_MD_METH | OBJ_NAME_ALIAS, name);
  51         if (r == 0)
  52             return 0;
  53         r = OBJ_NAME_add(OBJ_nid2ln(md->pkey_type),
  54                          OBJ_NAME_TYPE_MD_METH | OBJ_NAME_ALIAS, name);
  55     }
  56     return r;
  57 }
  58
  59 /* TODO(3.0) Is this needed after changing to providers? */
  60 int EVP_add_kdf(const EVP_KDF *k)
  61 {
  62     int r;
  63
  64     if (k == NULL)
  65         return 0;
  66
  67     r = OBJ_NAME_add(OBJ_nid2sn(k->type), OBJ_NAME_TYPE_KDF_METH,
  68                      (const char *)k);
  69     if (r == 0)
  70         return 0;
  71     r = OBJ_NAME_add(OBJ_nid2ln(k->type), OBJ_NAME_TYPE_KDF_METH,
  72                      (const char *)k);
  73     return r;
  74 }
  75
  76 const EVP_CIPHER *EVP_get_cipherbyname(const char *name)
  77 {
  78     const EVP_CIPHER *cp;
  79
  80     if (!OPENSSL_init_crypto(OPENSSL_INIT_ADD_ALL_CIPHERS, NULL))
  81         return NULL;
  82
  83     cp = (const EVP_CIPHER *)OBJ_NAME_get(name, OBJ_NAME_TYPE_CIPHER_METH);
  84     return cp;
  85 }
  86
  87 const EVP_MD *EVP_get_digestbyname(const char *name)
  88 {
  89     const EVP_MD *cp;
  90
  91     if (!OPENSSL_init_crypto(OPENSSL_INIT_ADD_ALL_DIGESTS, NULL))
  92         return NULL;
  93
  94     cp = (const EVP_MD *)OBJ_NAME_get(name, OBJ_NAME_TYPE_MD_METH);
  95     return cp;
  96 }
  97
  98 /* TODO(3.0) Is this API needed after implementing providers? */
  99 const EVP_KDF *EVP_get_kdfbyname(const char *name)
 100 {
 101     const EVP_KDF *kdf;
 102
 103     if (!OPENSSL_init_crypto(OPENSSL_INIT_ADD_ALL_KDFS, NULL))
 104         return NULL;
 105
 106     kdf = (const EVP_KDF *)OBJ_NAME_get(name, OBJ_NAME_TYPE_KDF_METH);
 107     return kdf;
 108 }
 109
 110 void evp_cleanup_int(void)
 111 {
 112     OBJ_NAME_cleanup(OBJ_NAME_TYPE_KDF_METH);
 113     OBJ_NAME_cleanup(OBJ_NAME_TYPE_CIPHER_METH);
 114     OBJ_NAME_cleanup(OBJ_NAME_TYPE_MD_METH);
 115     /*
 116      * The above calls will only clean out the contents of the name hash
 117      * table, but not the hash table itself.  The following line does that
 118      * part.  -- Richard Levitte
 119      */
 120     OBJ_NAME_cleanup(-1);
 121
 122     EVP_PBE_cleanup();
 123     OBJ_sigid_free();
 124
 125     evp_app_cleanup_int();
 126 }
 127
 128 struct doall_cipher {
 129     void *arg;
 130     void (*fn) (const EVP_CIPHER *ciph,
 131                 const char *from, const char *to, void *arg);
 132 };
 133
 134 static void do_all_cipher_fn(const OBJ_NAME *nm, void *arg)
 135 {
 136     struct doall_cipher *dc = arg;
 137     if (nm->alias)
 138         dc->fn(NULL, nm->name, nm->data, dc->arg);
 139     else
 140         dc->fn((const EVP_CIPHER *)nm->data, nm->name, NULL, dc->arg);
 141 }
 142
 143 void EVP_CIPHER_do_all(void (*fn) (const EVP_CIPHER *ciph,
 144                                    const char *from, const char *to, void *x),
 145                        void *arg)
 146 {
 147     struct doall_cipher dc;
 148
 149     /* Ignore errors */
 150     OPENSSL_init_crypto(OPENSSL_INIT_ADD_ALL_CIPHERS, NULL);
 151
 152     dc.fn = fn;
 153     dc.arg = arg;
 154     OBJ_NAME_do_all(OBJ_NAME_TYPE_CIPHER_METH, do_all_cipher_fn, &dc);
 155 }
 156
 157 void EVP_CIPHER_do_all_sorted(void (*fn) (const EVP_CIPHER *ciph,
 158                                           const char *from, const char *to,
 159                                           void *x), void *arg)
 160 {
 161     struct doall_cipher dc;
 162
 163     /* Ignore errors */
 164     OPENSSL_init_crypto(OPENSSL_INIT_ADD_ALL_CIPHERS, NULL);
 165
 166     dc.fn = fn;
 167     dc.arg = arg;
 168     OBJ_NAME_do_all_sorted(OBJ_NAME_TYPE_CIPHER_METH, do_all_cipher_fn, &dc);
 169 }
 170
 171 struct doall_md {
 172     void *arg;
 173     void (*fn) (const EVP_MD *ciph,
 174                 const char *from, const char *to, void *arg);
 175 };
 176
 177 static void do_all_md_fn(const OBJ_NAME *nm, void *arg)
 178 {
 179     struct doall_md *dc = arg;
 180     if (nm->alias)
 181         dc->fn(NULL, nm->name, nm->data, dc->arg);
 182     else
 183         dc->fn((const EVP_MD *)nm->data, nm->name, NULL, dc->arg);
 184 }
 185
 186 void EVP_MD_do_all(void (*fn) (const EVP_MD *md,
 187                                const char *from, const char *to, void *x),
 188                    void *arg)
 189 {
 190     struct doall_md dc;
 191
 192     /* Ignore errors */
 193     OPENSSL_init_crypto(OPENSSL_INIT_ADD_ALL_DIGESTS, NULL);
 194
 195     dc.fn = fn;
 196     dc.arg = arg;
 197     OBJ_NAME_do_all(OBJ_NAME_TYPE_MD_METH, do_all_md_fn, &dc);
 198 }
 199
 200 void EVP_MD_do_all_sorted(void (*fn) (const EVP_MD *md,
 201                                       const char *from, const char *to,
 202                                       void *x), void *arg)
 203 {
 204     struct doall_md dc;
 205
 206     OPENSSL_init_crypto(OPENSSL_INIT_ADD_ALL_DIGESTS, NULL);
 207
 208     dc.fn = fn;
 209     dc.arg = arg;
 210     OBJ_NAME_do_all_sorted(OBJ_NAME_TYPE_MD_METH, do_all_md_fn, &dc);
 211 }