xref: /src/crypto/openssl/crypto/pkcs12/p12_mutl.c (revision f25b8c9fb4f58cf61adb47d7570abe7caa6d385d)
1 /*
2  * Copyright 1999-2026 The OpenSSL Project Authors. All Rights Reserved.
3  *
4  * Licensed under the Apache License 2.0 (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
8  */
9 
10 /*
11  * HMAC low level APIs are deprecated for public use, but still ok for internal
12  * use.
13  */
14 #include "internal/deprecated.h"
15 
16 #include <stdio.h>
17 #include "internal/cryptlib.h"
18 #include "crypto/evp.h"
19 #include <openssl/crypto.h>
20 #include <openssl/hmac.h>
21 #include <openssl/rand.h>
22 #include <openssl/pkcs12.h>
23 #include "p12_local.h"
24 
25 static int pkcs12_pbmac1_pbkdf2_key_gen(const char *pass, int passlen,
26     unsigned char *salt, int saltlen,
27     int id, int iter, int keylen,
28     unsigned char *out,
29     const EVP_MD *md_type);
30 
PKCS12_mac_present(const PKCS12 * p12)31 int PKCS12_mac_present(const PKCS12 *p12)
32 {
33     return p12->mac ? 1 : 0;
34 }
35 
PKCS12_get0_mac(const ASN1_OCTET_STRING ** pmac,const X509_ALGOR ** pmacalg,const ASN1_OCTET_STRING ** psalt,const ASN1_INTEGER ** piter,const PKCS12 * p12)36 void PKCS12_get0_mac(const ASN1_OCTET_STRING **pmac,
37     const X509_ALGOR **pmacalg,
38     const ASN1_OCTET_STRING **psalt,
39     const ASN1_INTEGER **piter,
40     const PKCS12 *p12)
41 {
42     if (p12->mac) {
43         X509_SIG_get0(p12->mac->dinfo, pmacalg, pmac);
44         if (psalt)
45             *psalt = p12->mac->salt;
46         if (piter)
47             *piter = p12->mac->iter;
48     } else {
49         if (pmac)
50             *pmac = NULL;
51         if (pmacalg)
52             *pmacalg = NULL;
53         if (psalt)
54             *psalt = NULL;
55         if (piter)
56             *piter = NULL;
57     }
58 }
59 
60 #define TK26_MAC_KEY_LEN 32
61 
pkcs12_gen_gost_mac_key(const char * pass,int passlen,const unsigned char * salt,int saltlen,int iter,int keylen,unsigned char * key,const EVP_MD * digest)62 static int pkcs12_gen_gost_mac_key(const char *pass, int passlen,
63     const unsigned char *salt, int saltlen,
64     int iter, int keylen, unsigned char *key,
65     const EVP_MD *digest)
66 {
67     unsigned char out[96];
68 
69     if (keylen != TK26_MAC_KEY_LEN) {
70         return 0;
71     }
72 
73     if (!PKCS5_PBKDF2_HMAC(pass, passlen, salt, saltlen, iter,
74             digest, sizeof(out), out)) {
75         return 0;
76     }
77     memcpy(key, out + sizeof(out) - TK26_MAC_KEY_LEN, TK26_MAC_KEY_LEN);
78     OPENSSL_cleanse(out, sizeof(out));
79     return 1;
80 }
81 
PBMAC1_get1_pbkdf2_param(const X509_ALGOR * macalg)82 PBKDF2PARAM *PBMAC1_get1_pbkdf2_param(const X509_ALGOR *macalg)
83 {
84     PBMAC1PARAM *param = NULL;
85     PBKDF2PARAM *pbkdf2_param = NULL;
86     const ASN1_OBJECT *kdf_oid;
87 
88     param = ASN1_TYPE_unpack_sequence(ASN1_ITEM_rptr(PBMAC1PARAM), macalg->parameter);
89     if (param == NULL) {
90         ERR_raise(ERR_LIB_PKCS12, ERR_R_PASSED_INVALID_ARGUMENT);
91         return NULL;
92     }
93 
94     X509_ALGOR_get0(&kdf_oid, NULL, NULL, param->keyDerivationFunc);
95     if (OBJ_obj2nid(kdf_oid) != NID_id_pbkdf2) {
96         ERR_raise(ERR_LIB_PKCS12, ERR_R_PASSED_INVALID_ARGUMENT);
97         PBMAC1PARAM_free(param);
98         return NULL;
99     }
100 
101     pbkdf2_param = ASN1_TYPE_unpack_sequence(ASN1_ITEM_rptr(PBKDF2PARAM),
102         param->keyDerivationFunc->parameter);
103     PBMAC1PARAM_free(param);
104 
105     return pbkdf2_param;
106 }
107 
PBMAC1_PBKDF2_HMAC(OSSL_LIB_CTX * ctx,const char * propq,const char * pass,int passlen,const X509_ALGOR * macalg,unsigned char * key)108 static int PBMAC1_PBKDF2_HMAC(OSSL_LIB_CTX *ctx, const char *propq,
109     const char *pass, int passlen,
110     const X509_ALGOR *macalg, unsigned char *key)
111 {
112     PBKDF2PARAM *pbkdf2_param = NULL;
113     const ASN1_OBJECT *kdf_hmac_oid;
114     int kdf_hmac_nid;
115     int ret = -1;
116     int keylen = 0;
117     EVP_MD *kdf_md = NULL;
118     const ASN1_OCTET_STRING *pbkdf2_salt = NULL;
119 
120     pbkdf2_param = PBMAC1_get1_pbkdf2_param(macalg);
121     if (pbkdf2_param == NULL) {
122         ERR_raise(ERR_LIB_PKCS12, ERR_R_UNSUPPORTED);
123         goto err;
124     }
125 
126     if (pbkdf2_param->prf == NULL) {
127         kdf_hmac_nid = NID_hmacWithSHA1;
128     } else {
129         X509_ALGOR_get0(&kdf_hmac_oid, NULL, NULL, pbkdf2_param->prf);
130         kdf_hmac_nid = OBJ_obj2nid(kdf_hmac_oid);
131     }
132 
133     kdf_md = EVP_MD_fetch(ctx, OBJ_nid2sn(ossl_hmac2mdnid(kdf_hmac_nid)), propq);
134     if (kdf_md == NULL) {
135         ERR_raise(ERR_LIB_PKCS12, ERR_R_FETCH_FAILED);
136         goto err;
137     }
138 
139     /* Validate salt is an OCTET STRING choice */
140     if (pbkdf2_param->salt == NULL
141         || pbkdf2_param->salt->type != V_ASN1_OCTET_STRING) {
142         ERR_raise(ERR_LIB_PKCS12, PKCS12_R_PARSE_ERROR);
143         goto err;
144     }
145     pbkdf2_salt = pbkdf2_param->salt->value.octet_string;
146 
147     /* RFC 9579 specifies missing key length as invalid */
148     if (pbkdf2_param->keylength != NULL)
149         keylen = ASN1_INTEGER_get(pbkdf2_param->keylength);
150     if (keylen <= 0 || keylen > EVP_MAX_MD_SIZE) {
151         ERR_raise(ERR_LIB_PKCS12, PKCS12_R_PARSE_ERROR);
152         goto err;
153     }
154 
155     if (PKCS5_PBKDF2_HMAC(pass, passlen, pbkdf2_salt->data, pbkdf2_salt->length,
156             ASN1_INTEGER_get(pbkdf2_param->iter), kdf_md, keylen, key)
157         <= 0) {
158         ERR_raise(ERR_LIB_PKCS12, ERR_R_INTERNAL_ERROR);
159         goto err;
160     }
161     ret = keylen;
162 
163 err:
164     EVP_MD_free(kdf_md);
165     PBKDF2PARAM_free(pbkdf2_param);
166 
167     return ret;
168 }
169 
170 /* Generate a MAC, also used for verification */
pkcs12_gen_mac(PKCS12 * p12,const char * pass,int passlen,unsigned char * mac,unsigned int * maclen,int pbmac1_md_nid,int pbmac1_kdf_nid,int (* pkcs12_key_gen)(const char * pass,int passlen,unsigned char * salt,int slen,int id,int iter,int n,unsigned char * out,const EVP_MD * md_type))171 static int pkcs12_gen_mac(PKCS12 *p12, const char *pass, int passlen,
172     unsigned char *mac, unsigned int *maclen,
173     int pbmac1_md_nid, int pbmac1_kdf_nid,
174     int (*pkcs12_key_gen)(const char *pass, int passlen,
175         unsigned char *salt, int slen,
176         int id, int iter, int n,
177         unsigned char *out,
178         const EVP_MD *md_type))
179 {
180     int ret = 0;
181     const EVP_MD *md;
182     EVP_MD *md_fetch;
183     HMAC_CTX *hmac = NULL;
184     unsigned char key[EVP_MAX_MD_SIZE], *salt;
185     int saltlen, iter;
186     char md_name[80];
187     int keylen = 0;
188     int md_nid = NID_undef;
189     const X509_ALGOR *macalg;
190     const ASN1_OBJECT *macoid;
191 
192     if (!PKCS7_type_is_data(p12->authsafes)) {
193         ERR_raise(ERR_LIB_PKCS12, PKCS12_R_CONTENT_TYPE_NOT_DATA);
194         return 0;
195     }
196 
197     if (p12->authsafes->d.data == NULL) {
198         ERR_raise(ERR_LIB_PKCS12, PKCS12_R_DECODE_ERROR);
199         return 0;
200     }
201 
202     salt = p12->mac->salt->data;
203     saltlen = p12->mac->salt->length;
204     if (p12->mac->iter == NULL)
205         iter = 1;
206     else
207         iter = ASN1_INTEGER_get(p12->mac->iter);
208     X509_SIG_get0(p12->mac->dinfo, &macalg, NULL);
209     X509_ALGOR_get0(&macoid, NULL, NULL, macalg);
210     if (OBJ_obj2nid(macoid) == NID_pbmac1) {
211         if (OBJ_obj2txt(md_name, sizeof(md_name), OBJ_nid2obj(pbmac1_md_nid), 0) < 0)
212             return 0;
213     } else {
214         if (OBJ_obj2txt(md_name, sizeof(md_name), macoid, 0) < 0)
215             return 0;
216     }
217     (void)ERR_set_mark();
218     md = md_fetch = EVP_MD_fetch(p12->authsafes->ctx.libctx, md_name,
219         p12->authsafes->ctx.propq);
220     if (md == NULL)
221         md = EVP_get_digestbynid(OBJ_obj2nid(macoid));
222 
223     if (md == NULL) {
224         (void)ERR_clear_last_mark();
225         ERR_raise(ERR_LIB_PKCS12, PKCS12_R_UNKNOWN_DIGEST_ALGORITHM);
226         return 0;
227     }
228     (void)ERR_pop_to_mark();
229 
230     keylen = EVP_MD_get_size(md);
231     md_nid = EVP_MD_get_type(md);
232     if (keylen <= 0)
233         goto err;
234 
235     /* For PBMAC1 we use a special keygen callback if not provided (e.g. on verification) */
236     if (pbmac1_md_nid != NID_undef && pkcs12_key_gen == NULL) {
237         keylen = PBMAC1_PBKDF2_HMAC(p12->authsafes->ctx.libctx, p12->authsafes->ctx.propq,
238             pass, passlen, macalg, key);
239         if (keylen < 0)
240             goto err;
241     } else if ((md_nid == NID_id_GostR3411_94
242                    || md_nid == NID_id_GostR3411_2012_256
243                    || md_nid == NID_id_GostR3411_2012_512)
244         && ossl_safe_getenv("LEGACY_GOST_PKCS12") == NULL) {
245         keylen = TK26_MAC_KEY_LEN;
246         if (!pkcs12_gen_gost_mac_key(pass, passlen, salt, saltlen, iter,
247                 keylen, key, md)) {
248             ERR_raise(ERR_LIB_PKCS12, PKCS12_R_KEY_GEN_ERROR);
249             goto err;
250         }
251     } else {
252         EVP_MD *hmac_md = (EVP_MD *)md;
253         int fetched = 0;
254 
255         if (pbmac1_kdf_nid != NID_undef) {
256             char hmac_md_name[128];
257 
258             if (OBJ_obj2txt(hmac_md_name, sizeof(hmac_md_name), OBJ_nid2obj(pbmac1_kdf_nid), 0) < 0)
259                 goto err;
260             hmac_md = EVP_MD_fetch(NULL, hmac_md_name, NULL);
261             if (hmac_md == NULL)
262                 goto err;
263             fetched = 1;
264         }
265         if (pkcs12_key_gen != NULL) {
266             int res = (*pkcs12_key_gen)(pass, passlen, salt, saltlen, PKCS12_MAC_ID,
267                 iter, keylen, key, hmac_md);
268 
269             if (fetched)
270                 EVP_MD_free(hmac_md);
271             if (res != 1) {
272                 ERR_raise(ERR_LIB_PKCS12, PKCS12_R_KEY_GEN_ERROR);
273                 goto err;
274             }
275         } else {
276             if (fetched)
277                 EVP_MD_free(hmac_md);
278             /* Default to UTF-8 password */
279             if (!PKCS12_key_gen_utf8_ex(pass, passlen, salt, saltlen, PKCS12_MAC_ID,
280                     iter, keylen, key, md,
281                     p12->authsafes->ctx.libctx, p12->authsafes->ctx.propq)) {
282                 ERR_raise(ERR_LIB_PKCS12, PKCS12_R_KEY_GEN_ERROR);
283                 goto err;
284             }
285         }
286     }
287     if ((hmac = HMAC_CTX_new()) == NULL
288         || !HMAC_Init_ex(hmac, key, keylen, md, NULL)
289         || !HMAC_Update(hmac, p12->authsafes->d.data->data,
290             p12->authsafes->d.data->length)
291         || !HMAC_Final(hmac, mac, maclen)) {
292         goto err;
293     }
294     ret = 1;
295 
296 err:
297     OPENSSL_cleanse(key, sizeof(key));
298     HMAC_CTX_free(hmac);
299     EVP_MD_free(md_fetch);
300     return ret;
301 }
302 
PKCS12_gen_mac(PKCS12 * p12,const char * pass,int passlen,unsigned char * mac,unsigned int * maclen)303 int PKCS12_gen_mac(PKCS12 *p12, const char *pass, int passlen,
304     unsigned char *mac, unsigned int *maclen)
305 {
306     return pkcs12_gen_mac(p12, pass, passlen, mac, maclen, NID_undef, NID_undef, NULL);
307 }
308 
309 /* Verify the mac */
PKCS12_verify_mac(PKCS12 * p12,const char * pass,int passlen)310 int PKCS12_verify_mac(PKCS12 *p12, const char *pass, int passlen)
311 {
312     unsigned char mac[EVP_MAX_MD_SIZE];
313     unsigned int maclen;
314     const ASN1_OCTET_STRING *macoct;
315     const X509_ALGOR *macalg;
316     const ASN1_OBJECT *macoid;
317 
318     if (p12->mac == NULL) {
319         ERR_raise(ERR_LIB_PKCS12, PKCS12_R_MAC_ABSENT);
320         return 0;
321     }
322 
323     X509_SIG_get0(p12->mac->dinfo, &macalg, NULL);
324     X509_ALGOR_get0(&macoid, NULL, NULL, macalg);
325     if (OBJ_obj2nid(macoid) == NID_pbmac1) {
326         PBMAC1PARAM *param = NULL;
327         const ASN1_OBJECT *hmac_oid;
328         int md_nid = NID_undef;
329 
330         param = ASN1_TYPE_unpack_sequence(ASN1_ITEM_rptr(PBMAC1PARAM), macalg->parameter);
331         if (param == NULL) {
332             ERR_raise(ERR_LIB_PKCS12, ERR_R_UNSUPPORTED);
333             return 0;
334         }
335         X509_ALGOR_get0(&hmac_oid, NULL, NULL, param->messageAuthScheme);
336         md_nid = ossl_hmac2mdnid(OBJ_obj2nid(hmac_oid));
337 
338         if (!pkcs12_gen_mac(p12, pass, passlen, mac, &maclen, md_nid, NID_undef, NULL)) {
339             ERR_raise(ERR_LIB_PKCS12, PKCS12_R_MAC_GENERATION_ERROR);
340             PBMAC1PARAM_free(param);
341             return 0;
342         }
343         PBMAC1PARAM_free(param);
344     } else {
345         if (!pkcs12_gen_mac(p12, pass, passlen, mac, &maclen, NID_undef, NID_undef, NULL)) {
346             ERR_raise(ERR_LIB_PKCS12, PKCS12_R_MAC_GENERATION_ERROR);
347             return 0;
348         }
349     }
350     X509_SIG_get0(p12->mac->dinfo, NULL, &macoct);
351     if ((maclen != (unsigned int)ASN1_STRING_length(macoct))
352         || CRYPTO_memcmp(mac, ASN1_STRING_get0_data(macoct), maclen) != 0)
353         return 0;
354 
355     return 1;
356 }
357 
358 /* Set a mac */
PKCS12_set_mac(PKCS12 * p12,const char * pass,int passlen,unsigned char * salt,int saltlen,int iter,const EVP_MD * md_type)359 int PKCS12_set_mac(PKCS12 *p12, const char *pass, int passlen,
360     unsigned char *salt, int saltlen, int iter,
361     const EVP_MD *md_type)
362 {
363     unsigned char mac[EVP_MAX_MD_SIZE];
364     unsigned int maclen;
365     ASN1_OCTET_STRING *macoct;
366 
367     if (md_type == NULL)
368         /* No need to do a fetch as the md_type is used only to get a NID */
369         md_type = EVP_sha256();
370     if (!iter)
371         iter = PKCS12_DEFAULT_ITER;
372     if (PKCS12_setup_mac(p12, iter, salt, saltlen, md_type) == PKCS12_ERROR) {
373         ERR_raise(ERR_LIB_PKCS12, PKCS12_R_MAC_SETUP_ERROR);
374         return 0;
375     }
376     /*
377      * Note that output mac is forced to UTF-8...
378      */
379     if (!pkcs12_gen_mac(p12, pass, passlen, mac, &maclen, NID_undef, NID_undef, NULL)) {
380         ERR_raise(ERR_LIB_PKCS12, PKCS12_R_MAC_GENERATION_ERROR);
381         return 0;
382     }
383     X509_SIG_getm(p12->mac->dinfo, NULL, &macoct);
384     if (!ASN1_OCTET_STRING_set(macoct, mac, maclen)) {
385         ERR_raise(ERR_LIB_PKCS12, PKCS12_R_MAC_STRING_SET_ERROR);
386         return 0;
387     }
388     return 1;
389 }
390 
pkcs12_pbmac1_pbkdf2_key_gen(const char * pass,int passlen,unsigned char * salt,int saltlen,int id,int iter,int keylen,unsigned char * out,const EVP_MD * md_type)391 static int pkcs12_pbmac1_pbkdf2_key_gen(const char *pass, int passlen,
392     unsigned char *salt, int saltlen,
393     int id, int iter, int keylen,
394     unsigned char *out,
395     const EVP_MD *md_type)
396 {
397     return PKCS5_PBKDF2_HMAC(pass, passlen, salt, saltlen, iter,
398         md_type, keylen, out);
399 }
400 
pkcs12_setup_mac(PKCS12 * p12,int iter,unsigned char * salt,int saltlen,int nid)401 static int pkcs12_setup_mac(PKCS12 *p12, int iter, unsigned char *salt, int saltlen,
402     int nid)
403 {
404     X509_ALGOR *macalg;
405 
406     PKCS12_MAC_DATA_free(p12->mac);
407     p12->mac = NULL;
408 
409     if ((p12->mac = PKCS12_MAC_DATA_new()) == NULL)
410         return PKCS12_ERROR;
411     if (iter > 1) {
412         if ((p12->mac->iter = ASN1_INTEGER_new()) == NULL) {
413             ERR_raise(ERR_LIB_PKCS12, ERR_R_ASN1_LIB);
414             return 0;
415         }
416         if (!ASN1_INTEGER_set(p12->mac->iter, iter)) {
417             ERR_raise(ERR_LIB_PKCS12, ERR_R_ASN1_LIB);
418             return 0;
419         }
420     }
421     if (saltlen == 0)
422         saltlen = PKCS12_SALT_LEN;
423     else if (saltlen < 0)
424         return 0;
425     if ((p12->mac->salt->data = OPENSSL_malloc(saltlen)) == NULL)
426         return 0;
427     p12->mac->salt->length = saltlen;
428     if (salt == NULL) {
429         if (RAND_bytes_ex(p12->authsafes->ctx.libctx, p12->mac->salt->data,
430                 (size_t)saltlen, 0)
431             <= 0)
432             return 0;
433     } else {
434         memcpy(p12->mac->salt->data, salt, saltlen);
435     }
436     X509_SIG_getm(p12->mac->dinfo, &macalg, NULL);
437     if (!X509_ALGOR_set0(macalg, OBJ_nid2obj(nid), V_ASN1_NULL, NULL)) {
438         ERR_raise(ERR_LIB_PKCS12, ERR_R_ASN1_LIB);
439         return 0;
440     }
441 
442     return 1;
443 }
444 
445 /* Set up a mac structure */
PKCS12_setup_mac(PKCS12 * p12,int iter,unsigned char * salt,int saltlen,const EVP_MD * md_type)446 int PKCS12_setup_mac(PKCS12 *p12, int iter, unsigned char *salt, int saltlen,
447     const EVP_MD *md_type)
448 {
449     return pkcs12_setup_mac(p12, iter, salt, saltlen, EVP_MD_get_type(md_type));
450 }
451 
PKCS12_set_pbmac1_pbkdf2(PKCS12 * p12,const char * pass,int passlen,unsigned char * salt,int saltlen,int iter,const EVP_MD * md_type,const char * prf_md_name)452 int PKCS12_set_pbmac1_pbkdf2(PKCS12 *p12, const char *pass, int passlen,
453     unsigned char *salt, int saltlen, int iter,
454     const EVP_MD *md_type, const char *prf_md_name)
455 {
456     unsigned char mac[EVP_MAX_MD_SIZE];
457     unsigned int maclen;
458     ASN1_OCTET_STRING *macoct;
459     X509_ALGOR *alg = NULL;
460     int ret = 0;
461     int prf_md_nid = NID_undef, prf_nid = NID_undef, hmac_nid;
462     unsigned char *known_salt = NULL;
463     int keylen = 0;
464     PBMAC1PARAM *param = NULL;
465     X509_ALGOR *hmac_alg = NULL, *macalg = NULL;
466 
467     if (md_type == NULL)
468         /* No need to do a fetch as the md_type is used only to get a NID */
469         md_type = EVP_sha256();
470 
471     if (prf_md_name == NULL)
472         prf_md_nid = EVP_MD_get_type(md_type);
473     else
474         prf_md_nid = OBJ_txt2nid(prf_md_name);
475 
476     if (iter == 0)
477         iter = PKCS12_DEFAULT_ITER;
478 
479     keylen = EVP_MD_get_size(md_type);
480 
481     prf_nid = ossl_md2hmacnid(prf_md_nid);
482     hmac_nid = ossl_md2hmacnid(EVP_MD_get_type(md_type));
483 
484     if (prf_nid == NID_undef || hmac_nid == NID_undef) {
485         ERR_raise(ERR_LIB_PKCS12, PKCS12_R_UNKNOWN_DIGEST_ALGORITHM);
486         goto err;
487     }
488 
489     if (salt == NULL) {
490         known_salt = OPENSSL_malloc(saltlen);
491         if (known_salt == NULL)
492             goto err;
493 
494         if (RAND_bytes_ex(NULL, known_salt, saltlen, 0) <= 0) {
495             ERR_raise(ERR_LIB_PKCS12, ERR_R_RAND_LIB);
496             goto err;
497         }
498     }
499 
500     param = PBMAC1PARAM_new();
501     hmac_alg = X509_ALGOR_new();
502     alg = PKCS5_pbkdf2_set(iter, salt ? salt : known_salt, saltlen, prf_nid, keylen);
503     if (param == NULL || hmac_alg == NULL || alg == NULL)
504         goto err;
505 
506     if (pkcs12_setup_mac(p12, iter, salt ? salt : known_salt, saltlen,
507             NID_pbmac1)
508         == PKCS12_ERROR) {
509         ERR_raise(ERR_LIB_PKCS12, PKCS12_R_MAC_SETUP_ERROR);
510         goto err;
511     }
512 
513     if (!X509_ALGOR_set0(hmac_alg, OBJ_nid2obj(hmac_nid), V_ASN1_NULL, NULL)) {
514         ERR_raise(ERR_LIB_PKCS12, PKCS12_R_MAC_SETUP_ERROR);
515         goto err;
516     }
517 
518     X509_ALGOR_free(param->keyDerivationFunc);
519     X509_ALGOR_free(param->messageAuthScheme);
520     param->keyDerivationFunc = alg;
521     param->messageAuthScheme = hmac_alg;
522 
523     X509_SIG_getm(p12->mac->dinfo, &macalg, &macoct);
524     if (!ASN1_TYPE_pack_sequence(ASN1_ITEM_rptr(PBMAC1PARAM), param, &macalg->parameter))
525         goto err;
526 
527     /*
528      * Note that output mac is forced to UTF-8...
529      */
530     if (!pkcs12_gen_mac(p12, pass, passlen, mac, &maclen,
531             EVP_MD_get_type(md_type), prf_md_nid,
532             pkcs12_pbmac1_pbkdf2_key_gen)) {
533         ERR_raise(ERR_LIB_PKCS12, PKCS12_R_MAC_GENERATION_ERROR);
534         goto err;
535     }
536     if (!ASN1_OCTET_STRING_set(macoct, mac, maclen)) {
537         ERR_raise(ERR_LIB_PKCS12, PKCS12_R_MAC_STRING_SET_ERROR);
538         goto err;
539     }
540     ret = 1;
541 
542 err:
543     PBMAC1PARAM_free(param);
544     OPENSSL_free(known_salt);
545     return ret;
546 }
547