[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 "internal/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()) == NULL)
        goto merr;

    /* Setup the AlgorithmIdentifier for the encryption scheme */
    scheme = pbe2->encryption;
    scheme->algorithm = obj;
    if ((scheme->parameter = ASN1_TYPE_new()) == NULL)
        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()) == NULL)
        goto merr;

    ret->algorithm = OBJ_nid2obj(NID_pbes2);

    /* Encode PBE2PARAM into parameter */

    if (!ASN1_TYPE_pack_sequence(ASN1_ITEM_rptr(PBE2PARAM), pbe2,
                                 &ret->parameter))
         goto merr;

    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()) == NULL)
        goto merr;
    if ((osalt = ASN1_OCTET_STRING_new()) == NULL)
        goto merr;

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

    if (saltlen == 0)
        saltlen = PKCS5_SALT_LEN;
    if ((osalt->data = OPENSSL_malloc(saltlen)) == NULL)
        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()) == NULL)
            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 (!ASN1_TYPE_pack_sequence(ASN1_ITEM_rptr(PBKDF2PARAM), kdf,
                                 &keyfunc->parameter))
         goto merr;

    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>
b39fc560	61	#include "internal/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
75ebbd9a	109	if ((pbe2 = PBE2PARAM_new()) == NULL)
0f113f3e MC	110	goto merr;
	111
	112	/* Setup the AlgorithmIdentifier for the encryption scheme */
	113	scheme = pbe2->encryption;
0f113f3e	114	scheme->algorithm = obj;
75ebbd9a	115	if ((scheme->parameter = ASN1_TYPE_new()) == NULL)
0f113f3e MC	116	goto merr;
	117
	118	/* Create random IV */
	119	if (EVP_CIPHER_iv_length(cipher)) {
	120	if (aiv)
	121	memcpy(iv, aiv, EVP_CIPHER_iv_length(cipher));
266483d2	122	else if (RAND_bytes(iv, EVP_CIPHER_iv_length(cipher)) <= 0)
0f113f3e MC	123	goto err;
	124	}
	125
	126	EVP_CIPHER_CTX_init(&ctx);
	127
	128	/* Dummy cipherinit to just setup the IV, and PRF */
	129	if (!EVP_CipherInit_ex(&ctx, cipher, NULL, NULL, iv, 0))
	130	goto err;
	131	if (EVP_CIPHER_param_to_asn1(&ctx, scheme->parameter) < 0) {
	132	ASN1err(ASN1_F_PKCS5_PBE2_SET_IV, ASN1_R_ERROR_SETTING_CIPHER_PARAMS);
	133	EVP_CIPHER_CTX_cleanup(&ctx);
	134	goto err;
	135	}
	136	/*
	137	* If prf NID unspecified see if cipher has a preference. An error is OK
	138	* here: just means use default PRF.
	139	*/
	140	if ((prf_nid == -1) &&
	141	EVP_CIPHER_CTX_ctrl(&ctx, EVP_CTRL_PBE_PRF_NID, 0, &prf_nid) <= 0) {
	142	ERR_clear_error();
	143	prf_nid = NID_hmacWithSHA1;
	144	}
	145	EVP_CIPHER_CTX_cleanup(&ctx);
	146
	147	/* If its RC2 then we'd better setup the key length */
	148
	149	if (alg_nid == NID_rc2_cbc)
	150	keylen = EVP_CIPHER_key_length(cipher);
	151	else
	152	keylen = -1;
	153
	154	/* Setup keyfunc */
	155
	156	X509_ALGOR_free(pbe2->keyfunc);
	157
	158	pbe2->keyfunc = PKCS5_pbkdf2_set(iter, salt, saltlen, prf_nid, keylen);
	159
	160	if (!pbe2->keyfunc)
	161	goto merr;
	162
	163	/* Now set up top level AlgorithmIdentifier */
	164
75ebbd9a	165	if ((ret = X509_ALGOR_new()) == NULL)
0f113f3e	166	goto merr;
0f113f3e MC	167
	168	ret->algorithm = OBJ_nid2obj(NID_pbes2);
	169
	170	/* Encode PBE2PARAM into parameter */
	171
e93c8748 DSH	172	if (!ASN1_TYPE_pack_sequence(ASN1_ITEM_rptr(PBE2PARAM), pbe2,
e93c8748 DSH	173	&ret->parameter))
0f113f3e	174	goto merr;
0f113f3e MC	175
	176	PBE2PARAM_free(pbe2);
	177	pbe2 = NULL;
	178
	179	return ret;
	180
	181	merr:
	182	ASN1err(ASN1_F_PKCS5_PBE2_SET_IV, ERR_R_MALLOC_FAILURE);
	183
	184	err:
	185	PBE2PARAM_free(pbe2);
	186	/* Note 'scheme' is freed as part of pbe2 */
	187	X509_ALGOR_free(kalg);
	188	X509_ALGOR_free(ret);
	189
	190	return NULL;
8e21c146	191
0f113f3e	192	}
8e21c146	193
0f113f3e MC	194	X509_ALGOR PKCS5_pbe2_set(const EVP_CIPHER cipher, int iter,
	195	unsigned char *salt, int saltlen)
	196	{
	197	return PKCS5_pbe2_set_iv(cipher, iter, salt, saltlen, NULL, -1);
	198	}
8e21c146	199
0f113f3e MC	200	X509_ALGOR PKCS5_pbkdf2_set(int iter, unsigned char salt, int saltlen,
	201	int prf_nid, int keylen)
	202	{
	203	X509_ALGOR *keyfunc = NULL;
	204	PBKDF2PARAM *kdf = NULL;
	205	ASN1_OCTET_STRING *osalt = NULL;
0fccb00b	206
75ebbd9a	207	if ((kdf = PBKDF2PARAM_new()) == NULL)
0f113f3e	208	goto merr;
75ebbd9a	209	if ((osalt = ASN1_OCTET_STRING_new()) == NULL)
0f113f3e	210	goto merr;
8e21c146	211
0f113f3e MC	212	kdf->salt->value.octet_string = osalt;
0f113f3e MC	213	kdf->salt->type = V_ASN1_OCTET_STRING;
8e21c146	214
75ebbd9a	215	if (saltlen == 0)
0f113f3e	216	saltlen = PKCS5_SALT_LEN;
75ebbd9a	217	if ((osalt->data = OPENSSL_malloc(saltlen)) == NULL)
0f113f3e	218	goto merr;
8e21c146	219
0f113f3e	220	osalt->length = saltlen;
8e21c146	221
0f113f3e MC	222	if (salt)
0f113f3e MC	223	memcpy(osalt->data, salt, saltlen);
266483d2	224	else if (RAND_bytes(osalt->data, saltlen) <= 0)
0f113f3e	225	goto merr;
f9678b8b	226
0f113f3e MC	227	if (iter <= 0)
0f113f3e MC	228	iter = PKCS5_DEFAULT_ITER;
8e21c146	229
0f113f3e MC	230	if (!ASN1_INTEGER_set(kdf->iter, iter))
0f113f3e MC	231	goto merr;
8e21c146	232
0f113f3e	233	/* If have a key len set it up */
8e21c146	234
0f113f3e	235	if (keylen > 0) {
75ebbd9a	236	if ((kdf->keylength = ASN1_INTEGER_new()) == NULL)
0f113f3e MC	237	goto merr;
	238	if (!ASN1_INTEGER_set(kdf->keylength, keylen))
	239	goto merr;
	240	}
8e21c146	241
0f113f3e MC	242	/* prf can stay NULL if we are using hmacWithSHA1 */
	243	if (prf_nid > 0 && prf_nid != NID_hmacWithSHA1) {
	244	kdf->prf = X509_ALGOR_new();
	245	if (!kdf->prf)
	246	goto merr;
	247	X509_ALGOR_set0(kdf->prf, OBJ_nid2obj(prf_nid), V_ASN1_NULL, NULL);
	248	}
8e21c146	249
0f113f3e	250	/* Finally setup the keyfunc structure */
8e21c146	251
0f113f3e MC	252	keyfunc = X509_ALGOR_new();
	253	if (!keyfunc)
	254	goto merr;
8e21c146	255
0f113f3e	256	keyfunc->algorithm = OBJ_nid2obj(NID_id_pbkdf2);
8e21c146	257
0f113f3e	258	/* Encode PBKDF2PARAM into parameter of pbe2 */
8e21c146	259
e93c8748 DSH	260	if (!ASN1_TYPE_pack_sequence(ASN1_ITEM_rptr(PBKDF2PARAM), kdf,
e93c8748 DSH	261	&keyfunc->parameter))
0f113f3e	262	goto merr;
8e21c146	263
0f113f3e MC	264	PBKDF2PARAM_free(kdf);
0f113f3e MC	265	return keyfunc;
8e21c146	266
0f113f3e MC	267	merr:
	268	ASN1err(ASN1_F_PKCS5_PBKDF2_SET, ERR_R_MALLOC_FAILURE);
	269	PBKDF2PARAM_free(kdf);
	270	X509_ALGOR_free(keyfunc);
	271	return NULL;
8e21c146	272	}