UI_process() didn't generate errors
[oweals/openssl.git] / crypto / pkcs12 / p12_init.c
1 /*
2  * Copyright 1999-2016 The OpenSSL Project Authors. All Rights Reserved.
3  *
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
8  */
9
10 #include <stdio.h>
11 #include "internal/cryptlib.h"
12 #include <openssl/pkcs12.h>
13 #include "p12_lcl.h"
14
15 /* Initialise a PKCS12 structure to take data */
16
17 PKCS12 *PKCS12_init(int mode)
18 {
19     PKCS12 *pkcs12;
20
21     if ((pkcs12 = PKCS12_new()) == NULL) {
22         PKCS12err(PKCS12_F_PKCS12_INIT, ERR_R_MALLOC_FAILURE);
23         return NULL;
24     }
25     ASN1_INTEGER_set(pkcs12->version, 3);
26     pkcs12->authsafes->type = OBJ_nid2obj(mode);
27     switch (mode) {
28     case NID_pkcs7_data:
29         if ((pkcs12->authsafes->d.data = ASN1_OCTET_STRING_new()) == NULL) {
30             PKCS12err(PKCS12_F_PKCS12_INIT, ERR_R_MALLOC_FAILURE);
31             goto err;
32         }
33         break;
34     default:
35         PKCS12err(PKCS12_F_PKCS12_INIT, PKCS12_R_UNSUPPORTED_PKCS12_MODE);
36         goto err;
37     }
38     return pkcs12;
39
40  err:
41     PKCS12_free(pkcs12);
42     return NULL;
43 }