[thirdparty/openssl.git] / crypto / asn1 / p5_pbev2.c

/* p5_pbev2.c */
/*
 * Written by Dr Stephen N Henson (steve@openssl.org) for the OpenSSL project
 * 1999-2004.
 */
/* ====================================================================
 * Copyright (c) 1999 The OpenSSL Project.  All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 *
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 *
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in
 *    the documentation and/or other materials provided with the
 *    distribution.
 *
 * 3. All advertising materials mentioning features or use of this
 *    software must display the following acknowledgment:
 *    "This product includes software developed by the OpenSSL Project
 *    for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)"
 *
 * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to
 *    endorse or promote products derived from this software without
 *    prior written permission. For written permission, please contact
 *    licensing@OpenSSL.org.
 *
 * 5. Products derived from this software may not be called "OpenSSL"
 *    nor may "OpenSSL" appear in their names without prior written
 *    permission of the OpenSSL Project.
 *
 * 6. Redistributions of any form whatsoever must retain the following
 *    acknowledgment:
 *    "This product includes software developed by the OpenSSL Project
 *    for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)"
 *
 * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY
 * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
 * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE OpenSSL PROJECT OR
 * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
 * OF THE POSSIBILITY OF SUCH DAMAGE.
 * ====================================================================
 *
 * This product includes cryptographic software written by Eric Young
 * (eay@cryptsoft.com).  This product includes software written by Tim
 * Hudson (tjh@cryptsoft.com).
 *
 */

#include <stdio.h>
#include "cryptlib.h"
#include <openssl/asn1t.h>
#include <openssl/x509.h>
#include <openssl/rand.h>

/* PKCS#5 v2.0 password based encryption structures */

ASN1_SEQUENCE(PBE2PARAM) = {
        ASN1_SIMPLE(PBE2PARAM, keyfunc, X509_ALGOR),
        ASN1_SIMPLE(PBE2PARAM, encryption, X509_ALGOR)
} ASN1_SEQUENCE_END(PBE2PARAM)

IMPLEMENT_ASN1_FUNCTIONS(PBE2PARAM)

ASN1_SEQUENCE(PBKDF2PARAM) = {
        ASN1_SIMPLE(PBKDF2PARAM, salt, ASN1_ANY),
        ASN1_SIMPLE(PBKDF2PARAM, iter, ASN1_INTEGER),
        ASN1_OPT(PBKDF2PARAM, keylength, ASN1_INTEGER),
        ASN1_OPT(PBKDF2PARAM, prf, X509_ALGOR)
} ASN1_SEQUENCE_END(PBKDF2PARAM)

IMPLEMENT_ASN1_FUNCTIONS(PBKDF2PARAM)

/*
 * Return an algorithm identifier for a PKCS#5 v2.0 PBE algorithm: yes I know
 * this is horrible! Extended version to allow application supplied PRF NID
 * and IV.
 */

X509_ALGOR *PKCS5_pbe2_set_iv(const EVP_CIPHER *cipher, int iter,
                              unsigned char *salt, int saltlen,
                              unsigned char *aiv, int prf_nid)
{
    X509_ALGOR *scheme = NULL, *kalg = NULL, *ret = NULL;
    int alg_nid, keylen;
    EVP_CIPHER_CTX ctx;
    unsigned char iv[EVP_MAX_IV_LENGTH];
    PBE2PARAM *pbe2 = NULL;
    ASN1_OBJECT *obj;

    alg_nid = EVP_CIPHER_type(cipher);
    if (alg_nid == NID_undef) {
        ASN1err(ASN1_F_PKCS5_PBE2_SET_IV,
                ASN1_R_CIPHER_HAS_NO_OBJECT_IDENTIFIER);
        goto err;
    }
    obj = OBJ_nid2obj(alg_nid);

    if (!(pbe2 = PBE2PARAM_new()))
        goto merr;

    /* Setup the AlgorithmIdentifier for the encryption scheme */
    scheme = pbe2->encryption;

    scheme->algorithm = obj;
    if (!(scheme->parameter = ASN1_TYPE_new()))
        goto merr;

    /* Create random IV */
    if (EVP_CIPHER_iv_length(cipher)) {
        if (aiv)
            memcpy(iv, aiv, EVP_CIPHER_iv_length(cipher));
        else if (RAND_bytes(iv, EVP_CIPHER_iv_length(cipher)) <= 0)
            goto err;
    }

    EVP_CIPHER_CTX_init(&ctx);

    /* Dummy cipherinit to just setup the IV, and PRF */
    if (!EVP_CipherInit_ex(&ctx, cipher, NULL, NULL, iv, 0))
        goto err;
    if (EVP_CIPHER_param_to_asn1(&ctx, scheme->parameter) < 0) {
        ASN1err(ASN1_F_PKCS5_PBE2_SET_IV, ASN1_R_ERROR_SETTING_CIPHER_PARAMS);
        EVP_CIPHER_CTX_cleanup(&ctx);
        goto err;
    }
    /*
     * If prf NID unspecified see if cipher has a preference. An error is OK
     * here: just means use default PRF.
     */
    if ((prf_nid == -1) &&
        EVP_CIPHER_CTX_ctrl(&ctx, EVP_CTRL_PBE_PRF_NID, 0, &prf_nid) <= 0) {
        ERR_clear_error();
        prf_nid = NID_hmacWithSHA1;
    }
    EVP_CIPHER_CTX_cleanup(&ctx);

    /* If its RC2 then we'd better setup the key length */

    if (alg_nid == NID_rc2_cbc)
        keylen = EVP_CIPHER_key_length(cipher);
    else
        keylen = -1;

    /* Setup keyfunc */

    X509_ALGOR_free(pbe2->keyfunc);

    pbe2->keyfunc = PKCS5_pbkdf2_set(iter, salt, saltlen, prf_nid, keylen);

    if (!pbe2->keyfunc)
        goto merr;

    /* Now set up top level AlgorithmIdentifier */

    if (!(ret = X509_ALGOR_new()))
        goto merr;
    if (!(ret->parameter = ASN1_TYPE_new()))
        goto merr;

    ret->algorithm = OBJ_nid2obj(NID_pbes2);

    /* Encode PBE2PARAM into parameter */

    if (!ASN1_item_pack(pbe2, ASN1_ITEM_rptr(PBE2PARAM),
                        &ret->parameter->value.sequence))
         goto merr;
    ret->parameter->type = V_ASN1_SEQUENCE;

    PBE2PARAM_free(pbe2);
    pbe2 = NULL;

    return ret;

 merr:
    ASN1err(ASN1_F_PKCS5_PBE2_SET_IV, ERR_R_MALLOC_FAILURE);

 err:
    PBE2PARAM_free(pbe2);
    /* Note 'scheme' is freed as part of pbe2 */
    X509_ALGOR_free(kalg);
    X509_ALGOR_free(ret);

    return NULL;

}

X509_ALGOR *PKCS5_pbe2_set(const EVP_CIPHER *cipher, int iter,
                           unsigned char *salt, int saltlen)
{
    return PKCS5_pbe2_set_iv(cipher, iter, salt, saltlen, NULL, -1);
}

X509_ALGOR *PKCS5_pbkdf2_set(int iter, unsigned char *salt, int saltlen,
                             int prf_nid, int keylen)
{
    X509_ALGOR *keyfunc = NULL;
    PBKDF2PARAM *kdf = NULL;
    ASN1_OCTET_STRING *osalt = NULL;

    if (!(kdf = PBKDF2PARAM_new()))
        goto merr;
    if (!(osalt = ASN1_OCTET_STRING_new()))
        goto merr;

    kdf->salt->value.octet_string = osalt;
    kdf->salt->type = V_ASN1_OCTET_STRING;

    if (!saltlen)
        saltlen = PKCS5_SALT_LEN;
    if (!(osalt->data = OPENSSL_malloc(saltlen)))
        goto merr;

    osalt->length = saltlen;

    if (salt)
        memcpy(osalt->data, salt, saltlen);
    else if (RAND_bytes(osalt->data, saltlen) <= 0)
        goto merr;

    if (iter <= 0)
        iter = PKCS5_DEFAULT_ITER;

    if (!ASN1_INTEGER_set(kdf->iter, iter))
        goto merr;

    /* If have a key len set it up */

    if (keylen > 0) {
        if (!(kdf->keylength = ASN1_INTEGER_new()))
            goto merr;
        if (!ASN1_INTEGER_set(kdf->keylength, keylen))
            goto merr;
    }

    /* prf can stay NULL if we are using hmacWithSHA1 */
    if (prf_nid > 0 && prf_nid != NID_hmacWithSHA1) {
        kdf->prf = X509_ALGOR_new();
        if (!kdf->prf)
            goto merr;
        X509_ALGOR_set0(kdf->prf, OBJ_nid2obj(prf_nid), V_ASN1_NULL, NULL);
    }

    /* Finally setup the keyfunc structure */

    keyfunc = X509_ALGOR_new();
    if (!keyfunc)
        goto merr;

    keyfunc->algorithm = OBJ_nid2obj(NID_id_pbkdf2);

    /* Encode PBKDF2PARAM into parameter of pbe2 */

    if (!(keyfunc->parameter = ASN1_TYPE_new()))
        goto merr;

    if (!ASN1_item_pack(kdf, ASN1_ITEM_rptr(PBKDF2PARAM),
                        &keyfunc->parameter->value.sequence))
         goto merr;
    keyfunc->parameter->type = V_ASN1_SEQUENCE;

    PBKDF2PARAM_free(kdf);
    return keyfunc;

 merr:
    ASN1err(ASN1_F_PKCS5_PBKDF2_SET, ERR_R_MALLOC_FAILURE);
    PBKDF2PARAM_free(kdf);
    X509_ALGOR_free(keyfunc);
    return NULL;
}
Commit	Line	Data
d2e26dcc	1	/* p5_pbev2.c */
0f113f3e MC	2	/*
	3	* Written by Dr Stephen N Henson (steve@openssl.org) for the OpenSSL project
	4	* 1999-2004.
d2e26dcc DSH	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
0f113f3e	14	* notice, this list of conditions and the following disclaimer.
d2e26dcc DSH	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	#include <stdio.h>
	61	#include "cryptlib.h"
9d6b1ce6	62	#include <openssl/asn1t.h>
f0e8ae72	63	#include <openssl/x509.h>
ec577822	64	#include <openssl/rand.h>
d2e26dcc DSH	65
	66	/* PKCS#5 v2.0 password based encryption structures */
	67
9d6b1ce6	68	ASN1_SEQUENCE(PBE2PARAM) = {
0f113f3e MC	69	ASN1_SIMPLE(PBE2PARAM, keyfunc, X509_ALGOR),
0f113f3e MC	70	ASN1_SIMPLE(PBE2PARAM, encryption, X509_ALGOR)
d339187b	71	} ASN1_SEQUENCE_END(PBE2PARAM)
d2e26dcc	72
9d6b1ce6	73	IMPLEMENT_ASN1_FUNCTIONS(PBE2PARAM)
d2e26dcc	74
9d6b1ce6	75	ASN1_SEQUENCE(PBKDF2PARAM) = {
0f113f3e MC	76	ASN1_SIMPLE(PBKDF2PARAM, salt, ASN1_ANY),
	77	ASN1_SIMPLE(PBKDF2PARAM, iter, ASN1_INTEGER),
	78	ASN1_OPT(PBKDF2PARAM, keylength, ASN1_INTEGER),
	79	ASN1_OPT(PBKDF2PARAM, prf, X509_ALGOR)
d339187b	80	} ASN1_SEQUENCE_END(PBKDF2PARAM)
d2e26dcc	81
9d6b1ce6	82	IMPLEMENT_ASN1_FUNCTIONS(PBKDF2PARAM)
d2e26dcc	83
0f113f3e MC	84	/*
	85	* Return an algorithm identifier for a PKCS#5 v2.0 PBE algorithm: yes I know
	86	* this is horrible! Extended version to allow application supplied PRF NID
	87	* and IV.
8e21c146 DSH	88	*/
8e21c146 DSH	89
ae519a24	90	X509_ALGOR PKCS5_pbe2_set_iv(const EVP_CIPHER cipher, int iter,
0f113f3e MC	91	unsigned char *salt, int saltlen,
0f113f3e MC	92	unsigned char *aiv, int prf_nid)
8e21c146	93	{
0f113f3e MC	94	X509_ALGOR scheme = NULL, kalg = NULL, *ret = NULL;
	95	int alg_nid, keylen;
	96	EVP_CIPHER_CTX ctx;
	97	unsigned char iv[EVP_MAX_IV_LENGTH];
	98	PBE2PARAM *pbe2 = NULL;
	99	ASN1_OBJECT *obj;
	100
	101	alg_nid = EVP_CIPHER_type(cipher);
	102	if (alg_nid == NID_undef) {
	103	ASN1err(ASN1_F_PKCS5_PBE2_SET_IV,
	104	ASN1_R_CIPHER_HAS_NO_OBJECT_IDENTIFIER);
	105	goto err;
	106	}
	107	obj = OBJ_nid2obj(alg_nid);
	108
	109	if (!(pbe2 = PBE2PARAM_new()))
	110	goto merr;
	111
	112	/* Setup the AlgorithmIdentifier for the encryption scheme */
	113	scheme = pbe2->encryption;
	114
	115	scheme->algorithm = obj;
	116	if (!(scheme->parameter = ASN1_TYPE_new()))
	117	goto merr;
	118
	119	/* Create random IV */
	120	if (EVP_CIPHER_iv_length(cipher)) {
	121	if (aiv)
	122	memcpy(iv, aiv, EVP_CIPHER_iv_length(cipher));
266483d2	123	else if (RAND_bytes(iv, EVP_CIPHER_iv_length(cipher)) <= 0)
0f113f3e MC	124	goto err;
	125	}
	126
	127	EVP_CIPHER_CTX_init(&ctx);
	128
	129	/* Dummy cipherinit to just setup the IV, and PRF */
	130	if (!EVP_CipherInit_ex(&ctx, cipher, NULL, NULL, iv, 0))
	131	goto err;
	132	if (EVP_CIPHER_param_to_asn1(&ctx, scheme->parameter) < 0) {
	133	ASN1err(ASN1_F_PKCS5_PBE2_SET_IV, ASN1_R_ERROR_SETTING_CIPHER_PARAMS);
	134	EVP_CIPHER_CTX_cleanup(&ctx);
	135	goto err;
	136	}
	137	/*
	138	* If prf NID unspecified see if cipher has a preference. An error is OK
	139	* here: just means use default PRF.
	140	*/
	141	if ((prf_nid == -1) &&
	142	EVP_CIPHER_CTX_ctrl(&ctx, EVP_CTRL_PBE_PRF_NID, 0, &prf_nid) <= 0) {
	143	ERR_clear_error();
	144	prf_nid = NID_hmacWithSHA1;
	145	}
	146	EVP_CIPHER_CTX_cleanup(&ctx);
	147
	148	/* If its RC2 then we'd better setup the key length */
	149
	150	if (alg_nid == NID_rc2_cbc)
	151	keylen = EVP_CIPHER_key_length(cipher);
	152	else
	153	keylen = -1;
	154
	155	/* Setup keyfunc */
	156
	157	X509_ALGOR_free(pbe2->keyfunc);
	158
	159	pbe2->keyfunc = PKCS5_pbkdf2_set(iter, salt, saltlen, prf_nid, keylen);
	160
	161	if (!pbe2->keyfunc)
	162	goto merr;
	163
	164	/* Now set up top level AlgorithmIdentifier */
	165
	166	if (!(ret = X509_ALGOR_new()))
	167	goto merr;
	168	if (!(ret->parameter = ASN1_TYPE_new()))
	169	goto merr;
	170
	171	ret->algorithm = OBJ_nid2obj(NID_pbes2);
	172
	173	/* Encode PBE2PARAM into parameter */
	174
	175	if (!ASN1_item_pack(pbe2, ASN1_ITEM_rptr(PBE2PARAM),
	176	&ret->parameter->value.sequence))
	177	goto merr;
	178	ret->parameter->type = V_ASN1_SEQUENCE;
	179
	180	PBE2PARAM_free(pbe2);
	181	pbe2 = NULL;
	182
	183	return ret;
	184
	185	merr:
	186	ASN1err(ASN1_F_PKCS5_PBE2_SET_IV, ERR_R_MALLOC_FAILURE);
	187
188	err:
189	PBE2PARAM_free(pbe2);
190	/* Note 'scheme' is freed as part of pbe2 */
191	X509_ALGOR_free(kalg);
192	X509_ALGOR_free(ret);
193
194	return NULL;
8e21c146	195
0f113f3e	196	}
8e21c146	197
0f113f3e MC	198	X509_ALGOR PKCS5_pbe2_set(const EVP_CIPHER cipher, int iter,
	199	unsigned char *salt, int saltlen)
	200	{
	201	return PKCS5_pbe2_set_iv(cipher, iter, salt, saltlen, NULL, -1);
	202	}
8e21c146	203
0f113f3e MC	204	X509_ALGOR PKCS5_pbkdf2_set(int iter, unsigned char salt, int saltlen,
	205	int prf_nid, int keylen)
	206	{
	207	X509_ALGOR *keyfunc = NULL;
	208	PBKDF2PARAM *kdf = NULL;
	209	ASN1_OCTET_STRING *osalt = NULL;
0fccb00b	210
0f113f3e MC	211	if (!(kdf = PBKDF2PARAM_new()))
0f113f3e MC	212	goto merr;
f422a514	213	if (!(osalt = ASN1_OCTET_STRING_new()))
0f113f3e	214	goto merr;
8e21c146	215
0f113f3e MC	216	kdf->salt->value.octet_string = osalt;
0f113f3e MC	217	kdf->salt->type = V_ASN1_OCTET_STRING;
8e21c146	218
0f113f3e MC	219	if (!saltlen)
	220	saltlen = PKCS5_SALT_LEN;
	221	if (!(osalt->data = OPENSSL_malloc(saltlen)))
	222	goto merr;
8e21c146	223
0f113f3e	224	osalt->length = saltlen;
8e21c146	225
0f113f3e MC	226	if (salt)
0f113f3e MC	227	memcpy(osalt->data, salt, saltlen);
266483d2	228	else if (RAND_bytes(osalt->data, saltlen) <= 0)
0f113f3e	229	goto merr;
f9678b8b	230
0f113f3e MC	231	if (iter <= 0)
0f113f3e MC	232	iter = PKCS5_DEFAULT_ITER;
8e21c146	233
0f113f3e MC	234	if (!ASN1_INTEGER_set(kdf->iter, iter))
0f113f3e MC	235	goto merr;
8e21c146	236
0f113f3e	237	/* If have a key len set it up */
8e21c146	238
0f113f3e	239	if (keylen > 0) {
f422a514	240	if (!(kdf->keylength = ASN1_INTEGER_new()))
0f113f3e MC	241	goto merr;
	242	if (!ASN1_INTEGER_set(kdf->keylength, keylen))
	243	goto merr;
	244	}
8e21c146	245
0f113f3e MC	246	/* prf can stay NULL if we are using hmacWithSHA1 */
	247	if (prf_nid > 0 && prf_nid != NID_hmacWithSHA1) {
	248	kdf->prf = X509_ALGOR_new();
	249	if (!kdf->prf)
	250	goto merr;
	251	X509_ALGOR_set0(kdf->prf, OBJ_nid2obj(prf_nid), V_ASN1_NULL, NULL);
	252	}
8e21c146	253
0f113f3e	254	/* Finally setup the keyfunc structure */
8e21c146	255
0f113f3e MC	256	keyfunc = X509_ALGOR_new();
	257	if (!keyfunc)
	258	goto merr;
8e21c146	259
0f113f3e	260	keyfunc->algorithm = OBJ_nid2obj(NID_id_pbkdf2);
8e21c146	261
0f113f3e	262	/* Encode PBKDF2PARAM into parameter of pbe2 */
8e21c146	263
0f113f3e MC	264	if (!(keyfunc->parameter = ASN1_TYPE_new()))
0f113f3e MC	265	goto merr;
8e21c146	266
0f113f3e MC	267	if (!ASN1_item_pack(kdf, ASN1_ITEM_rptr(PBKDF2PARAM),
	268	&keyfunc->parameter->value.sequence))
	269	goto merr;
	270	keyfunc->parameter->type = V_ASN1_SEQUENCE;
8e21c146	271
0f113f3e MC	272	PBKDF2PARAM_free(kdf);
0f113f3e MC	273	return keyfunc;
8e21c146	274
0f113f3e MC	275	merr:
	276	ASN1err(ASN1_F_PKCS5_PBKDF2_SET, ERR_R_MALLOC_FAILURE);
	277	PBKDF2PARAM_free(kdf);
	278	X509_ALGOR_free(keyfunc);
	279	return NULL;
8e21c146	280	}