p8_pkey.c revision 55714
1/* p8_pkey.c */ 2/* Written by Dr Stephen N Henson (shenson@bigfoot.com) for the OpenSSL 3 * project 1999. 4 */ 5/* ==================================================================== 6 * Copyright (c) 1999 The OpenSSL Project. All rights reserved. 7 * 8 * Redistribution and use in source and binary forms, with or without 9 * modification, are permitted provided that the following conditions 10 * are met: 11 * 12 * 1. Redistributions of source code must retain the above copyright 13 * notice, this list of conditions and the following disclaimer. 14 * 15 * 2. Redistributions in binary form must reproduce the above copyright 16 * notice, this list of conditions and the following disclaimer in 17 * the documentation and/or other materials provided with the 18 * distribution. 19 * 20 * 3. All advertising materials mentioning features or use of this 21 * software must display the following acknowledgment: 22 * "This product includes software developed by the OpenSSL Project 23 * for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)" 24 * 25 * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to 26 * endorse or promote products derived from this software without 27 * prior written permission. For written permission, please contact 28 * licensing@OpenSSL.org. 29 * 30 * 5. Products derived from this software may not be called "OpenSSL" 31 * nor may "OpenSSL" appear in their names without prior written 32 * permission of the OpenSSL Project. 33 * 34 * 6. Redistributions of any form whatsoever must retain the following 35 * acknowledgment: 36 * "This product includes software developed by the OpenSSL Project 37 * for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)" 38 * 39 * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY 40 * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 41 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 42 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE OpenSSL PROJECT OR 43 * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, 44 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 45 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; 46 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 47 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, 48 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 49 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED 50 * OF THE POSSIBILITY OF SUCH DAMAGE. 51 * ==================================================================== 52 * 53 * This product includes cryptographic software written by Eric Young 54 * (eay@cryptsoft.com). This product includes software written by Tim 55 * Hudson (tjh@cryptsoft.com). 56 * 57 */ 58 59#include <stdio.h> 60#include "cryptlib.h" 61#include <openssl/asn1_mac.h> 62#include <openssl/x509.h> 63 64int i2d_PKCS8_PRIV_KEY_INFO (PKCS8_PRIV_KEY_INFO *a, unsigned char **pp) 65{ 66 67 M_ASN1_I2D_vars(a); 68 69 M_ASN1_I2D_len (a->version, i2d_ASN1_INTEGER); 70 M_ASN1_I2D_len (a->pkeyalg, i2d_X509_ALGOR); 71 M_ASN1_I2D_len (a->pkey, i2d_ASN1_TYPE); 72 M_ASN1_I2D_len_IMP_SET_opt_type (X509_ATTRIBUTE, a->attributes, 73 i2d_X509_ATTRIBUTE, 0); 74 75 M_ASN1_I2D_seq_total (); 76 77 M_ASN1_I2D_put (a->version, i2d_ASN1_INTEGER); 78 M_ASN1_I2D_put (a->pkeyalg, i2d_X509_ALGOR); 79 M_ASN1_I2D_put (a->pkey, i2d_ASN1_TYPE); 80 M_ASN1_I2D_put_IMP_SET_opt_type (X509_ATTRIBUTE, a->attributes, 81 i2d_X509_ATTRIBUTE, 0); 82 83 M_ASN1_I2D_finish(); 84} 85 86PKCS8_PRIV_KEY_INFO *PKCS8_PRIV_KEY_INFO_new(void) 87{ 88 PKCS8_PRIV_KEY_INFO *ret=NULL; 89 ASN1_CTX c; 90 M_ASN1_New_Malloc(ret, PKCS8_PRIV_KEY_INFO); 91 M_ASN1_New (ret->version, ASN1_INTEGER_new); 92 M_ASN1_New (ret->pkeyalg, X509_ALGOR_new); 93 M_ASN1_New (ret->pkey, ASN1_TYPE_new); 94 ret->attributes = NULL; 95 ret->broken = PKCS8_OK; 96 return (ret); 97 M_ASN1_New_Error(ASN1_F_PKCS8_PRIV_KEY_INFO_NEW); 98} 99 100PKCS8_PRIV_KEY_INFO *d2i_PKCS8_PRIV_KEY_INFO(PKCS8_PRIV_KEY_INFO **a, 101 unsigned char **pp, long length) 102{ 103 M_ASN1_D2I_vars(a,PKCS8_PRIV_KEY_INFO *,PKCS8_PRIV_KEY_INFO_new); 104 M_ASN1_D2I_Init(); 105 M_ASN1_D2I_start_sequence(); 106 M_ASN1_D2I_get (ret->version, d2i_ASN1_INTEGER); 107 M_ASN1_D2I_get (ret->pkeyalg, d2i_X509_ALGOR); 108 M_ASN1_D2I_get (ret->pkey, d2i_ASN1_TYPE); 109 M_ASN1_D2I_get_IMP_set_opt_type(X509_ATTRIBUTE, ret->attributes, 110 d2i_X509_ATTRIBUTE, 111 X509_ATTRIBUTE_free, 0); 112 if (ASN1_TYPE_get(ret->pkey) == V_ASN1_SEQUENCE) 113 ret->broken = PKCS8_NO_OCTET; 114 M_ASN1_D2I_Finish(a, PKCS8_PRIV_KEY_INFO_free, ASN1_F_D2I_PKCS8_PRIV_KEY_INFO); 115} 116 117void PKCS8_PRIV_KEY_INFO_free (PKCS8_PRIV_KEY_INFO *a) 118{ 119 if (a == NULL) return; 120 ASN1_INTEGER_free (a->version); 121 X509_ALGOR_free(a->pkeyalg); 122 /* Clear sensitive data */ 123 if (a->pkey->value.octet_string) 124 memset (a->pkey->value.octet_string->data, 125 0, a->pkey->value.octet_string->length); 126 ASN1_TYPE_free (a->pkey); 127 sk_X509_ATTRIBUTE_pop_free (a->attributes, X509_ATTRIBUTE_free); 128 Free (a); 129} 130