]>
Commit | Line | Data |
---|---|---|
d3819813 | 1 | /* |
7bf7a6d0 | 2 | * Copyright 1999-2016 The OpenSSL Project Authors. All Rights Reserved. |
b2d0e06f | 3 | * |
7bf7a6d0 MTL |
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 | |
b2d0e06f MG |
8 | */ |
9 | ||
10 | #include <stdio.h> | |
7bf7a6d0 | 11 | #include "internal/cryptlib.h" |
b2d0e06f | 12 | #include <openssl/pkcs12.h> |
7bf7a6d0 | 13 | #include "p12_lcl.h" |
b2d0e06f | 14 | |
d3819813 MTL |
15 | static int pkcs12_add_bag(STACK_OF(PKCS12_SAFEBAG) **pbags, |
16 | PKCS12_SAFEBAG *bag); | |
b2d0e06f MG |
17 | |
18 | static int copy_bag_attr(PKCS12_SAFEBAG *bag, EVP_PKEY *pkey, int nid) | |
d3819813 MTL |
19 | { |
20 | int idx; | |
21 | X509_ATTRIBUTE *attr; | |
22 | idx = EVP_PKEY_get_attr_by_NID(pkey, nid, -1); | |
23 | if (idx < 0) | |
24 | return 1; | |
25 | attr = EVP_PKEY_get_attr(pkey, idx); | |
26 | if (!X509at_add1_attr(&bag->attrib, attr)) | |
27 | return 0; | |
28 | return 1; | |
29 | } | |
b2d0e06f | 30 | |
7bf7a6d0 | 31 | PKCS12 *PKCS12_create(const char *pass, const char *name, EVP_PKEY *pkey, X509 *cert, |
d3819813 MTL |
32 | STACK_OF(X509) *ca, int nid_key, int nid_cert, int iter, |
33 | int mac_iter, int keytype) | |
b2d0e06f | 34 | { |
d3819813 MTL |
35 | PKCS12 *p12 = NULL; |
36 | STACK_OF(PKCS7) *safes = NULL; | |
37 | STACK_OF(PKCS12_SAFEBAG) *bags = NULL; | |
38 | PKCS12_SAFEBAG *bag = NULL; | |
39 | int i; | |
40 | unsigned char keyid[EVP_MAX_MD_SIZE]; | |
41 | unsigned int keyidlen = 0; | |
42 | ||
43 | /* Set defaults */ | |
7bf7a6d0 | 44 | if (!nid_cert) |
f9368474 | 45 | #ifdef OPENSSL_NO_RC2 |
7bf7a6d0 | 46 | nid_cert = NID_pbe_WithSHA1And3_Key_TripleDES_CBC; |
f9368474 | 47 | #else |
7bf7a6d0 | 48 | nid_cert = NID_pbe_WithSHA1And40BitRC2_CBC; |
f9368474 | 49 | #endif |
d3819813 MTL |
50 | if (!nid_key) |
51 | nid_key = NID_pbe_WithSHA1And3_Key_TripleDES_CBC; | |
52 | if (!iter) | |
53 | iter = PKCS12_DEFAULT_ITER; | |
54 | if (!mac_iter) | |
55 | mac_iter = 1; | |
56 | ||
57 | if (!pkey && !cert && !ca) { | |
58 | PKCS12err(PKCS12_F_PKCS12_CREATE, PKCS12_R_INVALID_NULL_ARGUMENT); | |
59 | return NULL; | |
60 | } | |
61 | ||
62 | if (pkey && cert) { | |
63 | if (!X509_check_private_key(cert, pkey)) | |
64 | return NULL; | |
65 | X509_digest(cert, EVP_sha1(), keyid, &keyidlen); | |
66 | } | |
67 | ||
68 | if (cert) { | |
69 | bag = PKCS12_add_cert(&bags, cert); | |
70 | if (name && !PKCS12_add_friendlyname(bag, name, -1)) | |
71 | goto err; | |
72 | if (keyidlen && !PKCS12_add_localkeyid(bag, keyid, keyidlen)) | |
73 | goto err; | |
74 | } | |
75 | ||
76 | /* Add all other certificates */ | |
77 | for (i = 0; i < sk_X509_num(ca); i++) { | |
78 | if (!PKCS12_add_cert(&bags, sk_X509_value(ca, i))) | |
79 | goto err; | |
80 | } | |
81 | ||
82 | if (bags && !PKCS12_add_safe(&safes, bags, nid_cert, iter, pass)) | |
83 | goto err; | |
84 | ||
85 | sk_PKCS12_SAFEBAG_pop_free(bags, PKCS12_SAFEBAG_free); | |
86 | bags = NULL; | |
87 | ||
88 | if (pkey) { | |
89 | bag = PKCS12_add_key(&bags, pkey, keytype, iter, nid_key, pass); | |
90 | ||
91 | if (!bag) | |
92 | goto err; | |
93 | ||
94 | if (!copy_bag_attr(bag, pkey, NID_ms_csp_name)) | |
95 | goto err; | |
96 | if (!copy_bag_attr(bag, pkey, NID_LocalKeySet)) | |
97 | goto err; | |
98 | ||
99 | if (name && !PKCS12_add_friendlyname(bag, name, -1)) | |
100 | goto err; | |
101 | if (keyidlen && !PKCS12_add_localkeyid(bag, keyid, keyidlen)) | |
102 | goto err; | |
103 | } | |
104 | ||
105 | if (bags && !PKCS12_add_safe(&safes, bags, -1, 0, NULL)) | |
106 | goto err; | |
107 | ||
108 | sk_PKCS12_SAFEBAG_pop_free(bags, PKCS12_SAFEBAG_free); | |
109 | bags = NULL; | |
110 | ||
111 | p12 = PKCS12_add_safes(safes, 0); | |
112 | ||
113 | if (!p12) | |
114 | goto err; | |
115 | ||
116 | sk_PKCS7_pop_free(safes, PKCS7_free); | |
117 | ||
118 | safes = NULL; | |
119 | ||
120 | if ((mac_iter != -1) && | |
121 | !PKCS12_set_mac(p12, pass, -1, NULL, 0, mac_iter, NULL)) | |
122 | goto err; | |
123 | ||
124 | return p12; | |
125 | ||
126 | err: | |
7bf7a6d0 MTL |
127 | PKCS12_free(p12); |
128 | sk_PKCS7_pop_free(safes, PKCS7_free); | |
129 | sk_PKCS12_SAFEBAG_pop_free(bags, PKCS12_SAFEBAG_free); | |
d3819813 | 130 | return NULL; |
b2d0e06f MG |
131 | |
132 | } | |
133 | ||
134 | PKCS12_SAFEBAG *PKCS12_add_cert(STACK_OF(PKCS12_SAFEBAG) **pbags, X509 *cert) | |
d3819813 MTL |
135 | { |
136 | PKCS12_SAFEBAG *bag = NULL; | |
137 | char *name; | |
138 | int namelen = -1; | |
139 | unsigned char *keyid; | |
140 | int keyidlen = -1; | |
b2d0e06f | 141 | |
d3819813 | 142 | /* Add user certificate */ |
7bf7a6d0 | 143 | if ((bag = PKCS12_SAFEBAG_create_cert(cert)) == NULL) |
d3819813 | 144 | goto err; |
b2d0e06f | 145 | |
d3819813 MTL |
146 | /* |
147 | * Use friendlyName and localKeyID in certificate. (if present) | |
148 | */ | |
b2d0e06f | 149 | |
d3819813 | 150 | name = (char *)X509_alias_get0(cert, &namelen); |
b2d0e06f | 151 | |
d3819813 MTL |
152 | if (name && !PKCS12_add_friendlyname(bag, name, namelen)) |
153 | goto err; | |
b2d0e06f | 154 | |
d3819813 | 155 | keyid = X509_keyid_get0(cert, &keyidlen); |
b2d0e06f | 156 | |
d3819813 MTL |
157 | if (keyid && !PKCS12_add_localkeyid(bag, keyid, keyidlen)) |
158 | goto err; | |
b2d0e06f | 159 | |
d3819813 MTL |
160 | if (!pkcs12_add_bag(pbags, bag)) |
161 | goto err; | |
b2d0e06f | 162 | |
d3819813 | 163 | return bag; |
b2d0e06f | 164 | |
d3819813 | 165 | err: |
7bf7a6d0 | 166 | PKCS12_SAFEBAG_free(bag); |
d3819813 | 167 | return NULL; |
b2d0e06f | 168 | |
d3819813 | 169 | } |
b2d0e06f | 170 | |
d3819813 MTL |
171 | PKCS12_SAFEBAG *PKCS12_add_key(STACK_OF(PKCS12_SAFEBAG) **pbags, |
172 | EVP_PKEY *key, int key_usage, int iter, | |
7bf7a6d0 | 173 | int nid_key, const char *pass) |
d3819813 | 174 | { |
b2d0e06f | 175 | |
d3819813 MTL |
176 | PKCS12_SAFEBAG *bag = NULL; |
177 | PKCS8_PRIV_KEY_INFO *p8 = NULL; | |
b2d0e06f | 178 | |
d3819813 | 179 | /* Make a PKCS#8 structure */ |
7bf7a6d0 | 180 | if ((p8 = EVP_PKEY2PKCS8(key)) == NULL) |
d3819813 MTL |
181 | goto err; |
182 | if (key_usage && !PKCS8_add_keyusage(p8, key_usage)) | |
183 | goto err; | |
184 | if (nid_key != -1) { | |
7bf7a6d0 MTL |
185 | bag = PKCS12_SAFEBAG_create_pkcs8_encrypt(nid_key, pass, -1, NULL, 0, |
186 | iter, p8); | |
d3819813 MTL |
187 | PKCS8_PRIV_KEY_INFO_free(p8); |
188 | } else | |
7bf7a6d0 | 189 | bag = PKCS12_SAFEBAG_create0_p8inf(p8); |
b2d0e06f | 190 | |
d3819813 MTL |
191 | if (!bag) |
192 | goto err; | |
b2d0e06f | 193 | |
d3819813 MTL |
194 | if (!pkcs12_add_bag(pbags, bag)) |
195 | goto err; | |
b2d0e06f | 196 | |
d3819813 | 197 | return bag; |
b2d0e06f | 198 | |
d3819813 | 199 | err: |
7bf7a6d0 | 200 | PKCS12_SAFEBAG_free(bag); |
d3819813 | 201 | return NULL; |
b2d0e06f | 202 | |
d3819813 | 203 | } |
b2d0e06f MG |
204 | |
205 | int PKCS12_add_safe(STACK_OF(PKCS7) **psafes, STACK_OF(PKCS12_SAFEBAG) *bags, | |
7bf7a6d0 | 206 | int nid_safe, int iter, const char *pass) |
d3819813 MTL |
207 | { |
208 | PKCS7 *p7 = NULL; | |
209 | int free_safes = 0; | |
210 | ||
211 | if (!*psafes) { | |
212 | *psafes = sk_PKCS7_new_null(); | |
213 | if (!*psafes) | |
214 | return 0; | |
215 | free_safes = 1; | |
216 | } else | |
217 | free_safes = 0; | |
218 | ||
219 | if (nid_safe == 0) | |
f9368474 | 220 | #ifdef OPENSSL_NO_RC2 |
d3819813 | 221 | nid_safe = NID_pbe_WithSHA1And3_Key_TripleDES_CBC; |
f9368474 | 222 | #else |
d3819813 | 223 | nid_safe = NID_pbe_WithSHA1And40BitRC2_CBC; |
f9368474 | 224 | #endif |
b2d0e06f | 225 | |
d3819813 MTL |
226 | if (nid_safe == -1) |
227 | p7 = PKCS12_pack_p7data(bags); | |
228 | else | |
229 | p7 = PKCS12_pack_p7encdata(nid_safe, pass, -1, NULL, 0, iter, bags); | |
230 | if (!p7) | |
231 | goto err; | |
232 | ||
233 | if (!sk_PKCS7_push(*psafes, p7)) | |
234 | goto err; | |
235 | ||
236 | return 1; | |
237 | ||
238 | err: | |
239 | if (free_safes) { | |
240 | sk_PKCS7_free(*psafes); | |
241 | *psafes = NULL; | |
242 | } | |
7bf7a6d0 | 243 | PKCS7_free(p7); |
d3819813 MTL |
244 | return 0; |
245 | ||
246 | } | |
247 | ||
248 | static int pkcs12_add_bag(STACK_OF(PKCS12_SAFEBAG) **pbags, | |
249 | PKCS12_SAFEBAG *bag) | |
250 | { | |
251 | int free_bags; | |
252 | if (!pbags) | |
253 | return 1; | |
254 | if (!*pbags) { | |
255 | *pbags = sk_PKCS12_SAFEBAG_new_null(); | |
256 | if (!*pbags) | |
257 | return 0; | |
258 | free_bags = 1; | |
259 | } else | |
260 | free_bags = 0; | |
261 | ||
262 | if (!sk_PKCS12_SAFEBAG_push(*pbags, bag)) { | |
263 | if (free_bags) { | |
264 | sk_PKCS12_SAFEBAG_free(*pbags); | |
265 | *pbags = NULL; | |
266 | } | |
267 | return 0; | |
268 | } | |
269 | ||
270 | return 1; | |
271 | ||
272 | } | |
b2d0e06f MG |
273 | |
274 | PKCS12 *PKCS12_add_safes(STACK_OF(PKCS7) *safes, int nid_p7) | |
d3819813 MTL |
275 | { |
276 | PKCS12 *p12; | |
277 | if (nid_p7 <= 0) | |
278 | nid_p7 = NID_pkcs7_data; | |
279 | p12 = PKCS12_init(nid_p7); | |
b2d0e06f | 280 | |
d3819813 MTL |
281 | if (!p12) |
282 | return NULL; | |
b2d0e06f | 283 | |
d3819813 MTL |
284 | if (!PKCS12_pack_authsafes(p12, safes)) { |
285 | PKCS12_free(p12); | |
286 | return NULL; | |
287 | } | |
b2d0e06f | 288 | |
d3819813 | 289 | return p12; |
b2d0e06f | 290 | |
d3819813 | 291 | } |