crypto/evp/evp_locl.h

   1 /* evp_locl.h */
   2 /*
   3  * Written by Dr Stephen N Henson (steve@openssl.org) for the OpenSSL project
   4  * 2000.
   5  */
   6 /* ====================================================================
   7  * Copyright (c) 1999 The OpenSSL Project.  All rights reserved.
   8  *
   9  * Redistribution and use in source and binary forms, with or without
  10  * modification, are permitted provided that the following conditions
  11  * are met:
  12  *
  13  * 1. Redistributions of source code must retain the above copyright
  14  *    notice, this list of conditions and the following disclaimer.
  15  *
  16  * 2. Redistributions in binary form must reproduce the above copyright
  17  *    notice, this list of conditions and the following disclaimer in
  18  *    the documentation and/or other materials provided with the
  19  *    distribution.
  20  *
  21  * 3. All advertising materials mentioning features or use of this
  22  *    software must display the following acknowledgment:
  23  *    "This product includes software developed by the OpenSSL Project
  24  *    for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)"
  25  *
  26  * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to
  27  *    endorse or promote products derived from this software without
  28  *    prior written permission. For written permission, please contact
  29  *    licensing@OpenSSL.org.
  30  *
  31  * 5. Products derived from this software may not be called "OpenSSL"
  32  *    nor may "OpenSSL" appear in their names without prior written
  33  *    permission of the OpenSSL Project.
  34  *
  35  * 6. Redistributions of any form whatsoever must retain the following
  36  *    acknowledgment:
  37  *    "This product includes software developed by the OpenSSL Project
  38  *    for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)"
  39  *
  40  * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY
  41  * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  42  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
  43  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE OpenSSL PROJECT OR
  44  * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
  45  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  46  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
  47  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  48  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
  49  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
  50  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
  51  * OF THE POSSIBILITY OF SUCH DAMAGE.
  52  * ====================================================================
  53  *
  54  * This product includes cryptographic software written by Eric Young
  55  * (eay@cryptsoft.com).  This product includes software written by Tim
  56  * Hudson (tjh@cryptsoft.com).
  57  *
  58  */
  59
  60 /* Macros to code block cipher wrappers */
  61
  62 /* Wrapper functions for each cipher mode */
  63
  64 #define BLOCK_CIPHER_ecb_loop() \
  65         size_t i, bl; \
  66         bl = ctx->cipher->block_size;\
  67         if(inl < bl) return 1;\
  68         inl -= bl; \
  69         for(i=0; i <= inl; i+=bl)
  70
  71 #define BLOCK_CIPHER_func_ecb(cname, cprefix, kstruct, ksched) \
  72 static int cname##_ecb_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out, const unsigned char *in, size_t inl) \
  73 {\
  74         BLOCK_CIPHER_ecb_loop() \
  75                 cprefix##_ecb_encrypt(in + i, out + i, &((kstruct *)ctx->cipher_data)->ksched, ctx->encrypt);\
  76         return 1;\
  77 }
  78
  79 #define EVP_MAXCHUNK ((size_t)1<<(sizeof(long)*8-2))
  80
  81 #define BLOCK_CIPHER_func_ofb(cname, cprefix, cbits, kstruct, ksched) \
  82 static int cname##_ofb_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out, const unsigned char *in, size_t inl) \
  83 {\
  84         while(inl>=EVP_MAXCHUNK)\
  85             {\
  86             cprefix##_ofb##cbits##_encrypt(in, out, (long)EVP_MAXCHUNK, &((kstruct *)ctx->cipher_data)->ksched, ctx->iv, &ctx->num);\
  87             inl-=EVP_MAXCHUNK;\
  88             in +=EVP_MAXCHUNK;\
  89             out+=EVP_MAXCHUNK;\
  90             }\
  91         if (inl)\
  92             cprefix##_ofb##cbits##_encrypt(in, out, (long)inl, &((kstruct *)ctx->cipher_data)->ksched, ctx->iv, &ctx->num);\
  93         return 1;\
  94 }
  95
  96 #define BLOCK_CIPHER_func_cbc(cname, cprefix, kstruct, ksched) \
  97 static int cname##_cbc_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out, const unsigned char *in, size_t inl) \
  98 {\
  99         while(inl>=EVP_MAXCHUNK) \
 100             {\
 101             cprefix##_cbc_encrypt(in, out, (long)EVP_MAXCHUNK, &((kstruct *)ctx->cipher_data)->ksched, ctx->iv, ctx->encrypt);\
 102             inl-=EVP_MAXCHUNK;\
 103             in +=EVP_MAXCHUNK;\
 104             out+=EVP_MAXCHUNK;\
 105             }\
 106         if (inl)\
 107             cprefix##_cbc_encrypt(in, out, (long)inl, &((kstruct *)ctx->cipher_data)->ksched, ctx->iv, ctx->encrypt);\
 108         return 1;\
 109 }
 110
 111 #define BLOCK_CIPHER_func_cfb(cname, cprefix, cbits, kstruct, ksched) \
 112 static int cname##_cfb##cbits##_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out, const unsigned char *in, size_t inl) \
 113 {\
 114         size_t chunk=EVP_MAXCHUNK;\
 115         if (cbits==1)  chunk>>=3;\
 116         if (inl<chunk) chunk=inl;\
 117         while(inl && inl>=chunk)\
 118             {\
 119             cprefix##_cfb##cbits##_encrypt(in, out, (long)((cbits==1) && !(ctx->flags & EVP_CIPH_FLAG_LENGTH_BITS) ?inl*8:inl), &((kstruct *)ctx->cipher_data)->ksched, ctx->iv, &ctx->num, ctx->encrypt);\
 120             inl-=chunk;\
 121             in +=chunk;\
 122             out+=chunk;\
 123             if(inl<chunk) chunk=inl;\
 124             }\
 125         return 1;\
 126 }
 127
 128 #define BLOCK_CIPHER_all_funcs(cname, cprefix, cbits, kstruct, ksched) \
 129         BLOCK_CIPHER_func_cbc(cname, cprefix, kstruct, ksched) \
 130         BLOCK_CIPHER_func_cfb(cname, cprefix, cbits, kstruct, ksched) \
 131         BLOCK_CIPHER_func_ecb(cname, cprefix, kstruct, ksched) \
 132         BLOCK_CIPHER_func_ofb(cname, cprefix, cbits, kstruct, ksched)
 133
 134 #define BLOCK_CIPHER_def1(cname, nmode, mode, MODE, kstruct, nid, block_size, \
 135                           key_len, iv_len, flags, init_key, cleanup, \
 136                           set_asn1, get_asn1, ctrl) \
 137 static const EVP_CIPHER cname##_##mode = { \
 138         nid##_##nmode, block_size, key_len, iv_len, \
 139         flags | EVP_CIPH_##MODE##_MODE, \
 140         init_key, \
 141         cname##_##mode##_cipher, \
 142         cleanup, \
 143         sizeof(kstruct), \
 144         set_asn1, get_asn1,\
 145         ctrl, \
 146         NULL \
 147 }; \
 148 const EVP_CIPHER *EVP_##cname##_##mode(void) { return &cname##_##mode; }
 149
 150 #define BLOCK_CIPHER_def_cbc(cname, kstruct, nid, block_size, key_len, \
 151                              iv_len, flags, init_key, cleanup, set_asn1, \
 152                              get_asn1, ctrl) \
 153 BLOCK_CIPHER_def1(cname, cbc, cbc, CBC, kstruct, nid, block_size, key_len, \
 154                   iv_len, flags, init_key, cleanup, set_asn1, get_asn1, ctrl)
 155
 156 #define BLOCK_CIPHER_def_cfb(cname, kstruct, nid, key_len, \
 157                              iv_len, cbits, flags, init_key, cleanup, \
 158                              set_asn1, get_asn1, ctrl) \
 159 BLOCK_CIPHER_def1(cname, cfb##cbits, cfb##cbits, CFB, kstruct, nid, 1, \
 160                   key_len, iv_len, flags, init_key, cleanup, set_asn1, \
 161                   get_asn1, ctrl)
 162
 163 #define BLOCK_CIPHER_def_ofb(cname, kstruct, nid, key_len, \
 164                              iv_len, cbits, flags, init_key, cleanup, \
 165                              set_asn1, get_asn1, ctrl) \
 166 BLOCK_CIPHER_def1(cname, ofb##cbits, ofb, OFB, kstruct, nid, 1, \
 167                   key_len, iv_len, flags, init_key, cleanup, set_asn1, \
 168                   get_asn1, ctrl)
 169
 170 #define BLOCK_CIPHER_def_ecb(cname, kstruct, nid, block_size, key_len, \
 171                              flags, init_key, cleanup, set_asn1, \
 172                              get_asn1, ctrl) \
 173 BLOCK_CIPHER_def1(cname, ecb, ecb, ECB, kstruct, nid, block_size, key_len, \
 174                   0, flags, init_key, cleanup, set_asn1, get_asn1, ctrl)
 175
 176 #define BLOCK_CIPHER_defs(cname, kstruct, \
 177                           nid, block_size, key_len, iv_len, cbits, flags, \
 178                           init_key, cleanup, set_asn1, get_asn1, ctrl) \
 179 BLOCK_CIPHER_def_cbc(cname, kstruct, nid, block_size, key_len, iv_len, flags, \
 180                      init_key, cleanup, set_asn1, get_asn1, ctrl) \
 181 BLOCK_CIPHER_def_cfb(cname, kstruct, nid, key_len, iv_len, cbits, \
 182                      flags, init_key, cleanup, set_asn1, get_asn1, ctrl) \
 183 BLOCK_CIPHER_def_ofb(cname, kstruct, nid, key_len, iv_len, cbits, \
 184                      flags, init_key, cleanup, set_asn1, get_asn1, ctrl) \
 185 BLOCK_CIPHER_def_ecb(cname, kstruct, nid, block_size, key_len, flags, \
 186                      init_key, cleanup, set_asn1, get_asn1, ctrl)
 187
 188 /*-
 189 #define BLOCK_CIPHER_defs(cname, kstruct, \
 190                                 nid, block_size, key_len, iv_len, flags,\
 191                                  init_key, cleanup, set_asn1, get_asn1, ctrl)\
 192 static const EVP_CIPHER cname##_cbc = {\
 193         nid##_cbc, block_size, key_len, iv_len, \
 194         flags | EVP_CIPH_CBC_MODE,\
 195         init_key,\
 196         cname##_cbc_cipher,\
 197         cleanup,\
 198         sizeof(EVP_CIPHER_CTX)-sizeof((((EVP_CIPHER_CTX *)NULL)->c))+\
 199                 sizeof((((EVP_CIPHER_CTX *)NULL)->c.kstruct)),\
 200         set_asn1, get_asn1,\
 201         ctrl, \
 202         NULL \
 203 };\
 204 const EVP_CIPHER *EVP_##cname##_cbc(void) { return &cname##_cbc; }\
 205 static const EVP_CIPHER cname##_cfb = {\
 206         nid##_cfb64, 1, key_len, iv_len, \
 207         flags | EVP_CIPH_CFB_MODE,\
 208         init_key,\
 209         cname##_cfb_cipher,\
 210         cleanup,\
 211         sizeof(EVP_CIPHER_CTX)-sizeof((((EVP_CIPHER_CTX *)NULL)->c))+\
 212                 sizeof((((EVP_CIPHER_CTX *)NULL)->c.kstruct)),\
 213         set_asn1, get_asn1,\
 214         ctrl,\
 215         NULL \
 216 };\
 217 const EVP_CIPHER *EVP_##cname##_cfb(void) { return &cname##_cfb; }\
 218 static const EVP_CIPHER cname##_ofb = {\
 219         nid##_ofb64, 1, key_len, iv_len, \
 220         flags | EVP_CIPH_OFB_MODE,\
 221         init_key,\
 222         cname##_ofb_cipher,\
 223         cleanup,\
 224         sizeof(EVP_CIPHER_CTX)-sizeof((((EVP_CIPHER_CTX *)NULL)->c))+\
 225                 sizeof((((EVP_CIPHER_CTX *)NULL)->c.kstruct)),\
 226         set_asn1, get_asn1,\
 227         ctrl,\
 228         NULL \
 229 };\
 230 const EVP_CIPHER *EVP_##cname##_ofb(void) { return &cname##_ofb; }\
 231 static const EVP_CIPHER cname##_ecb = {\
 232         nid##_ecb, block_size, key_len, iv_len, \
 233         flags | EVP_CIPH_ECB_MODE,\
 234         init_key,\
 235         cname##_ecb_cipher,\
 236         cleanup,\
 237         sizeof(EVP_CIPHER_CTX)-sizeof((((EVP_CIPHER_CTX *)NULL)->c))+\
 238                 sizeof((((EVP_CIPHER_CTX *)NULL)->c.kstruct)),\
 239         set_asn1, get_asn1,\
 240         ctrl,\
 241         NULL \
 242 };\
 243 const EVP_CIPHER *EVP_##cname##_ecb(void) { return &cname##_ecb; }
 244 */
 245
 246 #define IMPLEMENT_BLOCK_CIPHER(cname, ksched, cprefix, kstruct, nid, \
 247                                block_size, key_len, iv_len, cbits, \
 248                                flags, init_key, \
 249                                cleanup, set_asn1, get_asn1, ctrl) \
 250         BLOCK_CIPHER_all_funcs(cname, cprefix, cbits, kstruct, ksched) \
 251         BLOCK_CIPHER_defs(cname, kstruct, nid, block_size, key_len, iv_len, \
 252                           cbits, flags, init_key, cleanup, set_asn1, \
 253                           get_asn1, ctrl)
 254
 255 #define EVP_C_DATA(kstruct, ctx)        ((kstruct *)(ctx)->cipher_data)
 256
 257 #define IMPLEMENT_CFBR(cipher,cprefix,kstruct,ksched,keysize,cbits,iv_len,fl) \
 258         BLOCK_CIPHER_func_cfb(cipher##_##keysize,cprefix,cbits,kstruct,ksched) \
 259         BLOCK_CIPHER_def_cfb(cipher##_##keysize,kstruct, \
 260                              NID_##cipher##_##keysize, keysize/8, iv_len, cbits, \
 261                              (fl)|EVP_CIPH_FLAG_DEFAULT_ASN1, \
 262                              cipher##_init_key, NULL, NULL, NULL, NULL)
 263
 264 struct evp_pkey_ctx_st {
 265     /* Method associated with this operation */
 266     const EVP_PKEY_METHOD *pmeth;
 267     /* Engine that implements this method or NULL if builtin */
 268     ENGINE *engine;
 269     /* Key: may be NULL */
 270     EVP_PKEY *pkey;
 271     /* Peer key for key agreement, may be NULL */
 272     EVP_PKEY *peerkey;
 273     /* Actual operation */
 274     int operation;
 275     /* Algorithm specific data */
 276     void *data;
 277     /* Application specific data */
 278     void *app_data;
 279     /* Keygen callback */
 280     EVP_PKEY_gen_cb *pkey_gencb;
 281     /* implementation specific keygen data */
 282     int *keygen_info;
 283     int keygen_info_count;
 284 } /* EVP_PKEY_CTX */ ;
 285
 286 #define EVP_PKEY_FLAG_DYNAMIC   1
 287
 288 struct evp_pkey_method_st {
 289     int pkey_id;
 290     int flags;
 291     int (*init) (EVP_PKEY_CTX *ctx);
 292     int (*copy) (EVP_PKEY_CTX *dst, EVP_PKEY_CTX *src);
 293     void (*cleanup) (EVP_PKEY_CTX *ctx);
 294     int (*paramgen_init) (EVP_PKEY_CTX *ctx);
 295     int (*paramgen) (EVP_PKEY_CTX *ctx, EVP_PKEY *pkey);
 296     int (*keygen_init) (EVP_PKEY_CTX *ctx);
 297     int (*keygen) (EVP_PKEY_CTX *ctx, EVP_PKEY *pkey);
 298     int (*sign_init) (EVP_PKEY_CTX *ctx);
 299     int (*sign) (EVP_PKEY_CTX *ctx, unsigned char *sig, size_t *siglen,
 300                  const unsigned char *tbs, size_t tbslen);
 301     int (*verify_init) (EVP_PKEY_CTX *ctx);
 302     int (*verify) (EVP_PKEY_CTX *ctx,
 303                    const unsigned char *sig, size_t siglen,
 304                    const unsigned char *tbs, size_t tbslen);
 305     int (*verify_recover_init) (EVP_PKEY_CTX *ctx);
 306     int (*verify_recover) (EVP_PKEY_CTX *ctx,
 307                            unsigned char *rout, size_t *routlen,
 308                            const unsigned char *sig, size_t siglen);
 309     int (*signctx_init) (EVP_PKEY_CTX *ctx, EVP_MD_CTX *mctx);
 310     int (*signctx) (EVP_PKEY_CTX *ctx, unsigned char *sig, size_t *siglen,
 311                     EVP_MD_CTX *mctx);
 312     int (*verifyctx_init) (EVP_PKEY_CTX *ctx, EVP_MD_CTX *mctx);
 313     int (*verifyctx) (EVP_PKEY_CTX *ctx, const unsigned char *sig, int siglen,
 314                       EVP_MD_CTX *mctx);
 315     int (*encrypt_init) (EVP_PKEY_CTX *ctx);
 316     int (*encrypt) (EVP_PKEY_CTX *ctx, unsigned char *out, size_t *outlen,
 317                     const unsigned char *in, size_t inlen);
 318     int (*decrypt_init) (EVP_PKEY_CTX *ctx);
 319     int (*decrypt) (EVP_PKEY_CTX *ctx, unsigned char *out, size_t *outlen,
 320                     const unsigned char *in, size_t inlen);
 321     int (*derive_init) (EVP_PKEY_CTX *ctx);
 322     int (*derive) (EVP_PKEY_CTX *ctx, unsigned char *key, size_t *keylen);
 323     int (*ctrl) (EVP_PKEY_CTX *ctx, int type, int p1, void *p2);
 324     int (*ctrl_str) (EVP_PKEY_CTX *ctx, const char *type, const char *value);
 325 } /* EVP_PKEY_METHOD */ ;
 326
 327 void evp_pkey_set_cb_translate(BN_GENCB *cb, EVP_PKEY_CTX *ctx);
 328
 329 int PKCS5_v2_PBKDF2_keyivgen(EVP_CIPHER_CTX *ctx, const char *pass,
 330                              int passlen, ASN1_TYPE *param,
 331                              const EVP_CIPHER *c, const EVP_MD *md,
 332                              int en_de);