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 }