Mercurial > trustbridge > nss-cmake-static
comparison nss/lib/softoken/lowpbe.c @ 0:1e5118fa0cb1
This is NSS with a Cmake Buildsyste
To compile a static NSS library for Windows we've used the
Chromium-NSS fork and added a Cmake buildsystem to compile
it statically for Windows. See README.chromium for chromium
changes and README.trustbridge for our modifications.
author | Andre Heinecke <andre.heinecke@intevation.de> |
---|---|
date | Mon, 28 Jul 2014 10:47:06 +0200 |
parents | |
children |
comparison
equal
deleted
inserted
replaced
-1:000000000000 | 0:1e5118fa0cb1 |
---|---|
1 /* This Source Code Form is subject to the terms of the Mozilla Public | |
2 * License, v. 2.0. If a copy of the MPL was not distributed with this | |
3 * file, You can obtain one at http://mozilla.org/MPL/2.0/. */ | |
4 | |
5 #include "plarena.h" | |
6 | |
7 #include "seccomon.h" | |
8 #include "secitem.h" | |
9 #include "secport.h" | |
10 #include "hasht.h" | |
11 #include "pkcs11t.h" | |
12 #include "blapi.h" | |
13 #include "hasht.h" | |
14 #include "secasn1.h" | |
15 #include "secder.h" | |
16 #include "lowpbe.h" | |
17 #include "secoid.h" | |
18 #include "alghmac.h" | |
19 #include "softoken.h" | |
20 #include "secerr.h" | |
21 | |
22 SEC_ASN1_MKSUB(SECOID_AlgorithmIDTemplate) | |
23 | |
24 /* template for PKCS 5 PBE Parameter. This template has been expanded | |
25 * based upon the additions in PKCS 12. This should eventually be moved | |
26 * if RSA updates PKCS 5. | |
27 */ | |
28 static const SEC_ASN1Template NSSPKCS5PBEParameterTemplate[] = | |
29 { | |
30 { SEC_ASN1_SEQUENCE, | |
31 0, NULL, sizeof(NSSPKCS5PBEParameter) }, | |
32 { SEC_ASN1_OCTET_STRING, | |
33 offsetof(NSSPKCS5PBEParameter, salt) }, | |
34 { SEC_ASN1_INTEGER, | |
35 offsetof(NSSPKCS5PBEParameter, iteration) }, | |
36 { 0 } | |
37 }; | |
38 | |
39 static const SEC_ASN1Template NSSPKCS5PKCS12V2PBEParameterTemplate[] = | |
40 { | |
41 { SEC_ASN1_SEQUENCE, 0, NULL, sizeof(NSSPKCS5PBEParameter) }, | |
42 { SEC_ASN1_OCTET_STRING, offsetof(NSSPKCS5PBEParameter, salt) }, | |
43 { SEC_ASN1_INTEGER, offsetof(NSSPKCS5PBEParameter, iteration) }, | |
44 { 0 } | |
45 }; | |
46 | |
47 | |
48 /* PKCS5 v2 */ | |
49 | |
50 struct nsspkcs5V2PBEParameterStr { | |
51 SECAlgorithmID keyParams; /* parameters of the key generation */ | |
52 SECAlgorithmID algParams; /* parameters for the encryption or mac op */ | |
53 }; | |
54 | |
55 typedef struct nsspkcs5V2PBEParameterStr nsspkcs5V2PBEParameter; | |
56 #define PBKDF2 | |
57 | |
58 #ifdef PBKDF2 | |
59 static const SEC_ASN1Template NSSPKCS5V2PBES2ParameterTemplate[] = | |
60 { | |
61 { SEC_ASN1_SEQUENCE, 0, NULL, sizeof(nsspkcs5V2PBEParameter) }, | |
62 { SEC_ASN1_INLINE | SEC_ASN1_XTRN, | |
63 offsetof(nsspkcs5V2PBEParameter, keyParams), | |
64 SEC_ASN1_SUB(SECOID_AlgorithmIDTemplate) }, | |
65 { SEC_ASN1_INLINE | SEC_ASN1_XTRN, | |
66 offsetof(nsspkcs5V2PBEParameter, algParams), | |
67 SEC_ASN1_SUB(SECOID_AlgorithmIDTemplate) }, | |
68 { 0 } | |
69 }; | |
70 | |
71 static const SEC_ASN1Template NSSPKCS5V2PBEParameterTemplate[] = | |
72 { | |
73 { SEC_ASN1_SEQUENCE, 0, NULL, sizeof(NSSPKCS5PBEParameter) }, | |
74 /* this is really a choice, but since we don't understand any other | |
75 *choice, just inline it. */ | |
76 { SEC_ASN1_OCTET_STRING, offsetof(NSSPKCS5PBEParameter, salt) }, | |
77 { SEC_ASN1_INTEGER, offsetof(NSSPKCS5PBEParameter, iteration) }, | |
78 { SEC_ASN1_INTEGER, offsetof(NSSPKCS5PBEParameter, keyLength) }, | |
79 { SEC_ASN1_INLINE | SEC_ASN1_XTRN, | |
80 offsetof(NSSPKCS5PBEParameter, prfAlg), | |
81 SEC_ASN1_SUB(SECOID_AlgorithmIDTemplate) }, | |
82 { 0 } | |
83 }; | |
84 #endif | |
85 | |
86 SECStatus | |
87 nsspkcs5_HashBuf(const SECHashObject *hashObj, unsigned char *dest, | |
88 unsigned char *src, int len) | |
89 { | |
90 void *ctx; | |
91 unsigned int retLen; | |
92 | |
93 ctx = hashObj->create(); | |
94 if(ctx == NULL) { | |
95 return SECFailure; | |
96 } | |
97 hashObj->begin(ctx); | |
98 hashObj->update(ctx, src, len); | |
99 hashObj->end(ctx, dest, &retLen, hashObj->length); | |
100 hashObj->destroy(ctx, PR_TRUE); | |
101 return SECSuccess; | |
102 } | |
103 | |
104 /* generate bits using any hash | |
105 */ | |
106 static SECItem * | |
107 nsspkcs5_PBKDF1(const SECHashObject *hashObj, SECItem *salt, SECItem *pwd, | |
108 int iter, PRBool faulty3DES) | |
109 { | |
110 SECItem *hash = NULL, *pre_hash = NULL; | |
111 SECStatus rv = SECFailure; | |
112 | |
113 if((salt == NULL) || (pwd == NULL) || (iter < 0)) { | |
114 return NULL; | |
115 } | |
116 | |
117 hash = (SECItem *)PORT_ZAlloc(sizeof(SECItem)); | |
118 pre_hash = (SECItem *)PORT_ZAlloc(sizeof(SECItem)); | |
119 | |
120 if((hash != NULL) && (pre_hash != NULL)) { | |
121 int i, ph_len; | |
122 | |
123 ph_len = hashObj->length; | |
124 if((salt->len + pwd->len) > hashObj->length) { | |
125 ph_len = salt->len + pwd->len; | |
126 } | |
127 | |
128 rv = SECFailure; | |
129 | |
130 /* allocate buffers */ | |
131 hash->len = hashObj->length; | |
132 hash->data = (unsigned char *)PORT_ZAlloc(hash->len); | |
133 pre_hash->data = (unsigned char *)PORT_ZAlloc(ph_len); | |
134 | |
135 /* in pbeSHA1TripleDESCBC there was an allocation error that made | |
136 * it into the caller. We do not want to propagate those errors | |
137 * further, so we are doing it correctly, but reading the old method. | |
138 */ | |
139 if (faulty3DES) { | |
140 pre_hash->len = ph_len; | |
141 } else { | |
142 pre_hash->len = salt->len + pwd->len; | |
143 } | |
144 | |
145 /* preform hash */ | |
146 if ((hash->data != NULL) && (pre_hash->data != NULL)) { | |
147 rv = SECSuccess; | |
148 /* check for 0 length password */ | |
149 if(pwd->len > 0) { | |
150 PORT_Memcpy(pre_hash->data, pwd->data, pwd->len); | |
151 } | |
152 if(salt->len > 0) { | |
153 PORT_Memcpy((pre_hash->data+pwd->len), salt->data, salt->len); | |
154 } | |
155 for(i = 0; ((i < iter) && (rv == SECSuccess)); i++) { | |
156 rv = nsspkcs5_HashBuf(hashObj, hash->data, | |
157 pre_hash->data, pre_hash->len); | |
158 if(rv != SECFailure) { | |
159 pre_hash->len = hashObj->length; | |
160 PORT_Memcpy(pre_hash->data, hash->data, hashObj->length); | |
161 } | |
162 } | |
163 } | |
164 } | |
165 | |
166 if(pre_hash != NULL) { | |
167 SECITEM_FreeItem(pre_hash, PR_TRUE); | |
168 } | |
169 | |
170 if((rv != SECSuccess) && (hash != NULL)) { | |
171 SECITEM_FreeItem(hash, PR_TRUE); | |
172 hash = NULL; | |
173 } | |
174 | |
175 return hash; | |
176 } | |
177 | |
178 /* this bit generation routine is described in PKCS 12 and the proposed | |
179 * extensions to PKCS 5. an initial hash is generated following the | |
180 * instructions laid out in PKCS 5. If the number of bits generated is | |
181 * insufficient, then the method discussed in the proposed extensions to | |
182 * PKCS 5 in PKCS 12 are used. This extension makes use of the HMAC | |
183 * function. And the P_Hash function from the TLS standard. | |
184 */ | |
185 static SECItem * | |
186 nsspkcs5_PFXPBE(const SECHashObject *hashObj, NSSPKCS5PBEParameter *pbe_param, | |
187 SECItem *init_hash, unsigned int bytes_needed) | |
188 { | |
189 SECItem *ret_bits = NULL; | |
190 int hash_size = 0; | |
191 unsigned int i; | |
192 unsigned int hash_iter; | |
193 unsigned int dig_len; | |
194 SECStatus rv = SECFailure; | |
195 unsigned char *state = NULL; | |
196 unsigned int state_len; | |
197 HMACContext *cx = NULL; | |
198 | |
199 hash_size = hashObj->length; | |
200 hash_iter = (bytes_needed + (unsigned int)hash_size - 1) / hash_size; | |
201 | |
202 /* allocate return buffer */ | |
203 ret_bits = (SECItem *)PORT_ZAlloc(sizeof(SECItem)); | |
204 if(ret_bits == NULL) | |
205 return NULL; | |
206 ret_bits->data = (unsigned char *)PORT_ZAlloc((hash_iter * hash_size) + 1); | |
207 ret_bits->len = (hash_iter * hash_size); | |
208 if(ret_bits->data == NULL) { | |
209 PORT_Free(ret_bits); | |
210 return NULL; | |
211 } | |
212 | |
213 /* allocate intermediate hash buffer. 8 is for the 8 bytes of | |
214 * data which are added based on iteration number | |
215 */ | |
216 | |
217 if ((unsigned int)hash_size > pbe_param->salt.len) { | |
218 state_len = hash_size; | |
219 } else { | |
220 state_len = pbe_param->salt.len; | |
221 } | |
222 state = (unsigned char *)PORT_ZAlloc(state_len); | |
223 if(state == NULL) { | |
224 rv = SECFailure; | |
225 goto loser; | |
226 } | |
227 if(pbe_param->salt.len > 0) { | |
228 PORT_Memcpy(state, pbe_param->salt.data, pbe_param->salt.len); | |
229 } | |
230 | |
231 cx = HMAC_Create(hashObj, init_hash->data, init_hash->len, PR_TRUE); | |
232 if (cx == NULL) { | |
233 rv = SECFailure; | |
234 goto loser; | |
235 } | |
236 | |
237 for(i = 0; i < hash_iter; i++) { | |
238 | |
239 /* generate output bits */ | |
240 HMAC_Begin(cx); | |
241 HMAC_Update(cx, state, state_len); | |
242 HMAC_Update(cx, pbe_param->salt.data, pbe_param->salt.len); | |
243 rv = HMAC_Finish(cx, ret_bits->data + (i * hash_size), | |
244 &dig_len, hash_size); | |
245 if (rv != SECSuccess) | |
246 goto loser; | |
247 PORT_Assert((unsigned int)hash_size == dig_len); | |
248 | |
249 /* generate new state */ | |
250 HMAC_Begin(cx); | |
251 HMAC_Update(cx, state, state_len); | |
252 rv = HMAC_Finish(cx, state, &state_len, state_len); | |
253 if (rv != SECSuccess) | |
254 goto loser; | |
255 PORT_Assert(state_len == dig_len); | |
256 } | |
257 | |
258 loser: | |
259 if (state != NULL) | |
260 PORT_ZFree(state, state_len); | |
261 HMAC_Destroy(cx, PR_TRUE); | |
262 | |
263 if(rv != SECSuccess) { | |
264 SECITEM_ZfreeItem(ret_bits, PR_TRUE); | |
265 ret_bits = NULL; | |
266 } | |
267 | |
268 return ret_bits; | |
269 } | |
270 | |
271 /* generate bits for the key and iv determination. if enough bits | |
272 * are not generated using PKCS 5, then we need to generate more bits | |
273 * based on the extension proposed in PKCS 12 | |
274 */ | |
275 static SECItem * | |
276 nsspkcs5_PBKDF1Extended(const SECHashObject *hashObj, | |
277 NSSPKCS5PBEParameter *pbe_param, SECItem *pwitem, PRBool faulty3DES) | |
278 { | |
279 SECItem * hash = NULL; | |
280 SECItem * newHash = NULL; | |
281 int bytes_needed; | |
282 int bytes_available; | |
283 | |
284 bytes_needed = pbe_param->ivLen + pbe_param->keyLen; | |
285 bytes_available = hashObj->length; | |
286 | |
287 hash = nsspkcs5_PBKDF1(hashObj, &pbe_param->salt, pwitem, | |
288 pbe_param->iter, faulty3DES); | |
289 | |
290 if(hash == NULL) { | |
291 return NULL; | |
292 } | |
293 | |
294 if(bytes_needed <= bytes_available) { | |
295 return hash; | |
296 } | |
297 | |
298 newHash = nsspkcs5_PFXPBE(hashObj, pbe_param, hash, bytes_needed); | |
299 if (hash != newHash) | |
300 SECITEM_FreeItem(hash, PR_TRUE); | |
301 return newHash; | |
302 } | |
303 | |
304 #ifdef PBKDF2 | |
305 | |
306 /* | |
307 * PBDKDF2 is PKCS #5 v2.0 it's currently not used by NSS | |
308 */ | |
309 static void | |
310 do_xor(unsigned char *dest, unsigned char *src, int len) | |
311 { | |
312 /* use byt xor, not all platforms are happy about inaligned | |
313 * integer fetches */ | |
314 while (len--) { | |
315 *dest = *dest ^ *src; | |
316 dest++; | |
317 src++; | |
318 } | |
319 } | |
320 | |
321 static SECStatus | |
322 nsspkcs5_PBKFD2_F(const SECHashObject *hashobj, SECItem *pwitem, SECItem *salt, | |
323 int iterations, unsigned int i, unsigned char *T) | |
324 { | |
325 int j; | |
326 HMACContext *cx = NULL; | |
327 unsigned int hLen = hashobj->length; | |
328 SECStatus rv = SECFailure; | |
329 unsigned char *last = NULL; | |
330 unsigned int lastLength = salt->len + 4; | |
331 unsigned int lastBufLength; | |
332 | |
333 cx=HMAC_Create(hashobj,pwitem->data,pwitem->len,PR_FALSE); | |
334 if (cx == NULL) { | |
335 goto loser; | |
336 } | |
337 PORT_Memset(T,0,hLen); | |
338 lastBufLength = PR_MAX(lastLength, hLen); | |
339 last = PORT_Alloc(lastBufLength); | |
340 if (last == NULL) { | |
341 goto loser; | |
342 } | |
343 PORT_Memcpy(last,salt->data,salt->len); | |
344 last[salt->len ] = (i >> 24) & 0xff; | |
345 last[salt->len+1] = (i >> 16) & 0xff; | |
346 last[salt->len+2] = (i >> 8) & 0xff; | |
347 last[salt->len+3] = i & 0xff; | |
348 | |
349 /* NOTE: we need at least one iteration to return success! */ | |
350 for (j=0; j < iterations; j++) { | |
351 HMAC_Begin(cx); | |
352 HMAC_Update(cx,last,lastLength); | |
353 rv =HMAC_Finish(cx,last,&lastLength,hLen); | |
354 if (rv !=SECSuccess) { | |
355 break; | |
356 } | |
357 do_xor(T,last,hLen); | |
358 } | |
359 loser: | |
360 if (cx) { | |
361 HMAC_Destroy(cx, PR_TRUE); | |
362 } | |
363 if (last) { | |
364 PORT_ZFree(last,lastBufLength); | |
365 } | |
366 return rv; | |
367 } | |
368 | |
369 static SECItem * | |
370 nsspkcs5_PBKDF2(const SECHashObject *hashobj, NSSPKCS5PBEParameter *pbe_param, | |
371 SECItem *pwitem) | |
372 { | |
373 int iterations = pbe_param->iter; | |
374 int bytesNeeded = pbe_param->keyLen; | |
375 unsigned int dkLen = bytesNeeded; | |
376 unsigned int hLen = hashobj->length; | |
377 unsigned int nblocks = (dkLen+hLen-1) / hLen; | |
378 unsigned int i; | |
379 unsigned char *rp; | |
380 unsigned char *T = NULL; | |
381 SECItem *result = NULL; | |
382 SECItem *salt = &pbe_param->salt; | |
383 SECStatus rv = SECFailure; | |
384 | |
385 result = SECITEM_AllocItem(NULL,NULL,nblocks*hLen); | |
386 if (result == NULL) { | |
387 return NULL; | |
388 } | |
389 | |
390 T = PORT_Alloc(hLen); | |
391 if (T == NULL) { | |
392 goto loser; | |
393 } | |
394 | |
395 for (i=1,rp=result->data; i <= nblocks ; i++, rp +=hLen) { | |
396 rv = nsspkcs5_PBKFD2_F(hashobj,pwitem,salt,iterations,i,T); | |
397 if (rv != SECSuccess) { | |
398 break; | |
399 } | |
400 PORT_Memcpy(rp,T,hLen); | |
401 } | |
402 | |
403 loser: | |
404 if (T) { | |
405 PORT_ZFree(T,hLen); | |
406 } | |
407 if (rv != SECSuccess) { | |
408 SECITEM_FreeItem(result,PR_TRUE); | |
409 result = NULL; | |
410 } else { | |
411 result->len = dkLen; | |
412 } | |
413 | |
414 return result; | |
415 } | |
416 #endif | |
417 | |
418 #define HMAC_BUFFER 64 | |
419 #define NSSPBE_ROUNDUP(x,y) ((((x)+((y)-1))/(y))*(y)) | |
420 #define NSSPBE_MIN(x,y) ((x) < (y) ? (x) : (y)) | |
421 /* | |
422 * This is the extended PBE function defined by the final PKCS #12 spec. | |
423 */ | |
424 static SECItem * | |
425 nsspkcs5_PKCS12PBE(const SECHashObject *hashObject, | |
426 NSSPKCS5PBEParameter *pbe_param, SECItem *pwitem, | |
427 PBEBitGenID bitGenPurpose, unsigned int bytesNeeded) | |
428 { | |
429 PLArenaPool *arena = NULL; | |
430 unsigned int SLen,PLen; | |
431 unsigned int hashLength = hashObject->length; | |
432 unsigned char *S, *P; | |
433 SECItem *A = NULL, B, D, I; | |
434 SECItem *salt = &pbe_param->salt; | |
435 unsigned int c,i = 0; | |
436 unsigned int hashLen; | |
437 int iter; | |
438 unsigned char *iterBuf; | |
439 void *hash = NULL; | |
440 | |
441 arena = PORT_NewArena(DER_DEFAULT_CHUNKSIZE); | |
442 if(!arena) { | |
443 return NULL; | |
444 } | |
445 | |
446 /* how many hash object lengths are needed */ | |
447 c = (bytesNeeded + (hashLength-1))/hashLength; | |
448 | |
449 /* initialize our buffers */ | |
450 D.len = HMAC_BUFFER; | |
451 /* B and D are the same length, use one alloc go get both */ | |
452 D.data = (unsigned char*)PORT_ArenaZAlloc(arena, D.len*2); | |
453 B.len = D.len; | |
454 B.data = D.data + D.len; | |
455 | |
456 /* if all goes well, A will be returned, so don't use our temp arena */ | |
457 A = SECITEM_AllocItem(NULL,NULL,c*hashLength); | |
458 if (A == NULL) { | |
459 goto loser; | |
460 } | |
461 | |
462 SLen = NSSPBE_ROUNDUP(salt->len,HMAC_BUFFER); | |
463 PLen = NSSPBE_ROUNDUP(pwitem->len,HMAC_BUFFER); | |
464 I.len = SLen+PLen; | |
465 I.data = (unsigned char*)PORT_ArenaZAlloc(arena, I.len); | |
466 if (I.data == NULL) { | |
467 goto loser; | |
468 } | |
469 | |
470 /* S & P are only used to initialize I */ | |
471 S = I.data; | |
472 P = S + SLen; | |
473 | |
474 PORT_Memset(D.data, (char)bitGenPurpose, D.len); | |
475 if (SLen) { | |
476 for (i=0; i < SLen; i += salt->len) { | |
477 PORT_Memcpy(S+i, salt->data, NSSPBE_MIN(SLen-i,salt->len)); | |
478 } | |
479 } | |
480 if (PLen) { | |
481 for (i=0; i < PLen; i += pwitem->len) { | |
482 PORT_Memcpy(P+i, pwitem->data, NSSPBE_MIN(PLen-i,pwitem->len)); | |
483 } | |
484 } | |
485 | |
486 iterBuf = (unsigned char*)PORT_ArenaZAlloc(arena,hashLength); | |
487 if (iterBuf == NULL) { | |
488 goto loser; | |
489 } | |
490 | |
491 hash = hashObject->create(); | |
492 if(!hash) { | |
493 goto loser; | |
494 } | |
495 /* calculate the PBE now */ | |
496 for(i = 0; i < c; i++) { | |
497 int Bidx; /* must be signed or the for loop won't terminate */ | |
498 unsigned int k, j; | |
499 unsigned char *Ai = A->data+i*hashLength; | |
500 | |
501 | |
502 for(iter = 0; iter < pbe_param->iter; iter++) { | |
503 hashObject->begin(hash); | |
504 | |
505 if (iter) { | |
506 hashObject->update(hash, iterBuf, hashLen); | |
507 } else { | |
508 hashObject->update(hash, D.data, D.len); | |
509 hashObject->update(hash, I.data, I.len); | |
510 } | |
511 | |
512 hashObject->end(hash, iterBuf, &hashLen, hashObject->length); | |
513 if(hashLen != hashObject->length) { | |
514 break; | |
515 } | |
516 } | |
517 | |
518 PORT_Memcpy(Ai, iterBuf, hashLength); | |
519 for (Bidx = 0; Bidx < B.len; Bidx += hashLength) { | |
520 PORT_Memcpy(B.data+Bidx,iterBuf,NSSPBE_MIN(B.len-Bidx,hashLength)); | |
521 } | |
522 | |
523 k = I.len/B.len; | |
524 for(j = 0; j < k; j++) { | |
525 unsigned int q, carryBit; | |
526 unsigned char *Ij = I.data + j*B.len; | |
527 | |
528 /* (Ij = Ij+B+1) */ | |
529 for (Bidx = (B.len-1), q=1, carryBit=0; Bidx >= 0; Bidx--,q=0) { | |
530 q += (unsigned int)Ij[Bidx]; | |
531 q += (unsigned int)B.data[Bidx]; | |
532 q += carryBit; | |
533 | |
534 carryBit = (q > 0xff); | |
535 Ij[Bidx] = (unsigned char)(q & 0xff); | |
536 } | |
537 } | |
538 } | |
539 loser: | |
540 if (hash) { | |
541 hashObject->destroy(hash, PR_TRUE); | |
542 } | |
543 if(arena) { | |
544 PORT_FreeArena(arena, PR_TRUE); | |
545 } | |
546 | |
547 if (A) { | |
548 /* if i != c, then we didn't complete the loop above and must of failed | |
549 * somwhere along the way */ | |
550 if (i != c) { | |
551 SECITEM_ZfreeItem(A,PR_TRUE); | |
552 A = NULL; | |
553 } else { | |
554 A->len = bytesNeeded; | |
555 } | |
556 } | |
557 | |
558 return A; | |
559 } | |
560 | |
561 /* | |
562 * generate key as per PKCS 5 | |
563 */ | |
564 SECItem * | |
565 nsspkcs5_ComputeKeyAndIV(NSSPKCS5PBEParameter *pbe_param, SECItem *pwitem, | |
566 SECItem *iv, PRBool faulty3DES) | |
567 { | |
568 SECItem *hash = NULL, *key = NULL; | |
569 const SECHashObject *hashObj; | |
570 PRBool getIV = PR_FALSE; | |
571 | |
572 if((pbe_param == NULL) || (pwitem == NULL)) { | |
573 return NULL; | |
574 } | |
575 | |
576 key = SECITEM_AllocItem(NULL,NULL,pbe_param->keyLen); | |
577 if (key == NULL) { | |
578 return NULL; | |
579 } | |
580 | |
581 if (iv && (pbe_param->ivLen) && (iv->data == NULL)) { | |
582 getIV = PR_TRUE; | |
583 iv->data = (unsigned char *)PORT_Alloc(pbe_param->ivLen); | |
584 if (iv->data == NULL) { | |
585 goto loser; | |
586 } | |
587 iv->len = pbe_param->ivLen; | |
588 } | |
589 | |
590 hashObj = HASH_GetRawHashObject(pbe_param->hashType); | |
591 switch (pbe_param->pbeType) { | |
592 case NSSPKCS5_PBKDF1: | |
593 hash = nsspkcs5_PBKDF1Extended(hashObj,pbe_param,pwitem,faulty3DES); | |
594 if (hash == NULL) { | |
595 goto loser; | |
596 } | |
597 PORT_Assert(hash->len >= key->len+(getIV ? iv->len : 0)); | |
598 if (getIV) { | |
599 PORT_Memcpy(iv->data, hash->data+(hash->len - iv->len),iv->len); | |
600 } | |
601 | |
602 break; | |
603 #ifdef PBKDF2 | |
604 case NSSPKCS5_PBKDF2: | |
605 hash = nsspkcs5_PBKDF2(hashObj,pbe_param,pwitem); | |
606 if (getIV) { | |
607 PORT_Memcpy(iv->data, pbe_param->ivData, iv->len); | |
608 } | |
609 break; | |
610 #endif | |
611 case NSSPKCS5_PKCS12_V2: | |
612 if (getIV) { | |
613 hash = nsspkcs5_PKCS12PBE(hashObj,pbe_param,pwitem, | |
614 pbeBitGenCipherIV,iv->len); | |
615 if (hash == NULL) { | |
616 goto loser; | |
617 } | |
618 PORT_Memcpy(iv->data,hash->data,iv->len); | |
619 SECITEM_ZfreeItem(hash,PR_TRUE); | |
620 hash = NULL; | |
621 } | |
622 hash = nsspkcs5_PKCS12PBE(hashObj,pbe_param,pwitem, | |
623 pbe_param->keyID,key->len); | |
624 default: | |
625 break; | |
626 } | |
627 | |
628 if (hash == NULL) { | |
629 goto loser; | |
630 } | |
631 | |
632 if (pbe_param->is2KeyDES) { | |
633 PORT_Memcpy(key->data, hash->data, (key->len * 2) / 3); | |
634 PORT_Memcpy(&(key->data[(key->len * 2) / 3]), key->data, | |
635 key->len / 3); | |
636 } else { | |
637 PORT_Memcpy(key->data, hash->data, key->len); | |
638 } | |
639 | |
640 SECITEM_ZfreeItem(hash, PR_TRUE); | |
641 return key; | |
642 | |
643 loser: | |
644 if (getIV && iv->data) { | |
645 PORT_ZFree(iv->data,iv->len); | |
646 iv->data = NULL; | |
647 } | |
648 | |
649 SECITEM_ZfreeItem(key, PR_TRUE); | |
650 return NULL; | |
651 } | |
652 | |
653 static SECStatus | |
654 nsspkcs5_FillInParam(SECOidTag algorithm, NSSPKCS5PBEParameter *pbe_param) | |
655 { | |
656 PRBool skipType = PR_FALSE; | |
657 | |
658 pbe_param->keyLen = 5; | |
659 pbe_param->ivLen = 8; | |
660 pbe_param->hashType = HASH_AlgSHA1; | |
661 pbe_param->pbeType = NSSPKCS5_PBKDF1; | |
662 pbe_param->encAlg = SEC_OID_RC2_CBC; | |
663 pbe_param->is2KeyDES = PR_FALSE; | |
664 switch(algorithm) { | |
665 /* DES3 Algorithms */ | |
666 case SEC_OID_PKCS12_V2_PBE_WITH_SHA1_AND_2KEY_TRIPLE_DES_CBC: | |
667 pbe_param->is2KeyDES = PR_TRUE; | |
668 /* fall through */ | |
669 case SEC_OID_PKCS12_V2_PBE_WITH_SHA1_AND_3KEY_TRIPLE_DES_CBC: | |
670 pbe_param->pbeType = NSSPKCS5_PKCS12_V2; | |
671 /* fall through */ | |
672 case SEC_OID_PKCS12_PBE_WITH_SHA1_AND_TRIPLE_DES_CBC: | |
673 pbe_param->keyLen = 24; | |
674 pbe_param->encAlg = SEC_OID_DES_EDE3_CBC; | |
675 break; | |
676 | |
677 /* DES Algorithms */ | |
678 case SEC_OID_PKCS5_PBE_WITH_MD2_AND_DES_CBC: | |
679 pbe_param->hashType = HASH_AlgMD2; | |
680 goto finish_des; | |
681 case SEC_OID_PKCS5_PBE_WITH_MD5_AND_DES_CBC: | |
682 pbe_param->hashType = HASH_AlgMD5; | |
683 /* fall through */ | |
684 case SEC_OID_PKCS5_PBE_WITH_SHA1_AND_DES_CBC: | |
685 finish_des: | |
686 pbe_param->keyLen = 8; | |
687 pbe_param->encAlg = SEC_OID_DES_CBC; | |
688 break; | |
689 | |
690 /* RC2 Algorithms */ | |
691 case SEC_OID_PKCS12_V2_PBE_WITH_SHA1_AND_128_BIT_RC2_CBC: | |
692 pbe_param->keyLen = 16; | |
693 /* fall through */ | |
694 case SEC_OID_PKCS12_V2_PBE_WITH_SHA1_AND_40_BIT_RC2_CBC: | |
695 pbe_param->pbeType = NSSPKCS5_PKCS12_V2; | |
696 break; | |
697 case SEC_OID_PKCS12_PBE_WITH_SHA1_AND_128_BIT_RC2_CBC: | |
698 pbe_param->keyLen = 16; | |
699 /* fall through */ | |
700 case SEC_OID_PKCS12_PBE_WITH_SHA1_AND_40_BIT_RC2_CBC: | |
701 break; | |
702 | |
703 /* RC4 algorithms */ | |
704 case SEC_OID_PKCS12_PBE_WITH_SHA1_AND_128_BIT_RC4: | |
705 skipType = PR_TRUE; | |
706 /* fall through */ | |
707 case SEC_OID_PKCS12_V2_PBE_WITH_SHA1_AND_128_BIT_RC4: | |
708 pbe_param->keyLen = 16; | |
709 /* fall through */ | |
710 case SEC_OID_PKCS12_V2_PBE_WITH_SHA1_AND_40_BIT_RC4: | |
711 if (!skipType) { | |
712 pbe_param->pbeType = NSSPKCS5_PKCS12_V2; | |
713 } | |
714 /* fall through */ | |
715 case SEC_OID_PKCS12_PBE_WITH_SHA1_AND_40_BIT_RC4: | |
716 pbe_param->ivLen = 0; | |
717 pbe_param->encAlg = SEC_OID_RC4; | |
718 break; | |
719 | |
720 #ifdef PBKDF2 | |
721 case SEC_OID_PKCS5_PBKDF2: | |
722 case SEC_OID_PKCS5_PBES2: | |
723 case SEC_OID_PKCS5_PBMAC1: | |
724 /* everything else will be filled in by the template */ | |
725 pbe_param->ivLen = 0; | |
726 pbe_param->pbeType = NSSPKCS5_PBKDF2; | |
727 pbe_param->encAlg = SEC_OID_PKCS5_PBKDF2; | |
728 pbe_param->keyLen = 0; /* needs to be set by caller after return */ | |
729 break; | |
730 #endif | |
731 | |
732 default: | |
733 return SECFailure; | |
734 } | |
735 | |
736 return SECSuccess; | |
737 } | |
738 | |
739 /* decode the algid and generate a PKCS 5 parameter from it | |
740 */ | |
741 NSSPKCS5PBEParameter * | |
742 nsspkcs5_NewParam(SECOidTag alg, SECItem *salt, int iterator) | |
743 { | |
744 PLArenaPool *arena = NULL; | |
745 NSSPKCS5PBEParameter *pbe_param = NULL; | |
746 SECStatus rv = SECFailure; | |
747 | |
748 arena = PORT_NewArena(SEC_ASN1_DEFAULT_ARENA_SIZE); | |
749 if (arena == NULL) | |
750 return NULL; | |
751 | |
752 /* allocate memory for the parameter */ | |
753 pbe_param = (NSSPKCS5PBEParameter *)PORT_ArenaZAlloc(arena, | |
754 sizeof(NSSPKCS5PBEParameter)); | |
755 | |
756 if (pbe_param == NULL) { | |
757 goto loser; | |
758 } | |
759 | |
760 pbe_param->poolp = arena; | |
761 | |
762 rv = nsspkcs5_FillInParam(alg, pbe_param); | |
763 if (rv != SECSuccess) { | |
764 goto loser; | |
765 } | |
766 | |
767 pbe_param->iter = iterator; | |
768 if (salt) { | |
769 rv = SECITEM_CopyItem(arena,&pbe_param->salt,salt); | |
770 } | |
771 | |
772 /* default key gen */ | |
773 pbe_param->keyID = pbeBitGenCipherKey; | |
774 | |
775 loser: | |
776 if (rv != SECSuccess) { | |
777 PORT_FreeArena(arena, PR_TRUE); | |
778 pbe_param = NULL; | |
779 } | |
780 | |
781 return pbe_param; | |
782 } | |
783 | |
784 /* | |
785 * find the hash type needed to implement a specific HMAC. | |
786 * OID definitions are from pkcs 5 v2.0 and 2.1 | |
787 */ | |
788 HASH_HashType | |
789 HASH_FromHMACOid(SECOidTag hmac) | |
790 { | |
791 switch (hmac) { | |
792 case SEC_OID_HMAC_SHA1: | |
793 return HASH_AlgSHA1; | |
794 case SEC_OID_HMAC_SHA256: | |
795 return HASH_AlgSHA256; | |
796 case SEC_OID_HMAC_SHA384: | |
797 return HASH_AlgSHA384; | |
798 case SEC_OID_HMAC_SHA512: | |
799 return HASH_AlgSHA512; | |
800 case SEC_OID_HMAC_SHA224: | |
801 default: | |
802 break; | |
803 } | |
804 return HASH_AlgNULL; | |
805 } | |
806 | |
807 /* decode the algid and generate a PKCS 5 parameter from it | |
808 */ | |
809 NSSPKCS5PBEParameter * | |
810 nsspkcs5_AlgidToParam(SECAlgorithmID *algid) | |
811 { | |
812 NSSPKCS5PBEParameter *pbe_param = NULL; | |
813 nsspkcs5V2PBEParameter pbev2_param; | |
814 SECOidTag algorithm; | |
815 SECStatus rv = SECFailure; | |
816 | |
817 if (algid == NULL) { | |
818 return NULL; | |
819 } | |
820 | |
821 algorithm = SECOID_GetAlgorithmTag(algid); | |
822 if (algorithm == SEC_OID_UNKNOWN) { | |
823 goto loser; | |
824 } | |
825 | |
826 pbe_param = nsspkcs5_NewParam(algorithm, NULL, 1); | |
827 if (pbe_param == NULL) { | |
828 goto loser; | |
829 } | |
830 | |
831 /* decode parameter */ | |
832 rv = SECFailure; | |
833 switch (pbe_param->pbeType) { | |
834 case NSSPKCS5_PBKDF1: | |
835 rv = SEC_ASN1DecodeItem(pbe_param->poolp, pbe_param, | |
836 NSSPKCS5PBEParameterTemplate, &algid->parameters); | |
837 break; | |
838 case NSSPKCS5_PKCS12_V2: | |
839 rv = SEC_ASN1DecodeItem(pbe_param->poolp, pbe_param, | |
840 NSSPKCS5PKCS12V2PBEParameterTemplate, &algid->parameters); | |
841 break; | |
842 #ifdef PBKDF2 | |
843 case NSSPKCS5_PBKDF2: | |
844 PORT_Memset(&pbev2_param,0, sizeof(pbev2_param)); | |
845 /* just the PBE */ | |
846 if (algorithm == SEC_OID_PKCS5_PBKDF2) { | |
847 rv = SEC_ASN1DecodeItem(pbe_param->poolp, pbe_param, | |
848 NSSPKCS5V2PBEParameterTemplate, &algid->parameters); | |
849 } else { | |
850 /* PBE data an others */ | |
851 rv = SEC_ASN1DecodeItem(pbe_param->poolp, &pbev2_param, | |
852 NSSPKCS5V2PBES2ParameterTemplate, &algid->parameters); | |
853 if (rv != SECSuccess) { | |
854 break; | |
855 } | |
856 pbe_param->encAlg = SECOID_GetAlgorithmTag(&pbev2_param.algParams); | |
857 rv = SEC_ASN1DecodeItem(pbe_param->poolp, pbe_param, | |
858 NSSPKCS5V2PBEParameterTemplate, | |
859 &pbev2_param.keyParams.parameters); | |
860 if (rv != SECSuccess) { | |
861 break; | |
862 } | |
863 pbe_param->keyLen = DER_GetInteger(&pbe_param->keyLength); | |
864 } | |
865 /* we we are encrypting, save any iv's */ | |
866 if (algorithm == SEC_OID_PKCS5_PBES2) { | |
867 pbe_param->ivLen = pbev2_param.algParams.parameters.len; | |
868 pbe_param->ivData = pbev2_param.algParams.parameters.data; | |
869 } | |
870 pbe_param->hashType = | |
871 HASH_FromHMACOid(SECOID_GetAlgorithmTag(&pbe_param->prfAlg)); | |
872 if (pbe_param->hashType == HASH_AlgNULL) { | |
873 PORT_SetError(SEC_ERROR_INVALID_ALGORITHM); | |
874 rv = SECFailure; | |
875 } | |
876 break; | |
877 #endif | |
878 } | |
879 | |
880 loser: | |
881 if (rv == SECSuccess) { | |
882 pbe_param->iter = DER_GetInteger(&pbe_param->iteration); | |
883 } else { | |
884 nsspkcs5_DestroyPBEParameter(pbe_param); | |
885 pbe_param = NULL; | |
886 } | |
887 | |
888 return pbe_param; | |
889 } | |
890 | |
891 /* destroy a pbe parameter. it assumes that the parameter was | |
892 * generated using the appropriate create function and therefor | |
893 * contains an arena pool. | |
894 */ | |
895 void | |
896 nsspkcs5_DestroyPBEParameter(NSSPKCS5PBEParameter *pbe_param) | |
897 { | |
898 if (pbe_param != NULL) { | |
899 PORT_FreeArena(pbe_param->poolp, PR_FALSE); | |
900 } | |
901 } | |
902 | |
903 | |
904 /* crypto routines */ | |
905 /* perform DES encryption and decryption. these routines are called | |
906 * by nsspkcs5_CipherData. In the case of an error, NULL is returned. | |
907 */ | |
908 static SECItem * | |
909 sec_pkcs5_des(SECItem *key, SECItem *iv, SECItem *src, PRBool triple_des, | |
910 PRBool encrypt) | |
911 { | |
912 SECItem *dest; | |
913 SECItem *dup_src; | |
914 SECStatus rv = SECFailure; | |
915 int pad; | |
916 | |
917 if((src == NULL) || (key == NULL) || (iv == NULL)) | |
918 return NULL; | |
919 | |
920 dup_src = SECITEM_DupItem(src); | |
921 if(dup_src == NULL) { | |
922 return NULL; | |
923 } | |
924 | |
925 if(encrypt != PR_FALSE) { | |
926 void *dummy; | |
927 | |
928 dummy = CBC_PadBuffer(NULL, dup_src->data, | |
929 dup_src->len, &dup_src->len, 8 /* DES_BLOCK_SIZE */); | |
930 if(dummy == NULL) { | |
931 SECITEM_FreeItem(dup_src, PR_TRUE); | |
932 return NULL; | |
933 } | |
934 dup_src->data = (unsigned char*)dummy; | |
935 } | |
936 | |
937 dest = (SECItem *)PORT_ZAlloc(sizeof(SECItem)); | |
938 if(dest != NULL) { | |
939 /* allocate with over flow */ | |
940 dest->data = (unsigned char *)PORT_ZAlloc(dup_src->len + 64); | |
941 if(dest->data != NULL) { | |
942 DESContext *ctxt; | |
943 ctxt = DES_CreateContext(key->data, iv->data, | |
944 (triple_des ? NSS_DES_EDE3_CBC : NSS_DES_CBC), | |
945 encrypt); | |
946 | |
947 if(ctxt != NULL) { | |
948 rv = (encrypt ? DES_Encrypt : DES_Decrypt)( | |
949 ctxt, dest->data, &dest->len, | |
950 dup_src->len + 64, dup_src->data, dup_src->len); | |
951 | |
952 /* remove padding -- assumes 64 bit blocks */ | |
953 if((encrypt == PR_FALSE) && (rv == SECSuccess)) { | |
954 pad = dest->data[dest->len-1]; | |
955 if((pad > 0) && (pad <= 8)) { | |
956 if(dest->data[dest->len-pad] != pad) { | |
957 rv = SECFailure; | |
958 PORT_SetError(SEC_ERROR_BAD_PASSWORD); | |
959 } else { | |
960 dest->len -= pad; | |
961 } | |
962 } else { | |
963 rv = SECFailure; | |
964 PORT_SetError(SEC_ERROR_BAD_PASSWORD); | |
965 } | |
966 } | |
967 DES_DestroyContext(ctxt, PR_TRUE); | |
968 } | |
969 } | |
970 } | |
971 | |
972 if(rv == SECFailure) { | |
973 if(dest != NULL) { | |
974 SECITEM_FreeItem(dest, PR_TRUE); | |
975 } | |
976 dest = NULL; | |
977 } | |
978 | |
979 if(dup_src != NULL) { | |
980 SECITEM_FreeItem(dup_src, PR_TRUE); | |
981 } | |
982 | |
983 return dest; | |
984 } | |
985 | |
986 /* perform aes encryption/decryption if an error occurs, NULL is returned | |
987 */ | |
988 static SECItem * | |
989 sec_pkcs5_aes(SECItem *key, SECItem *iv, SECItem *src, PRBool triple_des, | |
990 PRBool encrypt) | |
991 { | |
992 SECItem *dest; | |
993 SECItem *dup_src; | |
994 SECStatus rv = SECFailure; | |
995 int pad; | |
996 | |
997 if((src == NULL) || (key == NULL) || (iv == NULL)) | |
998 return NULL; | |
999 | |
1000 dup_src = SECITEM_DupItem(src); | |
1001 if(dup_src == NULL) { | |
1002 return NULL; | |
1003 } | |
1004 | |
1005 if(encrypt != PR_FALSE) { | |
1006 void *dummy; | |
1007 | |
1008 dummy = CBC_PadBuffer(NULL, dup_src->data, | |
1009 dup_src->len, &dup_src->len,AES_BLOCK_SIZE); | |
1010 if(dummy == NULL) { | |
1011 SECITEM_FreeItem(dup_src, PR_TRUE); | |
1012 return NULL; | |
1013 } | |
1014 dup_src->data = (unsigned char*)dummy; | |
1015 } | |
1016 | |
1017 dest = (SECItem *)PORT_ZAlloc(sizeof(SECItem)); | |
1018 if(dest != NULL) { | |
1019 /* allocate with over flow */ | |
1020 dest->data = (unsigned char *)PORT_ZAlloc(dup_src->len + 64); | |
1021 if(dest->data != NULL) { | |
1022 AESContext *ctxt; | |
1023 ctxt = AES_CreateContext(key->data, iv->data, | |
1024 NSS_AES_CBC, encrypt, key->len, 16); | |
1025 | |
1026 if(ctxt != NULL) { | |
1027 rv = (encrypt ? AES_Encrypt : AES_Decrypt)( | |
1028 ctxt, dest->data, &dest->len, | |
1029 dup_src->len + 64, dup_src->data, dup_src->len); | |
1030 | |
1031 /* remove padding -- assumes 64 bit blocks */ | |
1032 if((encrypt == PR_FALSE) && (rv == SECSuccess)) { | |
1033 pad = dest->data[dest->len-1]; | |
1034 if((pad > 0) && (pad <= 16)) { | |
1035 if(dest->data[dest->len-pad] != pad) { | |
1036 rv = SECFailure; | |
1037 PORT_SetError(SEC_ERROR_BAD_PASSWORD); | |
1038 } else { | |
1039 dest->len -= pad; | |
1040 } | |
1041 } else { | |
1042 rv = SECFailure; | |
1043 PORT_SetError(SEC_ERROR_BAD_PASSWORD); | |
1044 } | |
1045 } | |
1046 AES_DestroyContext(ctxt, PR_TRUE); | |
1047 } | |
1048 } | |
1049 } | |
1050 | |
1051 if(rv == SECFailure) { | |
1052 if(dest != NULL) { | |
1053 SECITEM_FreeItem(dest, PR_TRUE); | |
1054 } | |
1055 dest = NULL; | |
1056 } | |
1057 | |
1058 if(dup_src != NULL) { | |
1059 SECITEM_FreeItem(dup_src, PR_TRUE); | |
1060 } | |
1061 | |
1062 return dest; | |
1063 } | |
1064 | |
1065 /* perform rc2 encryption/decryption if an error occurs, NULL is returned | |
1066 */ | |
1067 static SECItem * | |
1068 sec_pkcs5_rc2(SECItem *key, SECItem *iv, SECItem *src, PRBool dummy, | |
1069 PRBool encrypt) | |
1070 { | |
1071 SECItem *dest; | |
1072 SECItem *dup_src; | |
1073 SECStatus rv = SECFailure; | |
1074 int pad; | |
1075 | |
1076 if((src == NULL) || (key == NULL) || (iv == NULL)) { | |
1077 return NULL; | |
1078 } | |
1079 | |
1080 dup_src = SECITEM_DupItem(src); | |
1081 if(dup_src == NULL) { | |
1082 return NULL; | |
1083 } | |
1084 | |
1085 if(encrypt != PR_FALSE) { | |
1086 void *dummy; | |
1087 | |
1088 dummy = CBC_PadBuffer(NULL, dup_src->data, | |
1089 dup_src->len, &dup_src->len, 8 /* RC2_BLOCK_SIZE */); | |
1090 if(dummy == NULL) { | |
1091 SECITEM_FreeItem(dup_src, PR_TRUE); | |
1092 return NULL; | |
1093 } | |
1094 dup_src->data = (unsigned char*)dummy; | |
1095 } | |
1096 | |
1097 dest = (SECItem *)PORT_ZAlloc(sizeof(SECItem)); | |
1098 if(dest != NULL) { | |
1099 dest->data = (unsigned char *)PORT_ZAlloc(dup_src->len + 64); | |
1100 if(dest->data != NULL) { | |
1101 RC2Context *ctxt; | |
1102 | |
1103 ctxt = RC2_CreateContext(key->data, key->len, iv->data, | |
1104 NSS_RC2_CBC, key->len); | |
1105 | |
1106 if(ctxt != NULL) { | |
1107 rv = (encrypt ? RC2_Encrypt: RC2_Decrypt)( | |
1108 ctxt, dest->data, &dest->len, | |
1109 dup_src->len + 64, dup_src->data, dup_src->len); | |
1110 | |
1111 /* assumes 8 byte blocks -- remove padding */ | |
1112 if((rv == SECSuccess) && (encrypt != PR_TRUE)) { | |
1113 pad = dest->data[dest->len-1]; | |
1114 if((pad > 0) && (pad <= 8)) { | |
1115 if(dest->data[dest->len-pad] != pad) { | |
1116 PORT_SetError(SEC_ERROR_BAD_PASSWORD); | |
1117 rv = SECFailure; | |
1118 } else { | |
1119 dest->len -= pad; | |
1120 } | |
1121 } else { | |
1122 PORT_SetError(SEC_ERROR_BAD_PASSWORD); | |
1123 rv = SECFailure; | |
1124 } | |
1125 } | |
1126 | |
1127 } | |
1128 } | |
1129 } | |
1130 | |
1131 if((rv != SECSuccess) && (dest != NULL)) { | |
1132 SECITEM_FreeItem(dest, PR_TRUE); | |
1133 dest = NULL; | |
1134 } | |
1135 | |
1136 if(dup_src != NULL) { | |
1137 SECITEM_FreeItem(dup_src, PR_TRUE); | |
1138 } | |
1139 | |
1140 return dest; | |
1141 } | |
1142 | |
1143 /* perform rc4 encryption and decryption */ | |
1144 static SECItem * | |
1145 sec_pkcs5_rc4(SECItem *key, SECItem *iv, SECItem *src, PRBool dummy_op, | |
1146 PRBool encrypt) | |
1147 { | |
1148 SECItem *dest; | |
1149 SECStatus rv = SECFailure; | |
1150 | |
1151 if((src == NULL) || (key == NULL) || (iv == NULL)) { | |
1152 return NULL; | |
1153 } | |
1154 | |
1155 dest = (SECItem *)PORT_ZAlloc(sizeof(SECItem)); | |
1156 if(dest != NULL) { | |
1157 dest->data = (unsigned char *)PORT_ZAlloc(sizeof(unsigned char) * | |
1158 (src->len + 64)); | |
1159 if(dest->data != NULL) { | |
1160 RC4Context *ctxt; | |
1161 | |
1162 ctxt = RC4_CreateContext(key->data, key->len); | |
1163 if(ctxt) { | |
1164 rv = (encrypt ? RC4_Encrypt : RC4_Decrypt)( | |
1165 ctxt, dest->data, &dest->len, | |
1166 src->len + 64, src->data, src->len); | |
1167 RC4_DestroyContext(ctxt, PR_TRUE); | |
1168 } | |
1169 } | |
1170 } | |
1171 | |
1172 if((rv != SECSuccess) && (dest)) { | |
1173 SECITEM_FreeItem(dest, PR_TRUE); | |
1174 dest = NULL; | |
1175 } | |
1176 | |
1177 return dest; | |
1178 } | |
1179 /* function pointer template for crypto functions */ | |
1180 typedef SECItem *(* pkcs5_crypto_func)(SECItem *key, SECItem *iv, | |
1181 SECItem *src, PRBool op1, PRBool op2); | |
1182 | |
1183 /* performs the cipher operation on the src and returns the result. | |
1184 * if an error occurs, NULL is returned. | |
1185 * | |
1186 * a null length password is allowed. this corresponds to encrypting | |
1187 * the data with ust the salt. | |
1188 */ | |
1189 /* change this to use PKCS 11? */ | |
1190 SECItem * | |
1191 nsspkcs5_CipherData(NSSPKCS5PBEParameter *pbe_param, SECItem *pwitem, | |
1192 SECItem *src, PRBool encrypt, PRBool *update) | |
1193 { | |
1194 SECItem *key = NULL, iv; | |
1195 SECItem *dest = NULL; | |
1196 PRBool tripleDES = PR_TRUE; | |
1197 pkcs5_crypto_func cryptof; | |
1198 | |
1199 iv.data = NULL; | |
1200 | |
1201 if (update) { | |
1202 *update = PR_FALSE; | |
1203 } | |
1204 | |
1205 if ((pwitem == NULL) || (src == NULL)) { | |
1206 return NULL; | |
1207 } | |
1208 | |
1209 /* get key, and iv */ | |
1210 key = nsspkcs5_ComputeKeyAndIV(pbe_param, pwitem, &iv, PR_FALSE); | |
1211 if(key == NULL) { | |
1212 return NULL; | |
1213 } | |
1214 | |
1215 switch(pbe_param->encAlg) { | |
1216 /* PKCS 5 v2 only */ | |
1217 case SEC_OID_AES_128_CBC: | |
1218 case SEC_OID_AES_192_CBC: | |
1219 case SEC_OID_AES_256_CBC: | |
1220 cryptof = sec_pkcs5_aes; | |
1221 break; | |
1222 case SEC_OID_DES_EDE3_CBC: | |
1223 cryptof = sec_pkcs5_des; | |
1224 tripleDES = PR_TRUE; | |
1225 break; | |
1226 case SEC_OID_DES_CBC: | |
1227 cryptof = sec_pkcs5_des; | |
1228 tripleDES = PR_FALSE; | |
1229 break; | |
1230 case SEC_OID_RC2_CBC: | |
1231 cryptof = sec_pkcs5_rc2; | |
1232 break; | |
1233 case SEC_OID_RC4: | |
1234 cryptof = sec_pkcs5_rc4; | |
1235 break; | |
1236 default: | |
1237 cryptof = NULL; | |
1238 break; | |
1239 } | |
1240 | |
1241 if (cryptof == NULL) { | |
1242 goto loser; | |
1243 } | |
1244 | |
1245 dest = (*cryptof)(key, &iv, src, tripleDES, encrypt); | |
1246 /* | |
1247 * it's possible for some keys and keydb's to claim to | |
1248 * be triple des when they're really des. In this case | |
1249 * we simply try des. If des works we set the update flag | |
1250 * so the key db knows it needs to update all it's entries. | |
1251 * The case can only happen on decrypted of a | |
1252 * SEC_OID_DES_EDE3_CBD. | |
1253 */ | |
1254 if ((dest == NULL) && (encrypt == PR_FALSE) && | |
1255 (pbe_param->encAlg == SEC_OID_DES_EDE3_CBC)) { | |
1256 dest = (*cryptof)(key, &iv, src, PR_FALSE, encrypt); | |
1257 if (update && (dest != NULL)) *update = PR_TRUE; | |
1258 } | |
1259 | |
1260 loser: | |
1261 if (key != NULL) { | |
1262 SECITEM_ZfreeItem(key, PR_TRUE); | |
1263 } | |
1264 if (iv.data != NULL) { | |
1265 SECITEM_ZfreeItem(&iv, PR_FALSE); | |
1266 } | |
1267 | |
1268 return dest; | |
1269 } | |
1270 | |
1271 /* creates a algorithm ID containing the PBE algorithm and appropriate | |
1272 * parameters. the required parameter is the algorithm. if salt is | |
1273 * not specified, it is generated randomly. if IV is specified, it overrides | |
1274 * the PKCS 5 generation of the IV. | |
1275 * | |
1276 * the returned SECAlgorithmID should be destroyed using | |
1277 * SECOID_DestroyAlgorithmID | |
1278 */ | |
1279 SECAlgorithmID * | |
1280 nsspkcs5_CreateAlgorithmID(PLArenaPool *arena, SECOidTag algorithm, | |
1281 NSSPKCS5PBEParameter *pbe_param) | |
1282 { | |
1283 SECAlgorithmID *algid, *ret_algid = NULL; | |
1284 SECItem der_param; | |
1285 nsspkcs5V2PBEParameter pkcs5v2_param; | |
1286 | |
1287 SECStatus rv = SECFailure; | |
1288 void *dummy = NULL; | |
1289 | |
1290 if (arena == NULL) { | |
1291 return NULL; | |
1292 } | |
1293 | |
1294 der_param.data = NULL; | |
1295 der_param.len = 0; | |
1296 | |
1297 /* generate the algorithm id */ | |
1298 algid = (SECAlgorithmID *)PORT_ArenaZAlloc(arena, sizeof(SECAlgorithmID)); | |
1299 if (algid == NULL) { | |
1300 goto loser; | |
1301 } | |
1302 | |
1303 if (pbe_param->iteration.data == NULL) { | |
1304 dummy = SEC_ASN1EncodeInteger(pbe_param->poolp,&pbe_param->iteration, | |
1305 pbe_param->iter); | |
1306 if (dummy == NULL) { | |
1307 goto loser; | |
1308 } | |
1309 } | |
1310 switch (pbe_param->pbeType) { | |
1311 case NSSPKCS5_PBKDF1: | |
1312 dummy = SEC_ASN1EncodeItem(arena, &der_param, pbe_param, | |
1313 NSSPKCS5PBEParameterTemplate); | |
1314 break; | |
1315 case NSSPKCS5_PKCS12_V2: | |
1316 dummy = SEC_ASN1EncodeItem(arena, &der_param, pbe_param, | |
1317 NSSPKCS5PKCS12V2PBEParameterTemplate); | |
1318 break; | |
1319 #ifdef PBKDF2 | |
1320 case NSSPKCS5_PBKDF2: | |
1321 if (pbe_param->keyLength.data == NULL) { | |
1322 dummy = SEC_ASN1EncodeInteger(pbe_param->poolp, | |
1323 &pbe_param->keyLength, pbe_param->keyLen); | |
1324 if (dummy == NULL) { | |
1325 goto loser; | |
1326 } | |
1327 } | |
1328 PORT_Memset(&pkcs5v2_param, 0, sizeof(pkcs5v2_param)); | |
1329 dummy = SEC_ASN1EncodeItem(arena, &der_param, pbe_param, | |
1330 NSSPKCS5V2PBEParameterTemplate); | |
1331 if (dummy == NULL) { | |
1332 break; | |
1333 } | |
1334 dummy = NULL; | |
1335 rv = SECOID_SetAlgorithmID(arena, &pkcs5v2_param.keyParams, | |
1336 SEC_OID_PKCS5_PBKDF2, &der_param); | |
1337 if (rv != SECSuccess) { | |
1338 break; | |
1339 } | |
1340 der_param.data = pbe_param->ivData; | |
1341 der_param.len = pbe_param->ivLen; | |
1342 rv = SECOID_SetAlgorithmID(arena, &pkcs5v2_param.algParams, | |
1343 pbe_param->encAlg, pbe_param->ivLen ? &der_param : NULL); | |
1344 if (rv != SECSuccess) { | |
1345 break; | |
1346 } | |
1347 dummy = SEC_ASN1EncodeItem(arena, &der_param, &pkcs5v2_param, | |
1348 NSSPKCS5V2PBES2ParameterTemplate); | |
1349 break; | |
1350 #endif | |
1351 default: | |
1352 break; | |
1353 } | |
1354 | |
1355 if (dummy == NULL) { | |
1356 goto loser; | |
1357 } | |
1358 | |
1359 rv = SECOID_SetAlgorithmID(arena, algid, algorithm, &der_param); | |
1360 if (rv != SECSuccess) { | |
1361 goto loser; | |
1362 } | |
1363 | |
1364 ret_algid = (SECAlgorithmID *)PORT_ZAlloc(sizeof(SECAlgorithmID)); | |
1365 if (ret_algid == NULL) { | |
1366 goto loser; | |
1367 } | |
1368 | |
1369 rv = SECOID_CopyAlgorithmID(NULL, ret_algid, algid); | |
1370 if (rv != SECSuccess) { | |
1371 SECOID_DestroyAlgorithmID(ret_algid, PR_TRUE); | |
1372 ret_algid = NULL; | |
1373 } | |
1374 | |
1375 loser: | |
1376 | |
1377 return ret_algid; | |
1378 } |