[thirdparty/openssl.git] / crypto / include / internal / evp_int.h

/*
 * 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 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);
Commit	Line	Data
27af42f9	1	/*
aa6bb135	2	* Copyright 2015-2016 The OpenSSL Project Authors. All Rights Reserved.
27af42f9	3	*
aa6bb135 RS	4	* Licensed under the OpenSSL license (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
27af42f9 DSH	8	*/
	9
	10	struct evp_pkey_ctx_st {
	11	/* Method associated with this operation */
	12	const EVP_PKEY_METHOD *pmeth;
	13	/* Engine that implements this method or NULL if builtin */
	14	ENGINE *engine;
	15	/* Key: may be NULL */
	16	EVP_PKEY *pkey;
	17	/* Peer key for key agreement, may be NULL */
	18	EVP_PKEY *peerkey;
	19	/* Actual operation */
	20	int operation;
	21	/* Algorithm specific data */
	22	void *data;
	23	/* Application specific data */
	24	void *app_data;
	25	/* Keygen callback */
	26	EVP_PKEY_gen_cb *pkey_gencb;
	27	/* implementation specific keygen data */
	28	int *keygen_info;
	29	int keygen_info_count;
	30	} /* EVP_PKEY_CTX */ ;
	31
	32	#define EVP_PKEY_FLAG_DYNAMIC 1
	33
	34	struct evp_pkey_method_st {
	35	int pkey_id;
	36	int flags;
	37	int (init) (EVP_PKEY_CTX ctx);
	38	int (copy) (EVP_PKEY_CTX dst, EVP_PKEY_CTX *src);
	39	void (cleanup) (EVP_PKEY_CTX ctx);
	40	int (paramgen_init) (EVP_PKEY_CTX ctx);
	41	int (paramgen) (EVP_PKEY_CTX ctx, EVP_PKEY *pkey);
	42	int (keygen_init) (EVP_PKEY_CTX ctx);
	43	int (keygen) (EVP_PKEY_CTX ctx, EVP_PKEY *pkey);
	44	int (sign_init) (EVP_PKEY_CTX ctx);
	45	int (sign) (EVP_PKEY_CTX ctx, unsigned char sig, size_t siglen,
	46	const unsigned char *tbs, size_t tbslen);
	47	int (verify_init) (EVP_PKEY_CTX ctx);
	48	int (verify) (EVP_PKEY_CTX ctx,
	49	const unsigned char *sig, size_t siglen,
	50	const unsigned char *tbs, size_t tbslen);
	51	int (verify_recover_init) (EVP_PKEY_CTX ctx);
	52	int (verify_recover) (EVP_PKEY_CTX ctx,
	53	unsigned char rout, size_t routlen,
	54	const unsigned char *sig, size_t siglen);
	55	int (signctx_init) (EVP_PKEY_CTX ctx, EVP_MD_CTX *mctx);
	56	int (signctx) (EVP_PKEY_CTX ctx, unsigned char sig, size_t siglen,
	57	EVP_MD_CTX *mctx);
	58	int (verifyctx_init) (EVP_PKEY_CTX ctx, EVP_MD_CTX *mctx);
	59	int (verifyctx) (EVP_PKEY_CTX ctx, const unsigned char *sig, int siglen,
	60	EVP_MD_CTX *mctx);
	61	int (encrypt_init) (EVP_PKEY_CTX ctx);
	62	int (encrypt) (EVP_PKEY_CTX ctx, unsigned char out, size_t outlen,
	63	const unsigned char *in, size_t inlen);
	64	int (decrypt_init) (EVP_PKEY_CTX ctx);
	65	int (decrypt) (EVP_PKEY_CTX ctx, unsigned char out, size_t outlen,
	66	const unsigned char *in, size_t inlen);
	67	int (derive_init) (EVP_PKEY_CTX ctx);
	68	int (derive) (EVP_PKEY_CTX ctx, unsigned char key, size_t keylen);
	69	int (ctrl) (EVP_PKEY_CTX ctx, int type, int p1, void *p2);
	70	int (ctrl_str) (EVP_PKEY_CTX ctx, const char type, const char value);
	71	} /* EVP_PKEY_METHOD */ ;
72
a8eba56e	73	DEFINE_STACK_OF_CONST(EVP_PKEY_METHOD)
4a1f3f27	74
27af42f9	75	void evp_pkey_set_cb_translate(BN_GENCB cb, EVP_PKEY_CTX ctx);
8f463dbd DSH	76
	77	extern const EVP_PKEY_METHOD cmac_pkey_meth;
	78	extern const EVP_PKEY_METHOD dh_pkey_meth;
	79	extern const EVP_PKEY_METHOD dhx_pkey_meth;
	80	extern const EVP_PKEY_METHOD dsa_pkey_meth;
	81	extern const EVP_PKEY_METHOD ec_pkey_meth;
	82	extern const EVP_PKEY_METHOD hmac_pkey_meth;
	83	extern const EVP_PKEY_METHOD rsa_pkey_meth;
1eff3485	84	extern const EVP_PKEY_METHOD tls1_prf_pkey_meth;
aacfb134	85	extern const EVP_PKEY_METHOD hkdf_pkey_meth;
2db6bf6f RL	86
	87	struct evp_md_st {
	88	int type;
	89	int pkey_type;
	90	int md_size;
	91	unsigned long flags;
	92	int (init) (EVP_MD_CTX ctx);
	93	int (update) (EVP_MD_CTX ctx, const void *data, size_t count);
	94	int (final) (EVP_MD_CTX ctx, unsigned char *md);
	95	int (copy) (EVP_MD_CTX to, const EVP_MD_CTX *from);
	96	int (cleanup) (EVP_MD_CTX ctx);
	97	int block_size;
	98	int ctx_size; /* how big does the ctx->md_data need to be */
	99	/* control function */
	100	int (md_ctrl) (EVP_MD_CTX ctx, int cmd, int p1, void *p2);
	101	} /* EVP_MD */ ;
	102
e79f8773 RL	103	struct evp_cipher_st {
	104	int nid;
	105	int block_size;
	106	/* Default value for variable length ciphers */
	107	int key_len;
	108	int iv_len;
	109	/* Various flags */
	110	unsigned long flags;
	111	/* init key */
	112	int (init) (EVP_CIPHER_CTX ctx, const unsigned char *key,
	113	const unsigned char *iv, int enc);
	114	/* encrypt/decrypt data */
	115	int (do_cipher) (EVP_CIPHER_CTX ctx, unsigned char *out,
	116	const unsigned char *in, size_t inl);
	117	/* cleanup ctx */
	118	int (cleanup) (EVP_CIPHER_CTX );
	119	/* how big ctx->cipher_data needs to be */
	120	int ctx_size;
	121	/* Populate a ASN1_TYPE with parameters */
	122	int (set_asn1_parameters) (EVP_CIPHER_CTX , ASN1_TYPE *);
	123	/* Get parameters from a ASN1_TYPE */
	124	int (get_asn1_parameters) (EVP_CIPHER_CTX , ASN1_TYPE *);
	125	/* Miscellaneous operations */
	126	int (ctrl) (EVP_CIPHER_CTX , int type, int arg, void *ptr);
	127	/* Application data */
	128	void *app_data;
	129	} /* EVP_CIPHER */ ;
	130
	131	/* Macros to code block cipher wrappers */
	132
	133	/* Wrapper functions for each cipher mode */
	134
44ab2dfd MC	135	#define EVP_C_DATA(kstruct, ctx) \
44ab2dfd MC	136	((kstruct *)EVP_CIPHER_CTX_get_cipher_data(ctx))
e79f8773 RL	137
	138	#define BLOCK_CIPHER_ecb_loop() \
	139	size_t i, bl; \
	140	bl = EVP_CIPHER_CTX_cipher(ctx)->block_size; \
e8aa8b6c	141	if (inl < bl) return 1;\
e79f8773	142	inl -= bl; \
e8aa8b6c	143	for (i=0; i <= inl; i+=bl)
e79f8773 RL	144
	145	#define BLOCK_CIPHER_func_ecb(cname, cprefix, kstruct, ksched) \
	146	static int cname##_ecb_cipher(EVP_CIPHER_CTX ctx, unsigned char out, const unsigned char *in, size_t inl) \
	147	{\
	148	BLOCK_CIPHER_ecb_loop() \
	149	cprefix##_ecb_encrypt(in + i, out + i, &EVP_C_DATA(kstruct,ctx)->ksched, EVP_CIPHER_CTX_encrypting(ctx)); \
	150	return 1;\
	151	}
	152
	153	#define EVP_MAXCHUNK ((size_t)1<<(sizeof(long)*8-2))
	154
	155	#define BLOCK_CIPHER_func_ofb(cname, cprefix, cbits, kstruct, ksched) \
	156	static int cname##_ofb_cipher(EVP_CIPHER_CTX ctx, unsigned char out, const unsigned char *in, size_t inl) \
	157	{\
	158	while(inl>=EVP_MAXCHUNK) {\
	159	int num = EVP_CIPHER_CTX_num(ctx);\
	160	cprefix##_ofb##cbits##_encrypt(in, out, (long)EVP_MAXCHUNK, &EVP_C_DATA(kstruct,ctx)->ksched, EVP_CIPHER_CTX_iv_noconst(ctx), &num); \
	161	EVP_CIPHER_CTX_set_num(ctx, num);\
	162	inl-=EVP_MAXCHUNK;\
	163	in +=EVP_MAXCHUNK;\
	164	out+=EVP_MAXCHUNK;\
	165	}\
	166	if (inl) {\
	167	int num = EVP_CIPHER_CTX_num(ctx);\
	168	cprefix##_ofb##cbits##_encrypt(in, out, (long)inl, &EVP_C_DATA(kstruct,ctx)->ksched, EVP_CIPHER_CTX_iv_noconst(ctx), &num); \
	169	EVP_CIPHER_CTX_set_num(ctx, num);\
	170	}\
	171	return 1;\
	172	}
	173
	174	#define BLOCK_CIPHER_func_cbc(cname, cprefix, kstruct, ksched) \
	175	static int cname##_cbc_cipher(EVP_CIPHER_CTX ctx, unsigned char out, const unsigned char *in, size_t inl) \
	176	{\
	177	while(inl>=EVP_MAXCHUNK) \
	178	{\
	179	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));\
	180	inl-=EVP_MAXCHUNK;\
	181	in +=EVP_MAXCHUNK;\
	182	out+=EVP_MAXCHUNK;\
	183	}\
	184	if (inl)\
	185	cprefix##_cbc_encrypt(in, out, (long)inl, &EVP_C_DATA(kstruct,ctx)->ksched, EVP_CIPHER_CTX_iv_noconst(ctx), EVP_CIPHER_CTX_encrypting(ctx));\
	186	return 1;\
	187	}
	188
	189	#define BLOCK_CIPHER_func_cfb(cname, cprefix, cbits, kstruct, ksched) \
	190	static int cname##_cfb##cbits##_cipher(EVP_CIPHER_CTX ctx, unsigned char out, const unsigned char *in, size_t inl) \
	191	{\
e8aa8b6c F	192	size_t chunk = EVP_MAXCHUNK;\
	193	if (cbits == 1) chunk >>= 3;\
	194	if (inl < chunk) chunk = inl;\
	195	while (inl && inl >= chunk)\
	196	{\
	197	int num = EVP_CIPHER_CTX_num(ctx);\
	198	cprefix##_cfb##cbits##_encrypt(in, out, (long) \
	199	((cbits == 1) \
	200	&& !EVP_CIPHER_CTX_test_flags(ctx, EVP_CIPH_FLAG_LENGTH_BITS) \
	201	? inl*8 : inl), \
	202	&EVP_C_DATA(kstruct, ctx)->ksched, EVP_CIPHER_CTX_iv_noconst(ctx),\
	203	&num, EVP_CIPHER_CTX_encrypting(ctx));\
	204	EVP_CIPHER_CTX_set_num(ctx, num);\
	205	inl -= chunk;\
	206	in += chunk;\
	207	out += chunk;\
	208	if (inl < chunk) chunk = inl;\
	209	}\
	210	return 1;\
e79f8773 RL	211	}
	212
	213	#define BLOCK_CIPHER_all_funcs(cname, cprefix, cbits, kstruct, ksched) \
	214	BLOCK_CIPHER_func_cbc(cname, cprefix, kstruct, ksched) \
	215	BLOCK_CIPHER_func_cfb(cname, cprefix, cbits, kstruct, ksched) \
	216	BLOCK_CIPHER_func_ecb(cname, cprefix, kstruct, ksched) \
	217	BLOCK_CIPHER_func_ofb(cname, cprefix, cbits, kstruct, ksched)
	218
	219	#define BLOCK_CIPHER_def1(cname, nmode, mode, MODE, kstruct, nid, block_size, \
	220	key_len, iv_len, flags, init_key, cleanup, \
	221	set_asn1, get_asn1, ctrl) \
	222	static const EVP_CIPHER cname##_##mode = { \
	223	nid##_##nmode, block_size, key_len, iv_len, \
	224	flags \| EVP_CIPH_##MODE##_MODE, \
	225	init_key, \
	226	cname##_##mode##_cipher, \
	227	cleanup, \
	228	sizeof(kstruct), \
	229	set_asn1, get_asn1,\
	230	ctrl, \
	231	NULL \
	232	}; \
	233	const EVP_CIPHER *EVP_##cname##_##mode(void) { return &cname##_##mode; }
	234
	235	#define BLOCK_CIPHER_def_cbc(cname, kstruct, nid, block_size, key_len, \
	236	iv_len, flags, init_key, cleanup, set_asn1, \
	237	get_asn1, ctrl) \
	238	BLOCK_CIPHER_def1(cname, cbc, cbc, CBC, kstruct, nid, block_size, key_len, \
	239	iv_len, flags, init_key, cleanup, set_asn1, get_asn1, ctrl)
	240
	241	#define BLOCK_CIPHER_def_cfb(cname, kstruct, nid, key_len, \
	242	iv_len, cbits, flags, init_key, cleanup, \
	243	set_asn1, get_asn1, ctrl) \
	244	BLOCK_CIPHER_def1(cname, cfb##cbits, cfb##cbits, CFB, kstruct, nid, 1, \
	245	key_len, iv_len, flags, init_key, cleanup, set_asn1, \
	246	get_asn1, ctrl)
	247
	248	#define BLOCK_CIPHER_def_ofb(cname, kstruct, nid, key_len, \
	249	iv_len, cbits, flags, init_key, cleanup, \
	250	set_asn1, get_asn1, ctrl) \
	251	BLOCK_CIPHER_def1(cname, ofb##cbits, ofb, OFB, kstruct, nid, 1, \
	252	key_len, iv_len, flags, init_key, cleanup, set_asn1, \
	253	get_asn1, ctrl)
	254
	255	#define BLOCK_CIPHER_def_ecb(cname, kstruct, nid, block_size, key_len, \
	256	flags, init_key, cleanup, set_asn1, \
	257	get_asn1, ctrl) \
	258	BLOCK_CIPHER_def1(cname, ecb, ecb, ECB, kstruct, nid, block_size, key_len, \
	259	0, flags, init_key, cleanup, set_asn1, get_asn1, ctrl)
	260
	261	#define BLOCK_CIPHER_defs(cname, kstruct, \
	262	nid, block_size, key_len, iv_len, cbits, flags, \
	263	init_key, cleanup, set_asn1, get_asn1, ctrl) \
	264	BLOCK_CIPHER_def_cbc(cname, kstruct, nid, block_size, key_len, iv_len, flags, \
	265	init_key, cleanup, set_asn1, get_asn1, ctrl) \
	266	BLOCK_CIPHER_def_cfb(cname, kstruct, nid, key_len, iv_len, cbits, \
	267	flags, init_key, cleanup, set_asn1, get_asn1, ctrl) \
	268	BLOCK_CIPHER_def_ofb(cname, kstruct, nid, key_len, iv_len, cbits, \
	269	flags, init_key, cleanup, set_asn1, get_asn1, ctrl) \
	270	BLOCK_CIPHER_def_ecb(cname, kstruct, nid, block_size, key_len, flags, \
	271	init_key, cleanup, set_asn1, get_asn1, ctrl)
	272
	273	/*-
	274	#define BLOCK_CIPHER_defs(cname, kstruct, \
275	nid, block_size, key_len, iv_len, flags,\
276	init_key, cleanup, set_asn1, get_asn1, ctrl)\
277	static const EVP_CIPHER cname##_cbc = {\
278	nid##_cbc, block_size, key_len, iv_len, \
279	flags \| EVP_CIPH_CBC_MODE,\
280	init_key,\
281	cname##_cbc_cipher,\
282	cleanup,\
283	sizeof(EVP_CIPHER_CTX)-sizeof((((EVP_CIPHER_CTX *)NULL)->c))+\
284	sizeof((((EVP_CIPHER_CTX *)NULL)->c.kstruct)),\
285	set_asn1, get_asn1,\
286	ctrl, \
287	NULL \
288	};\
289	const EVP_CIPHER *EVP_##cname##_cbc(void) { return &cname##_cbc; }\
290	static const EVP_CIPHER cname##_cfb = {\
291	nid##_cfb64, 1, key_len, iv_len, \
292	flags \| EVP_CIPH_CFB_MODE,\
293	init_key,\
294	cname##_cfb_cipher,\
295	cleanup,\
296	sizeof(EVP_CIPHER_CTX)-sizeof((((EVP_CIPHER_CTX *)NULL)->c))+\
297	sizeof((((EVP_CIPHER_CTX *)NULL)->c.kstruct)),\
298	set_asn1, get_asn1,\
299	ctrl,\
300	NULL \
301	};\
302	const EVP_CIPHER *EVP_##cname##_cfb(void) { return &cname##_cfb; }\
303	static const EVP_CIPHER cname##_ofb = {\
304	nid##_ofb64, 1, key_len, iv_len, \
305	flags \| EVP_CIPH_OFB_MODE,\
306	init_key,\
307	cname##_ofb_cipher,\
308	cleanup,\
309	sizeof(EVP_CIPHER_CTX)-sizeof((((EVP_CIPHER_CTX *)NULL)->c))+\
310	sizeof((((EVP_CIPHER_CTX *)NULL)->c.kstruct)),\
311	set_asn1, get_asn1,\
312	ctrl,\
313	NULL \
314	};\
315	const EVP_CIPHER *EVP_##cname##_ofb(void) { return &cname##_ofb; }\
316	static const EVP_CIPHER cname##_ecb = {\
317	nid##_ecb, block_size, key_len, iv_len, \
318	flags \| EVP_CIPH_ECB_MODE,\
319	init_key,\
320	cname##_ecb_cipher,\
321	cleanup,\
322	sizeof(EVP_CIPHER_CTX)-sizeof((((EVP_CIPHER_CTX *)NULL)->c))+\
323	sizeof((((EVP_CIPHER_CTX *)NULL)->c.kstruct)),\
324	set_asn1, get_asn1,\
325	ctrl,\
326	NULL \
327	};\
328	const EVP_CIPHER *EVP_##cname##_ecb(void) { return &cname##_ecb; }
329	*/
330
331	#define IMPLEMENT_BLOCK_CIPHER(cname, ksched, cprefix, kstruct, nid, \
332	block_size, key_len, iv_len, cbits, \
333	flags, init_key, \
334	cleanup, set_asn1, get_asn1, ctrl) \
335	BLOCK_CIPHER_all_funcs(cname, cprefix, cbits, kstruct, ksched) \
336	BLOCK_CIPHER_defs(cname, kstruct, nid, block_size, key_len, iv_len, \
337	cbits, flags, init_key, cleanup, set_asn1, \
338	get_asn1, ctrl)
339
340	#define IMPLEMENT_CFBR(cipher,cprefix,kstruct,ksched,keysize,cbits,iv_len,fl) \
341	BLOCK_CIPHER_func_cfb(cipher##_##keysize,cprefix,cbits,kstruct,ksched) \
342	BLOCK_CIPHER_def_cfb(cipher##_##keysize,kstruct, \
343	NID_##cipher##_##keysize, keysize/8, iv_len, cbits, \
344	(fl)\|EVP_CIPH_FLAG_DEFAULT_ASN1, \
345	cipher##_init_key, NULL, NULL, NULL, NULL)
346
3aeb9348 DSH	347
	348	/*
	349	* Type needs to be a bit field Sub-type needs to be for variations on the
	350	* method, as in, can it do arbitrary encryption....
	351	*/
	352	struct evp_pkey_st {
	353	int type;
	354	int save_type;
	355	int references;
	356	const EVP_PKEY_ASN1_METHOD *ameth;
	357	ENGINE *engine;
	358	union {
a4cb54d2	359	void *ptr;
3aeb9348 DSH	360	# ifndef OPENSSL_NO_RSA
	361	struct rsa_st rsa; / RSA */
	362	# endif
	363	# ifndef OPENSSL_NO_DSA
	364	struct dsa_st dsa; / DSA */
	365	# endif
	366	# ifndef OPENSSL_NO_DH
	367	struct dh_st dh; / DH */
	368	# endif
	369	# ifndef OPENSSL_NO_EC
	370	struct ec_key_st ec; / ECC */
	371	# endif
	372	} pkey;
	373	int save_parameters;
	374	STACK_OF(X509_ATTRIBUTE) attributes; / [ 0 ] */
03273d61	375	CRYPTO_RWLOCK *lock;
3aeb9348	376	} /* EVP_PKEY */ ;
7b9f8f7f MC	377
7b9f8f7f MC	378
b3599dbb MC	379	void openssl_add_all_ciphers_int(void);
	380	void openssl_add_all_digests_int(void);
	381	void evp_cleanup_int(void);