os/ossrv/ssl/libcrypto/src/crypto/pkcs12/p12_attr.c
author sl
Tue, 10 Jun 2014 14:32:02 +0200
changeset 1 260cb5ec6c19
permissions -rw-r--r--
Update contrib.
sl@0
     1
/* p12_attr.c */
sl@0
     2
/* Written by Dr Stephen N Henson (shenson@bigfoot.com) for the OpenSSL
sl@0
     3
 * project 1999.
sl@0
     4
 */
sl@0
     5
/* ====================================================================
sl@0
     6
 * Copyright (c) 1999 The OpenSSL Project.  All rights reserved.
sl@0
     7
 *
sl@0
     8
 * Redistribution and use in source and binary forms, with or without
sl@0
     9
 * modification, are permitted provided that the following conditions
sl@0
    10
 * are met:
sl@0
    11
 *
sl@0
    12
 * 1. Redistributions of source code must retain the above copyright
sl@0
    13
 *    notice, this list of conditions and the following disclaimer. 
sl@0
    14
 *
sl@0
    15
 * 2. Redistributions in binary form must reproduce the above copyright
sl@0
    16
 *    notice, this list of conditions and the following disclaimer in
sl@0
    17
 *    the documentation and/or other materials provided with the
sl@0
    18
 *    distribution.
sl@0
    19
 *
sl@0
    20
 * 3. All advertising materials mentioning features or use of this
sl@0
    21
 *    software must display the following acknowledgment:
sl@0
    22
 *    "This product includes software developed by the OpenSSL Project
sl@0
    23
 *    for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)"
sl@0
    24
 *
sl@0
    25
 * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to
sl@0
    26
 *    endorse or promote products derived from this software without
sl@0
    27
 *    prior written permission. For written permission, please contact
sl@0
    28
 *    licensing@OpenSSL.org.
sl@0
    29
 *
sl@0
    30
 * 5. Products derived from this software may not be called "OpenSSL"
sl@0
    31
 *    nor may "OpenSSL" appear in their names without prior written
sl@0
    32
 *    permission of the OpenSSL Project.
sl@0
    33
 *
sl@0
    34
 * 6. Redistributions of any form whatsoever must retain the following
sl@0
    35
 *    acknowledgment:
sl@0
    36
 *    "This product includes software developed by the OpenSSL Project
sl@0
    37
 *    for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)"
sl@0
    38
 *
sl@0
    39
 * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY
sl@0
    40
 * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
sl@0
    41
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
sl@0
    42
 * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE OpenSSL PROJECT OR
sl@0
    43
 * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
sl@0
    44
 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
sl@0
    45
 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
sl@0
    46
 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
sl@0
    47
 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
sl@0
    48
 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
sl@0
    49
 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
sl@0
    50
 * OF THE POSSIBILITY OF SUCH DAMAGE.
sl@0
    51
 * ====================================================================
sl@0
    52
 *
sl@0
    53
 * This product includes cryptographic software written by Eric Young
sl@0
    54
 * (eay@cryptsoft.com).  This product includes software written by Tim
sl@0
    55
 * Hudson (tjh@cryptsoft.com).
sl@0
    56
 *
sl@0
    57
 */
sl@0
    58
sl@0
    59
#include <stdio.h>
sl@0
    60
#include "cryptlib.h"
sl@0
    61
#include <openssl/pkcs12.h>
sl@0
    62
sl@0
    63
/* Add a local keyid to a safebag */
sl@0
    64
sl@0
    65
EXPORT_C int PKCS12_add_localkeyid(PKCS12_SAFEBAG *bag, unsigned char *name,
sl@0
    66
	     int namelen)
sl@0
    67
{
sl@0
    68
	if (X509at_add1_attr_by_NID(&bag->attrib, NID_localKeyID,
sl@0
    69
				V_ASN1_OCTET_STRING, name, namelen))
sl@0
    70
		return 1;
sl@0
    71
	else 
sl@0
    72
		return 0;
sl@0
    73
}
sl@0
    74
sl@0
    75
/* Add key usage to PKCS#8 structure */
sl@0
    76
sl@0
    77
EXPORT_C int PKCS8_add_keyusage(PKCS8_PRIV_KEY_INFO *p8, int usage)
sl@0
    78
{
sl@0
    79
	unsigned char us_val;
sl@0
    80
	us_val = (unsigned char) usage;
sl@0
    81
	if (X509at_add1_attr_by_NID(&p8->attributes, NID_key_usage,
sl@0
    82
				V_ASN1_BIT_STRING, &us_val, 1))
sl@0
    83
		return 1;
sl@0
    84
	else
sl@0
    85
		return 0;
sl@0
    86
}
sl@0
    87
sl@0
    88
/* Add a friendlyname to a safebag */
sl@0
    89
sl@0
    90
EXPORT_C int PKCS12_add_friendlyname_asc(PKCS12_SAFEBAG *bag, const char *name,
sl@0
    91
				 int namelen)
sl@0
    92
{
sl@0
    93
	if (X509at_add1_attr_by_NID(&bag->attrib, NID_friendlyName,
sl@0
    94
				MBSTRING_ASC, (unsigned char *)name, namelen))
sl@0
    95
		return 1;
sl@0
    96
	else
sl@0
    97
		return 0;
sl@0
    98
}
sl@0
    99
sl@0
   100
sl@0
   101
EXPORT_C int PKCS12_add_friendlyname_uni(PKCS12_SAFEBAG *bag,
sl@0
   102
				 const unsigned char *name, int namelen)
sl@0
   103
{
sl@0
   104
	if (X509at_add1_attr_by_NID(&bag->attrib, NID_friendlyName,
sl@0
   105
				MBSTRING_BMP, name, namelen))
sl@0
   106
		return 1;
sl@0
   107
	else
sl@0
   108
		return 0;
sl@0
   109
}
sl@0
   110
sl@0
   111
EXPORT_C int PKCS12_add_CSPName_asc(PKCS12_SAFEBAG *bag, const char *name,
sl@0
   112
				 int namelen)
sl@0
   113
{
sl@0
   114
	if (X509at_add1_attr_by_NID(&bag->attrib, NID_ms_csp_name,
sl@0
   115
				MBSTRING_ASC, (unsigned char *)name, namelen))
sl@0
   116
		return 1;
sl@0
   117
	else
sl@0
   118
		return 0;
sl@0
   119
}
sl@0
   120
sl@0
   121
EXPORT_C ASN1_TYPE *PKCS12_get_attr_gen(STACK_OF(X509_ATTRIBUTE) *attrs, int attr_nid)
sl@0
   122
{
sl@0
   123
	X509_ATTRIBUTE *attrib;
sl@0
   124
	int i;
sl@0
   125
	if (!attrs) return NULL;
sl@0
   126
	for (i = 0; i < sk_X509_ATTRIBUTE_num (attrs); i++) {
sl@0
   127
		attrib = sk_X509_ATTRIBUTE_value (attrs, i);
sl@0
   128
		if (OBJ_obj2nid (attrib->object) == attr_nid) {
sl@0
   129
			if (sk_ASN1_TYPE_num (attrib->value.set))
sl@0
   130
			    return sk_ASN1_TYPE_value(attrib->value.set, 0);
sl@0
   131
			else return NULL;
sl@0
   132
		}
sl@0
   133
	}
sl@0
   134
	return NULL;
sl@0
   135
}
sl@0
   136
sl@0
   137
EXPORT_C char *PKCS12_get_friendlyname(PKCS12_SAFEBAG *bag)
sl@0
   138
{
sl@0
   139
	ASN1_TYPE *atype;
sl@0
   140
	if (!(atype = PKCS12_get_attr(bag, NID_friendlyName))) return NULL;
sl@0
   141
	if (atype->type != V_ASN1_BMPSTRING) return NULL;
sl@0
   142
	return uni2asc(atype->value.bmpstring->data,
sl@0
   143
				 atype->value.bmpstring->length);
sl@0
   144
}
sl@0
   145