382 lines
15 KiB
C
382 lines
15 KiB
C
/*
|
|
* Copyright 2015-2016 The OpenSSL Project Authors. All Rights Reserved.
|
|
*
|
|
* Licensed under the OpenSSL license (the "License"). You may not use
|
|
* this file except in compliance with the License. You can obtain a copy
|
|
* in the file LICENSE in the source distribution or at
|
|
* https://www.openssl.org/source/license.html
|
|
*/
|
|
|
|
struct evp_pkey_ctx_st {
|
|
/* Method associated with this operation */
|
|
const EVP_PKEY_METHOD *pmeth;
|
|
/* Engine that implements this method or NULL if builtin */
|
|
ENGINE *engine;
|
|
/* Key: may be NULL */
|
|
EVP_PKEY *pkey;
|
|
/* Peer key for key agreement, may be NULL */
|
|
EVP_PKEY *peerkey;
|
|
/* Actual operation */
|
|
int operation;
|
|
/* Algorithm specific data */
|
|
void *data;
|
|
/* Application specific data */
|
|
void *app_data;
|
|
/* Keygen callback */
|
|
EVP_PKEY_gen_cb *pkey_gencb;
|
|
/* implementation specific keygen data */
|
|
int *keygen_info;
|
|
int keygen_info_count;
|
|
} /* EVP_PKEY_CTX */ ;
|
|
|
|
#define EVP_PKEY_FLAG_DYNAMIC 1
|
|
|
|
struct evp_pkey_method_st {
|
|
int pkey_id;
|
|
int flags;
|
|
int (*init) (EVP_PKEY_CTX *ctx);
|
|
int (*copy) (EVP_PKEY_CTX *dst, EVP_PKEY_CTX *src);
|
|
void (*cleanup) (EVP_PKEY_CTX *ctx);
|
|
int (*paramgen_init) (EVP_PKEY_CTX *ctx);
|
|
int (*paramgen) (EVP_PKEY_CTX *ctx, EVP_PKEY *pkey);
|
|
int (*keygen_init) (EVP_PKEY_CTX *ctx);
|
|
int (*keygen) (EVP_PKEY_CTX *ctx, EVP_PKEY *pkey);
|
|
int (*sign_init) (EVP_PKEY_CTX *ctx);
|
|
int (*sign) (EVP_PKEY_CTX *ctx, unsigned char *sig, size_t *siglen,
|
|
const unsigned char *tbs, size_t tbslen);
|
|
int (*verify_init) (EVP_PKEY_CTX *ctx);
|
|
int (*verify) (EVP_PKEY_CTX *ctx,
|
|
const unsigned char *sig, size_t siglen,
|
|
const unsigned char *tbs, size_t tbslen);
|
|
int (*verify_recover_init) (EVP_PKEY_CTX *ctx);
|
|
int (*verify_recover) (EVP_PKEY_CTX *ctx,
|
|
unsigned char *rout, size_t *routlen,
|
|
const unsigned char *sig, size_t siglen);
|
|
int (*signctx_init) (EVP_PKEY_CTX *ctx, EVP_MD_CTX *mctx);
|
|
int (*signctx) (EVP_PKEY_CTX *ctx, unsigned char *sig, size_t *siglen,
|
|
EVP_MD_CTX *mctx);
|
|
int (*verifyctx_init) (EVP_PKEY_CTX *ctx, EVP_MD_CTX *mctx);
|
|
int (*verifyctx) (EVP_PKEY_CTX *ctx, const unsigned char *sig, int siglen,
|
|
EVP_MD_CTX *mctx);
|
|
int (*encrypt_init) (EVP_PKEY_CTX *ctx);
|
|
int (*encrypt) (EVP_PKEY_CTX *ctx, unsigned char *out, size_t *outlen,
|
|
const unsigned char *in, size_t inlen);
|
|
int (*decrypt_init) (EVP_PKEY_CTX *ctx);
|
|
int (*decrypt) (EVP_PKEY_CTX *ctx, unsigned char *out, size_t *outlen,
|
|
const unsigned char *in, size_t inlen);
|
|
int (*derive_init) (EVP_PKEY_CTX *ctx);
|
|
int (*derive) (EVP_PKEY_CTX *ctx, unsigned char *key, size_t *keylen);
|
|
int (*ctrl) (EVP_PKEY_CTX *ctx, int type, int p1, void *p2);
|
|
int (*ctrl_str) (EVP_PKEY_CTX *ctx, const char *type, const char *value);
|
|
} /* EVP_PKEY_METHOD */ ;
|
|
|
|
DEFINE_STACK_OF_CONST(EVP_PKEY_METHOD)
|
|
|
|
void evp_pkey_set_cb_translate(BN_GENCB *cb, EVP_PKEY_CTX *ctx);
|
|
|
|
extern const EVP_PKEY_METHOD cmac_pkey_meth;
|
|
extern const EVP_PKEY_METHOD dh_pkey_meth;
|
|
extern const EVP_PKEY_METHOD dhx_pkey_meth;
|
|
extern const EVP_PKEY_METHOD dsa_pkey_meth;
|
|
extern const EVP_PKEY_METHOD ec_pkey_meth;
|
|
extern const EVP_PKEY_METHOD ecx25519_pkey_meth;
|
|
extern const EVP_PKEY_METHOD hmac_pkey_meth;
|
|
extern const EVP_PKEY_METHOD rsa_pkey_meth;
|
|
extern const EVP_PKEY_METHOD tls1_prf_pkey_meth;
|
|
extern const EVP_PKEY_METHOD hkdf_pkey_meth;
|
|
|
|
struct evp_md_st {
|
|
int type;
|
|
int pkey_type;
|
|
int md_size;
|
|
unsigned long flags;
|
|
int (*init) (EVP_MD_CTX *ctx);
|
|
int (*update) (EVP_MD_CTX *ctx, const void *data, size_t count);
|
|
int (*final) (EVP_MD_CTX *ctx, unsigned char *md);
|
|
int (*copy) (EVP_MD_CTX *to, const EVP_MD_CTX *from);
|
|
int (*cleanup) (EVP_MD_CTX *ctx);
|
|
int block_size;
|
|
int ctx_size; /* how big does the ctx->md_data need to be */
|
|
/* control function */
|
|
int (*md_ctrl) (EVP_MD_CTX *ctx, int cmd, int p1, void *p2);
|
|
} /* EVP_MD */ ;
|
|
|
|
struct evp_cipher_st {
|
|
int nid;
|
|
int block_size;
|
|
/* Default value for variable length ciphers */
|
|
int key_len;
|
|
int iv_len;
|
|
/* Various flags */
|
|
unsigned long flags;
|
|
/* init key */
|
|
int (*init) (EVP_CIPHER_CTX *ctx, const unsigned char *key,
|
|
const unsigned char *iv, int enc);
|
|
/* encrypt/decrypt data */
|
|
int (*do_cipher) (EVP_CIPHER_CTX *ctx, unsigned char *out,
|
|
const unsigned char *in, size_t inl);
|
|
/* cleanup ctx */
|
|
int (*cleanup) (EVP_CIPHER_CTX *);
|
|
/* how big ctx->cipher_data needs to be */
|
|
int ctx_size;
|
|
/* Populate a ASN1_TYPE with parameters */
|
|
int (*set_asn1_parameters) (EVP_CIPHER_CTX *, ASN1_TYPE *);
|
|
/* Get parameters from a ASN1_TYPE */
|
|
int (*get_asn1_parameters) (EVP_CIPHER_CTX *, ASN1_TYPE *);
|
|
/* Miscellaneous operations */
|
|
int (*ctrl) (EVP_CIPHER_CTX *, int type, int arg, void *ptr);
|
|
/* Application data */
|
|
void *app_data;
|
|
} /* EVP_CIPHER */ ;
|
|
|
|
/* Macros to code block cipher wrappers */
|
|
|
|
/* Wrapper functions for each cipher mode */
|
|
|
|
#define EVP_C_DATA(kstruct, ctx) \
|
|
((kstruct *)EVP_CIPHER_CTX_get_cipher_data(ctx))
|
|
|
|
#define BLOCK_CIPHER_ecb_loop() \
|
|
size_t i, bl; \
|
|
bl = EVP_CIPHER_CTX_cipher(ctx)->block_size; \
|
|
if (inl < bl) return 1;\
|
|
inl -= bl; \
|
|
for (i=0; i <= inl; i+=bl)
|
|
|
|
#define BLOCK_CIPHER_func_ecb(cname, cprefix, kstruct, ksched) \
|
|
static int cname##_ecb_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out, const unsigned char *in, size_t inl) \
|
|
{\
|
|
BLOCK_CIPHER_ecb_loop() \
|
|
cprefix##_ecb_encrypt(in + i, out + i, &EVP_C_DATA(kstruct,ctx)->ksched, EVP_CIPHER_CTX_encrypting(ctx)); \
|
|
return 1;\
|
|
}
|
|
|
|
#define EVP_MAXCHUNK ((size_t)1<<(sizeof(long)*8-2))
|
|
|
|
#define BLOCK_CIPHER_func_ofb(cname, cprefix, cbits, kstruct, ksched) \
|
|
static int cname##_ofb_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out, const unsigned char *in, size_t inl) \
|
|
{\
|
|
while(inl>=EVP_MAXCHUNK) {\
|
|
int num = EVP_CIPHER_CTX_num(ctx);\
|
|
cprefix##_ofb##cbits##_encrypt(in, out, (long)EVP_MAXCHUNK, &EVP_C_DATA(kstruct,ctx)->ksched, EVP_CIPHER_CTX_iv_noconst(ctx), &num); \
|
|
EVP_CIPHER_CTX_set_num(ctx, num);\
|
|
inl-=EVP_MAXCHUNK;\
|
|
in +=EVP_MAXCHUNK;\
|
|
out+=EVP_MAXCHUNK;\
|
|
}\
|
|
if (inl) {\
|
|
int num = EVP_CIPHER_CTX_num(ctx);\
|
|
cprefix##_ofb##cbits##_encrypt(in, out, (long)inl, &EVP_C_DATA(kstruct,ctx)->ksched, EVP_CIPHER_CTX_iv_noconst(ctx), &num); \
|
|
EVP_CIPHER_CTX_set_num(ctx, num);\
|
|
}\
|
|
return 1;\
|
|
}
|
|
|
|
#define BLOCK_CIPHER_func_cbc(cname, cprefix, kstruct, ksched) \
|
|
static int cname##_cbc_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out, const unsigned char *in, size_t inl) \
|
|
{\
|
|
while(inl>=EVP_MAXCHUNK) \
|
|
{\
|
|
cprefix##_cbc_encrypt(in, out, (long)EVP_MAXCHUNK, &EVP_C_DATA(kstruct,ctx)->ksched, EVP_CIPHER_CTX_iv_noconst(ctx), EVP_CIPHER_CTX_encrypting(ctx));\
|
|
inl-=EVP_MAXCHUNK;\
|
|
in +=EVP_MAXCHUNK;\
|
|
out+=EVP_MAXCHUNK;\
|
|
}\
|
|
if (inl)\
|
|
cprefix##_cbc_encrypt(in, out, (long)inl, &EVP_C_DATA(kstruct,ctx)->ksched, EVP_CIPHER_CTX_iv_noconst(ctx), EVP_CIPHER_CTX_encrypting(ctx));\
|
|
return 1;\
|
|
}
|
|
|
|
#define BLOCK_CIPHER_func_cfb(cname, cprefix, cbits, kstruct, ksched) \
|
|
static int cname##_cfb##cbits##_cipher(EVP_CIPHER_CTX *ctx, unsigned char *out, const unsigned char *in, size_t inl) \
|
|
{\
|
|
size_t chunk = EVP_MAXCHUNK;\
|
|
if (cbits == 1) chunk >>= 3;\
|
|
if (inl < chunk) chunk = inl;\
|
|
while (inl && inl >= chunk)\
|
|
{\
|
|
int num = EVP_CIPHER_CTX_num(ctx);\
|
|
cprefix##_cfb##cbits##_encrypt(in, out, (long) \
|
|
((cbits == 1) \
|
|
&& !EVP_CIPHER_CTX_test_flags(ctx, EVP_CIPH_FLAG_LENGTH_BITS) \
|
|
? inl*8 : inl), \
|
|
&EVP_C_DATA(kstruct, ctx)->ksched, EVP_CIPHER_CTX_iv_noconst(ctx),\
|
|
&num, EVP_CIPHER_CTX_encrypting(ctx));\
|
|
EVP_CIPHER_CTX_set_num(ctx, num);\
|
|
inl -= chunk;\
|
|
in += chunk;\
|
|
out += chunk;\
|
|
if (inl < chunk) chunk = inl;\
|
|
}\
|
|
return 1;\
|
|
}
|
|
|
|
#define BLOCK_CIPHER_all_funcs(cname, cprefix, cbits, kstruct, ksched) \
|
|
BLOCK_CIPHER_func_cbc(cname, cprefix, kstruct, ksched) \
|
|
BLOCK_CIPHER_func_cfb(cname, cprefix, cbits, kstruct, ksched) \
|
|
BLOCK_CIPHER_func_ecb(cname, cprefix, kstruct, ksched) \
|
|
BLOCK_CIPHER_func_ofb(cname, cprefix, cbits, kstruct, ksched)
|
|
|
|
#define BLOCK_CIPHER_def1(cname, nmode, mode, MODE, kstruct, nid, block_size, \
|
|
key_len, iv_len, flags, init_key, cleanup, \
|
|
set_asn1, get_asn1, ctrl) \
|
|
static const EVP_CIPHER cname##_##mode = { \
|
|
nid##_##nmode, block_size, key_len, iv_len, \
|
|
flags | EVP_CIPH_##MODE##_MODE, \
|
|
init_key, \
|
|
cname##_##mode##_cipher, \
|
|
cleanup, \
|
|
sizeof(kstruct), \
|
|
set_asn1, get_asn1,\
|
|
ctrl, \
|
|
NULL \
|
|
}; \
|
|
const EVP_CIPHER *EVP_##cname##_##mode(void) { return &cname##_##mode; }
|
|
|
|
#define BLOCK_CIPHER_def_cbc(cname, kstruct, nid, block_size, key_len, \
|
|
iv_len, flags, init_key, cleanup, set_asn1, \
|
|
get_asn1, ctrl) \
|
|
BLOCK_CIPHER_def1(cname, cbc, cbc, CBC, kstruct, nid, block_size, key_len, \
|
|
iv_len, flags, init_key, cleanup, set_asn1, get_asn1, ctrl)
|
|
|
|
#define BLOCK_CIPHER_def_cfb(cname, kstruct, nid, key_len, \
|
|
iv_len, cbits, flags, init_key, cleanup, \
|
|
set_asn1, get_asn1, ctrl) \
|
|
BLOCK_CIPHER_def1(cname, cfb##cbits, cfb##cbits, CFB, kstruct, nid, 1, \
|
|
key_len, iv_len, flags, init_key, cleanup, set_asn1, \
|
|
get_asn1, ctrl)
|
|
|
|
#define BLOCK_CIPHER_def_ofb(cname, kstruct, nid, key_len, \
|
|
iv_len, cbits, flags, init_key, cleanup, \
|
|
set_asn1, get_asn1, ctrl) \
|
|
BLOCK_CIPHER_def1(cname, ofb##cbits, ofb, OFB, kstruct, nid, 1, \
|
|
key_len, iv_len, flags, init_key, cleanup, set_asn1, \
|
|
get_asn1, ctrl)
|
|
|
|
#define BLOCK_CIPHER_def_ecb(cname, kstruct, nid, block_size, key_len, \
|
|
flags, init_key, cleanup, set_asn1, \
|
|
get_asn1, ctrl) \
|
|
BLOCK_CIPHER_def1(cname, ecb, ecb, ECB, kstruct, nid, block_size, key_len, \
|
|
0, flags, init_key, cleanup, set_asn1, get_asn1, ctrl)
|
|
|
|
#define BLOCK_CIPHER_defs(cname, kstruct, \
|
|
nid, block_size, key_len, iv_len, cbits, flags, \
|
|
init_key, cleanup, set_asn1, get_asn1, ctrl) \
|
|
BLOCK_CIPHER_def_cbc(cname, kstruct, nid, block_size, key_len, iv_len, flags, \
|
|
init_key, cleanup, set_asn1, get_asn1, ctrl) \
|
|
BLOCK_CIPHER_def_cfb(cname, kstruct, nid, key_len, iv_len, cbits, \
|
|
flags, init_key, cleanup, set_asn1, get_asn1, ctrl) \
|
|
BLOCK_CIPHER_def_ofb(cname, kstruct, nid, key_len, iv_len, cbits, \
|
|
flags, init_key, cleanup, set_asn1, get_asn1, ctrl) \
|
|
BLOCK_CIPHER_def_ecb(cname, kstruct, nid, block_size, key_len, flags, \
|
|
init_key, cleanup, set_asn1, get_asn1, ctrl)
|
|
|
|
/*-
|
|
#define BLOCK_CIPHER_defs(cname, kstruct, \
|
|
nid, block_size, key_len, iv_len, flags,\
|
|
init_key, cleanup, set_asn1, get_asn1, ctrl)\
|
|
static const EVP_CIPHER cname##_cbc = {\
|
|
nid##_cbc, block_size, key_len, iv_len, \
|
|
flags | EVP_CIPH_CBC_MODE,\
|
|
init_key,\
|
|
cname##_cbc_cipher,\
|
|
cleanup,\
|
|
sizeof(EVP_CIPHER_CTX)-sizeof((((EVP_CIPHER_CTX *)NULL)->c))+\
|
|
sizeof((((EVP_CIPHER_CTX *)NULL)->c.kstruct)),\
|
|
set_asn1, get_asn1,\
|
|
ctrl, \
|
|
NULL \
|
|
};\
|
|
const EVP_CIPHER *EVP_##cname##_cbc(void) { return &cname##_cbc; }\
|
|
static const EVP_CIPHER cname##_cfb = {\
|
|
nid##_cfb64, 1, key_len, iv_len, \
|
|
flags | EVP_CIPH_CFB_MODE,\
|
|
init_key,\
|
|
cname##_cfb_cipher,\
|
|
cleanup,\
|
|
sizeof(EVP_CIPHER_CTX)-sizeof((((EVP_CIPHER_CTX *)NULL)->c))+\
|
|
sizeof((((EVP_CIPHER_CTX *)NULL)->c.kstruct)),\
|
|
set_asn1, get_asn1,\
|
|
ctrl,\
|
|
NULL \
|
|
};\
|
|
const EVP_CIPHER *EVP_##cname##_cfb(void) { return &cname##_cfb; }\
|
|
static const EVP_CIPHER cname##_ofb = {\
|
|
nid##_ofb64, 1, key_len, iv_len, \
|
|
flags | EVP_CIPH_OFB_MODE,\
|
|
init_key,\
|
|
cname##_ofb_cipher,\
|
|
cleanup,\
|
|
sizeof(EVP_CIPHER_CTX)-sizeof((((EVP_CIPHER_CTX *)NULL)->c))+\
|
|
sizeof((((EVP_CIPHER_CTX *)NULL)->c.kstruct)),\
|
|
set_asn1, get_asn1,\
|
|
ctrl,\
|
|
NULL \
|
|
};\
|
|
const EVP_CIPHER *EVP_##cname##_ofb(void) { return &cname##_ofb; }\
|
|
static const EVP_CIPHER cname##_ecb = {\
|
|
nid##_ecb, block_size, key_len, iv_len, \
|
|
flags | EVP_CIPH_ECB_MODE,\
|
|
init_key,\
|
|
cname##_ecb_cipher,\
|
|
cleanup,\
|
|
sizeof(EVP_CIPHER_CTX)-sizeof((((EVP_CIPHER_CTX *)NULL)->c))+\
|
|
sizeof((((EVP_CIPHER_CTX *)NULL)->c.kstruct)),\
|
|
set_asn1, get_asn1,\
|
|
ctrl,\
|
|
NULL \
|
|
};\
|
|
const EVP_CIPHER *EVP_##cname##_ecb(void) { return &cname##_ecb; }
|
|
*/
|
|
|
|
#define IMPLEMENT_BLOCK_CIPHER(cname, ksched, cprefix, kstruct, nid, \
|
|
block_size, key_len, iv_len, cbits, \
|
|
flags, init_key, \
|
|
cleanup, set_asn1, get_asn1, ctrl) \
|
|
BLOCK_CIPHER_all_funcs(cname, cprefix, cbits, kstruct, ksched) \
|
|
BLOCK_CIPHER_defs(cname, kstruct, nid, block_size, key_len, iv_len, \
|
|
cbits, flags, init_key, cleanup, set_asn1, \
|
|
get_asn1, ctrl)
|
|
|
|
#define IMPLEMENT_CFBR(cipher,cprefix,kstruct,ksched,keysize,cbits,iv_len,fl) \
|
|
BLOCK_CIPHER_func_cfb(cipher##_##keysize,cprefix,cbits,kstruct,ksched) \
|
|
BLOCK_CIPHER_def_cfb(cipher##_##keysize,kstruct, \
|
|
NID_##cipher##_##keysize, keysize/8, iv_len, cbits, \
|
|
(fl)|EVP_CIPH_FLAG_DEFAULT_ASN1, \
|
|
cipher##_init_key, NULL, NULL, NULL, NULL)
|
|
|
|
|
|
/*
|
|
* Type needs to be a bit field Sub-type needs to be for variations on the
|
|
* method, as in, can it do arbitrary encryption....
|
|
*/
|
|
struct evp_pkey_st {
|
|
int type;
|
|
int save_type;
|
|
int references;
|
|
const EVP_PKEY_ASN1_METHOD *ameth;
|
|
ENGINE *engine;
|
|
union {
|
|
void *ptr;
|
|
# ifndef OPENSSL_NO_RSA
|
|
struct rsa_st *rsa; /* RSA */
|
|
# endif
|
|
# ifndef OPENSSL_NO_DSA
|
|
struct dsa_st *dsa; /* DSA */
|
|
# endif
|
|
# ifndef OPENSSL_NO_DH
|
|
struct dh_st *dh; /* DH */
|
|
# endif
|
|
# ifndef OPENSSL_NO_EC
|
|
struct ec_key_st *ec; /* ECC */
|
|
# endif
|
|
} pkey;
|
|
int save_parameters;
|
|
STACK_OF(X509_ATTRIBUTE) *attributes; /* [ 0 ] */
|
|
CRYPTO_RWLOCK *lock;
|
|
} /* EVP_PKEY */ ;
|
|
|
|
|
|
void openssl_add_all_ciphers_int(void);
|
|
void openssl_add_all_digests_int(void);
|
|
void evp_cleanup_int(void);
|