xref: /onnv-gate/usr/src/common/openssl/crypto/pkcs12/p12_mutl.c (revision 0:68f95e015346)
1*0Sstevel@tonic-gate /* p12_mutl.c */
2*0Sstevel@tonic-gate /* Written by Dr Stephen N Henson (shenson@bigfoot.com) for the OpenSSL
3*0Sstevel@tonic-gate  * project 1999.
4*0Sstevel@tonic-gate  */
5*0Sstevel@tonic-gate /* ====================================================================
6*0Sstevel@tonic-gate  * Copyright (c) 1999 The OpenSSL Project.  All rights reserved.
7*0Sstevel@tonic-gate  *
8*0Sstevel@tonic-gate  * Redistribution and use in source and binary forms, with or without
9*0Sstevel@tonic-gate  * modification, are permitted provided that the following conditions
10*0Sstevel@tonic-gate  * are met:
11*0Sstevel@tonic-gate  *
12*0Sstevel@tonic-gate  * 1. Redistributions of source code must retain the above copyright
13*0Sstevel@tonic-gate  *    notice, this list of conditions and the following disclaimer.
14*0Sstevel@tonic-gate  *
15*0Sstevel@tonic-gate  * 2. Redistributions in binary form must reproduce the above copyright
16*0Sstevel@tonic-gate  *    notice, this list of conditions and the following disclaimer in
17*0Sstevel@tonic-gate  *    the documentation and/or other materials provided with the
18*0Sstevel@tonic-gate  *    distribution.
19*0Sstevel@tonic-gate  *
20*0Sstevel@tonic-gate  * 3. All advertising materials mentioning features or use of this
21*0Sstevel@tonic-gate  *    software must display the following acknowledgment:
22*0Sstevel@tonic-gate  *    "This product includes software developed by the OpenSSL Project
23*0Sstevel@tonic-gate  *    for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)"
24*0Sstevel@tonic-gate  *
25*0Sstevel@tonic-gate  * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to
26*0Sstevel@tonic-gate  *    endorse or promote products derived from this software without
27*0Sstevel@tonic-gate  *    prior written permission. For written permission, please contact
28*0Sstevel@tonic-gate  *    licensing@OpenSSL.org.
29*0Sstevel@tonic-gate  *
30*0Sstevel@tonic-gate  * 5. Products derived from this software may not be called "OpenSSL"
31*0Sstevel@tonic-gate  *    nor may "OpenSSL" appear in their names without prior written
32*0Sstevel@tonic-gate  *    permission of the OpenSSL Project.
33*0Sstevel@tonic-gate  *
34*0Sstevel@tonic-gate  * 6. Redistributions of any form whatsoever must retain the following
35*0Sstevel@tonic-gate  *    acknowledgment:
36*0Sstevel@tonic-gate  *    "This product includes software developed by the OpenSSL Project
37*0Sstevel@tonic-gate  *    for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)"
38*0Sstevel@tonic-gate  *
39*0Sstevel@tonic-gate  * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY
40*0Sstevel@tonic-gate  * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
41*0Sstevel@tonic-gate  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
42*0Sstevel@tonic-gate  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE OpenSSL PROJECT OR
43*0Sstevel@tonic-gate  * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
44*0Sstevel@tonic-gate  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
45*0Sstevel@tonic-gate  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
46*0Sstevel@tonic-gate  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
47*0Sstevel@tonic-gate  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
48*0Sstevel@tonic-gate  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
49*0Sstevel@tonic-gate  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
50*0Sstevel@tonic-gate  * OF THE POSSIBILITY OF SUCH DAMAGE.
51*0Sstevel@tonic-gate  * ====================================================================
52*0Sstevel@tonic-gate  *
53*0Sstevel@tonic-gate  * This product includes cryptographic software written by Eric Young
54*0Sstevel@tonic-gate  * (eay@cryptsoft.com).  This product includes software written by Tim
55*0Sstevel@tonic-gate  * Hudson (tjh@cryptsoft.com).
56*0Sstevel@tonic-gate  *
57*0Sstevel@tonic-gate  */
58*0Sstevel@tonic-gate 
59*0Sstevel@tonic-gate #ifndef OPENSSL_NO_HMAC
60*0Sstevel@tonic-gate #include <stdio.h>
61*0Sstevel@tonic-gate #include "cryptlib.h"
62*0Sstevel@tonic-gate #include <openssl/hmac.h>
63*0Sstevel@tonic-gate #include <openssl/rand.h>
64*0Sstevel@tonic-gate #include <openssl/pkcs12.h>
65*0Sstevel@tonic-gate 
66*0Sstevel@tonic-gate /* Generate a MAC */
67*0Sstevel@tonic-gate int PKCS12_gen_mac (PKCS12 *p12, const char *pass, int passlen,
68*0Sstevel@tonic-gate 		    unsigned char *mac, unsigned int *maclen)
69*0Sstevel@tonic-gate {
70*0Sstevel@tonic-gate 	const EVP_MD *md_type;
71*0Sstevel@tonic-gate 	HMAC_CTX hmac;
72*0Sstevel@tonic-gate 	unsigned char key[PKCS12_MAC_KEY_LENGTH], *salt;
73*0Sstevel@tonic-gate 	int saltlen, iter;
74*0Sstevel@tonic-gate 
75*0Sstevel@tonic-gate 	salt = p12->mac->salt->data;
76*0Sstevel@tonic-gate 	saltlen = p12->mac->salt->length;
77*0Sstevel@tonic-gate 	if (!p12->mac->iter) iter = 1;
78*0Sstevel@tonic-gate 	else iter = ASN1_INTEGER_get (p12->mac->iter);
79*0Sstevel@tonic-gate     	if(!(md_type =
80*0Sstevel@tonic-gate 		 EVP_get_digestbyobj (p12->mac->dinfo->algor->algorithm))) {
81*0Sstevel@tonic-gate 		PKCS12err(PKCS12_F_PKCS12_GEN_MAC,PKCS12_R_UNKNOWN_DIGEST_ALGORITHM);
82*0Sstevel@tonic-gate 		return 0;
83*0Sstevel@tonic-gate 	}
84*0Sstevel@tonic-gate 	if(!PKCS12_key_gen (pass, passlen, salt, saltlen, PKCS12_MAC_ID, iter,
85*0Sstevel@tonic-gate 				 PKCS12_MAC_KEY_LENGTH, key, md_type)) {
86*0Sstevel@tonic-gate 		PKCS12err(PKCS12_F_PKCS12_GEN_MAC,PKCS12_R_KEY_GEN_ERROR);
87*0Sstevel@tonic-gate 		return 0;
88*0Sstevel@tonic-gate 	}
89*0Sstevel@tonic-gate 	HMAC_CTX_init(&hmac);
90*0Sstevel@tonic-gate 	HMAC_Init_ex(&hmac, key, PKCS12_MAC_KEY_LENGTH, md_type, NULL);
91*0Sstevel@tonic-gate     	HMAC_Update(&hmac, p12->authsafes->d.data->data,
92*0Sstevel@tonic-gate 					 p12->authsafes->d.data->length);
93*0Sstevel@tonic-gate     	HMAC_Final(&hmac, mac, maclen);
94*0Sstevel@tonic-gate     	HMAC_CTX_cleanup(&hmac);
95*0Sstevel@tonic-gate 	return 1;
96*0Sstevel@tonic-gate }
97*0Sstevel@tonic-gate 
98*0Sstevel@tonic-gate /* Verify the mac */
99*0Sstevel@tonic-gate int PKCS12_verify_mac (PKCS12 *p12, const char *pass, int passlen)
100*0Sstevel@tonic-gate {
101*0Sstevel@tonic-gate 	unsigned char mac[EVP_MAX_MD_SIZE];
102*0Sstevel@tonic-gate 	unsigned int maclen;
103*0Sstevel@tonic-gate 	if(p12->mac == NULL) {
104*0Sstevel@tonic-gate 		PKCS12err(PKCS12_F_VERIFY_MAC,PKCS12_R_MAC_ABSENT);
105*0Sstevel@tonic-gate 		return 0;
106*0Sstevel@tonic-gate 	}
107*0Sstevel@tonic-gate 	if (!PKCS12_gen_mac (p12, pass, passlen, mac, &maclen)) {
108*0Sstevel@tonic-gate 		PKCS12err(PKCS12_F_VERIFY_MAC,PKCS12_R_MAC_GENERATION_ERROR);
109*0Sstevel@tonic-gate 		return 0;
110*0Sstevel@tonic-gate 	}
111*0Sstevel@tonic-gate 	if ((maclen != (unsigned int)p12->mac->dinfo->digest->length)
112*0Sstevel@tonic-gate 	|| memcmp (mac, p12->mac->dinfo->digest->data, maclen)) return 0;
113*0Sstevel@tonic-gate 	return 1;
114*0Sstevel@tonic-gate }
115*0Sstevel@tonic-gate 
116*0Sstevel@tonic-gate /* Set a mac */
117*0Sstevel@tonic-gate 
118*0Sstevel@tonic-gate int PKCS12_set_mac (PKCS12 *p12, const char *pass, int passlen,
119*0Sstevel@tonic-gate 	     unsigned char *salt, int saltlen, int iter, const EVP_MD *md_type)
120*0Sstevel@tonic-gate {
121*0Sstevel@tonic-gate 	unsigned char mac[EVP_MAX_MD_SIZE];
122*0Sstevel@tonic-gate 	unsigned int maclen;
123*0Sstevel@tonic-gate 
124*0Sstevel@tonic-gate 	if (!md_type) md_type = EVP_sha1();
125*0Sstevel@tonic-gate 	if (PKCS12_setup_mac (p12, iter, salt, saltlen, md_type) ==
126*0Sstevel@tonic-gate 				 	PKCS12_ERROR) {
127*0Sstevel@tonic-gate 		PKCS12err(PKCS12_F_PKCS12_SET_MAC,PKCS12_R_MAC_SETUP_ERROR);
128*0Sstevel@tonic-gate 		return 0;
129*0Sstevel@tonic-gate 	}
130*0Sstevel@tonic-gate 	if (!PKCS12_gen_mac (p12, pass, passlen, mac, &maclen)) {
131*0Sstevel@tonic-gate 		PKCS12err(PKCS12_F_PKCS12_SET_MAC,PKCS12_R_MAC_GENERATION_ERROR);
132*0Sstevel@tonic-gate 		return 0;
133*0Sstevel@tonic-gate 	}
134*0Sstevel@tonic-gate 	if (!(M_ASN1_OCTET_STRING_set (p12->mac->dinfo->digest, mac, maclen))) {
135*0Sstevel@tonic-gate 		PKCS12err(PKCS12_F_PKCS12_SET_MAC,PKCS12_R_MAC_STRING_SET_ERROR);
136*0Sstevel@tonic-gate 						return 0;
137*0Sstevel@tonic-gate 	}
138*0Sstevel@tonic-gate 	return 1;
139*0Sstevel@tonic-gate }
140*0Sstevel@tonic-gate 
141*0Sstevel@tonic-gate /* Set up a mac structure */
142*0Sstevel@tonic-gate int PKCS12_setup_mac (PKCS12 *p12, int iter, unsigned char *salt, int saltlen,
143*0Sstevel@tonic-gate 	     const EVP_MD *md_type)
144*0Sstevel@tonic-gate {
145*0Sstevel@tonic-gate 	if (!(p12->mac = PKCS12_MAC_DATA_new())) return PKCS12_ERROR;
146*0Sstevel@tonic-gate 	if (iter > 1) {
147*0Sstevel@tonic-gate 		if(!(p12->mac->iter = M_ASN1_INTEGER_new())) {
148*0Sstevel@tonic-gate 			PKCS12err(PKCS12_F_PKCS12_SETUP_MAC, ERR_R_MALLOC_FAILURE);
149*0Sstevel@tonic-gate 			return 0;
150*0Sstevel@tonic-gate 		}
151*0Sstevel@tonic-gate 		ASN1_INTEGER_set(p12->mac->iter, iter);
152*0Sstevel@tonic-gate 	}
153*0Sstevel@tonic-gate 	if (!saltlen) saltlen = PKCS12_SALT_LEN;
154*0Sstevel@tonic-gate 	p12->mac->salt->length = saltlen;
155*0Sstevel@tonic-gate 	if (!(p12->mac->salt->data = OPENSSL_malloc (saltlen))) {
156*0Sstevel@tonic-gate 		PKCS12err(PKCS12_F_PKCS12_SETUP_MAC, ERR_R_MALLOC_FAILURE);
157*0Sstevel@tonic-gate 		return 0;
158*0Sstevel@tonic-gate 	}
159*0Sstevel@tonic-gate 	if (!salt) {
160*0Sstevel@tonic-gate 		if (RAND_pseudo_bytes (p12->mac->salt->data, saltlen) < 0)
161*0Sstevel@tonic-gate 			return 0;
162*0Sstevel@tonic-gate 	}
163*0Sstevel@tonic-gate 	else memcpy (p12->mac->salt->data, salt, saltlen);
164*0Sstevel@tonic-gate 	p12->mac->dinfo->algor->algorithm = OBJ_nid2obj(EVP_MD_type(md_type));
165*0Sstevel@tonic-gate 	if (!(p12->mac->dinfo->algor->parameter = ASN1_TYPE_new())) {
166*0Sstevel@tonic-gate 		PKCS12err(PKCS12_F_PKCS12_SETUP_MAC, ERR_R_MALLOC_FAILURE);
167*0Sstevel@tonic-gate 		return 0;
168*0Sstevel@tonic-gate 	}
169*0Sstevel@tonic-gate 	p12->mac->dinfo->algor->parameter->type = V_ASN1_NULL;
170*0Sstevel@tonic-gate 
171*0Sstevel@tonic-gate 	return 1;
172*0Sstevel@tonic-gate }
173*0Sstevel@tonic-gate #endif
174