]>
Commit | Line | Data |
---|---|---|
8d8c7266 DSH |
1 | /* p12_mutl.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 | ||
cf1b7d96 | 59 | #ifndef OPENSSL_NO_HMAC |
8d8c7266 | 60 | #include <stdio.h> |
ee0508d4 | 61 | #include "cryptlib.h" |
ec577822 BM |
62 | #include <openssl/hmac.h> |
63 | #include <openssl/rand.h> | |
64 | #include <openssl/pkcs12.h> | |
8d8c7266 DSH |
65 | |
66 | /* Generate a MAC */ | |
61f5b6f3 BL |
67 | int PKCS12_gen_mac (PKCS12 *p12, const char *pass, int passlen, |
68 | unsigned char *mac, unsigned int *maclen) | |
8d8c7266 | 69 | { |
e778802f | 70 | const EVP_MD *md_type; |
8d8c7266 DSH |
71 | HMAC_CTX hmac; |
72 | unsigned char key[PKCS12_MAC_KEY_LENGTH], *salt; | |
73 | int saltlen, iter; | |
74 | salt = p12->mac->salt->data; | |
75 | saltlen = p12->mac->salt->length; | |
76 | if (!p12->mac->iter) iter = 1; | |
77 | else iter = ASN1_INTEGER_get (p12->mac->iter); | |
78 | if(!(md_type = | |
79 | EVP_get_digestbyobj (p12->mac->dinfo->algor->algorithm))) { | |
80 | PKCS12err(PKCS12_F_PKCS12_GEN_MAC,PKCS12_R_UNKNOWN_DIGEST_ALGORITHM); | |
81 | return 0; | |
82 | } | |
83 | if(!PKCS12_key_gen (pass, passlen, salt, saltlen, PKCS12_MAC_ID, iter, | |
84 | PKCS12_MAC_KEY_LENGTH, key, md_type)) { | |
85 | PKCS12err(PKCS12_F_PKCS12_GEN_MAC,PKCS12_R_KEY_GEN_ERROR); | |
86 | return 0; | |
87 | } | |
88 | HMAC_Init (&hmac, key, PKCS12_MAC_KEY_LENGTH, md_type); | |
89 | HMAC_Update (&hmac, p12->authsafes->d.data->data, | |
90 | p12->authsafes->d.data->length); | |
91 | HMAC_Final (&hmac, mac, maclen); | |
92 | return 1; | |
93 | } | |
94 | ||
95 | /* Verify the mac */ | |
61f5b6f3 | 96 | int PKCS12_verify_mac (PKCS12 *p12, const char *pass, int passlen) |
8d8c7266 DSH |
97 | { |
98 | unsigned char mac[EVP_MAX_MD_SIZE]; | |
99 | unsigned int maclen; | |
100 | if(p12->mac == NULL) { | |
101 | PKCS12err(PKCS12_F_VERIFY_MAC,PKCS12_R_MAC_ABSENT); | |
102 | return 0; | |
103 | } | |
104 | if (!PKCS12_gen_mac (p12, pass, passlen, mac, &maclen)) { | |
105 | PKCS12err(PKCS12_F_VERIFY_MAC,PKCS12_R_MAC_GENERATION_ERROR); | |
106 | return 0; | |
107 | } | |
108 | if ((maclen != (unsigned int)p12->mac->dinfo->digest->length) | |
a331a305 | 109 | || memcmp (mac, p12->mac->dinfo->digest->data, maclen)) return 0; |
8d8c7266 DSH |
110 | return 1; |
111 | } | |
112 | ||
113 | /* Set a mac */ | |
114 | ||
61f5b6f3 | 115 | int PKCS12_set_mac (PKCS12 *p12, const char *pass, int passlen, |
6b691a5c | 116 | unsigned char *salt, int saltlen, int iter, EVP_MD *md_type) |
8d8c7266 DSH |
117 | { |
118 | unsigned char mac[EVP_MAX_MD_SIZE]; | |
61f5b6f3 BL |
119 | unsigned int maclen; |
120 | ||
8d8c7266 DSH |
121 | if (!md_type) md_type = EVP_sha1(); |
122 | if (PKCS12_setup_mac (p12, iter, salt, saltlen, md_type) == | |
123 | PKCS12_ERROR) { | |
6e781e8e | 124 | PKCS12err(PKCS12_F_PKCS12_SET_MAC,PKCS12_R_MAC_SETUP_ERROR); |
8d8c7266 DSH |
125 | return 0; |
126 | } | |
127 | if (!PKCS12_gen_mac (p12, pass, passlen, mac, &maclen)) { | |
6e781e8e | 128 | PKCS12err(PKCS12_F_PKCS12_SET_MAC,PKCS12_R_MAC_GENERATION_ERROR); |
8d8c7266 DSH |
129 | return 0; |
130 | } | |
08e9c1af | 131 | if (!(M_ASN1_OCTET_STRING_set (p12->mac->dinfo->digest, mac, maclen))) { |
6e781e8e | 132 | PKCS12err(PKCS12_F_PKCS12_SET_MAC,PKCS12_R_MAC_STRING_SET_ERROR); |
8d8c7266 DSH |
133 | return 0; |
134 | } | |
135 | return 1; | |
136 | } | |
137 | ||
138 | /* Set up a mac structure */ | |
6b691a5c UM |
139 | int PKCS12_setup_mac (PKCS12 *p12, int iter, unsigned char *salt, int saltlen, |
140 | EVP_MD *md_type) | |
8d8c7266 | 141 | { |
08e9c1af | 142 | if (!(p12->mac = PKCS12_MAC_DATA_new())) return PKCS12_ERROR; |
8d8c7266 | 143 | if (iter > 1) { |
08e9c1af | 144 | if(!(p12->mac->iter = M_ASN1_INTEGER_new())) { |
8d8c7266 DSH |
145 | PKCS12err(PKCS12_F_PKCS12_SETUP_MAC, ERR_R_MALLOC_FAILURE); |
146 | return 0; | |
147 | } | |
08e9c1af | 148 | ASN1_INTEGER_set(p12->mac->iter, iter); |
8d8c7266 DSH |
149 | } |
150 | if (!saltlen) saltlen = PKCS12_SALT_LEN; | |
151 | p12->mac->salt->length = saltlen; | |
26a3a48d | 152 | if (!(p12->mac->salt->data = OPENSSL_malloc (saltlen))) { |
8d8c7266 DSH |
153 | PKCS12err(PKCS12_F_PKCS12_SETUP_MAC, ERR_R_MALLOC_FAILURE); |
154 | return 0; | |
155 | } | |
e7f97e2d | 156 | if (!salt) { |
d6f68fa3 | 157 | if (RAND_pseudo_bytes (p12->mac->salt->data, saltlen) < 0) |
e7f97e2d UM |
158 | return 0; |
159 | } | |
8d8c7266 | 160 | else memcpy (p12->mac->salt->data, salt, saltlen); |
bc37a6b8 | 161 | p12->mac->dinfo->algor->algorithm = OBJ_nid2obj(EVP_MD_type(md_type)); |
8d8c7266 DSH |
162 | if (!(p12->mac->dinfo->algor->parameter = ASN1_TYPE_new())) { |
163 | PKCS12err(PKCS12_F_PKCS12_SETUP_MAC, ERR_R_MALLOC_FAILURE); | |
164 | return 0; | |
165 | } | |
166 | p12->mac->dinfo->algor->parameter->type = V_ASN1_NULL; | |
167 | ||
168 | return 1; | |
169 | } | |
5676d8cb | 170 | #endif |