1 /***************************************************************************
2 * _ _ ____ _
3 * Project ___| | | | _ \| |
4 * / __| | | | |_) | |
5 * | (__| |_| | _ <| |___
6 * \___|\___/|_| \_\_____|
7 *
8 * Copyright (C) 1998 - 2017, Daniel Stenberg, <daniel@haxx.se>, et al.
9 *
10 * This software is licensed as described in the file COPYING, which
11 * you should have received as part of this distribution. The terms
12 * are also available at https://curl.haxx.se/docs/copyright.html.
13 *
14 * You may opt to use, copy, modify, merge, publish, distribute and/or sell
15 * copies of the Software, and permit persons to whom the Software is
16 * furnished to do so, under the terms of the COPYING file.
17 *
18 * This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
19 * KIND, either express or implied.
20 *
21 ***************************************************************************/
22
23 #include "curl_setup.h"
24
25 #if defined(USE_NTLM)
26
27 /*
28 * NTLM details:
29 *
30 * https://davenport.sourceforge.io/ntlm.html
31 * https://www.innovation.ch/java/ntlm.html
32 */
33
34 /* Please keep the SSL backend-specific #if branches in this order:
35
36 1. USE_OPENSSL
37 2. USE_GNUTLS_NETTLE
38 3. USE_GNUTLS
39 4. USE_NSS
40 5. USE_MBEDTLS
41 6. USE_DARWINSSL
42 7. USE_OS400CRYPTO
43 8. USE_WIN32_CRYPTO
44
45 This ensures that:
46 - the same SSL branch gets activated throughout this source
47 file even if multiple backends are enabled at the same time.
48 - OpenSSL and NSS have higher priority than Windows Crypt, due
49 to issues with the latter supporting NTLM2Session responses
50 in NTLM type-3 messages.
51 */
52
53 #if !defined(USE_WINDOWS_SSPI) || defined(USE_WIN32_CRYPTO)
54
55 #ifdef USE_OPENSSL
56
57 # ifdef USE_OPENSSL
58 # include <openssl/des.h>
59 # ifndef OPENSSL_NO_MD4
60 # include <openssl/md4.h>
61 # endif
62 # include <openssl/md5.h>
63 # include <openssl/ssl.h>
64 # include <openssl/rand.h>
65 # else
66 # include <des.h>
67 # ifndef OPENSSL_NO_MD4
68 # include <md4.h>
69 # endif
70 # include <md5.h>
71 # include <ssl.h>
72 # include <rand.h>
73 # endif
74 # if (OPENSSL_VERSION_NUMBER < 0x00907001L)
75 # define DES_key_schedule des_key_schedule
76 # define DES_cblock des_cblock
77 # define DES_set_odd_parity des_set_odd_parity
78 # define DES_set_key des_set_key
79 # define DES_ecb_encrypt des_ecb_encrypt
80 # define DESKEY(x) x
81 # define DESKEYARG(x) x
82 # else
83 # define DESKEYARG(x) *x
84 # define DESKEY(x) &x
85 # endif
86
87 #elif defined(USE_GNUTLS_NETTLE)
88
89 # include <nettle/des.h>
90 # include <nettle/md4.h>
91
92 #elif defined(USE_GNUTLS)
93
94 # include <gcrypt.h>
95 # define MD5_DIGEST_LENGTH 16
96 # define MD4_DIGEST_LENGTH 16
97
98 #elif defined(USE_NSS)
99
100 # include <nss.h>
101 # include <pk11pub.h>
102 # include <hasht.h>
103 # include "curl_md4.h"
104 # define MD5_DIGEST_LENGTH MD5_LENGTH
105
106 #elif defined(USE_MBEDTLS)
107
108 # include <mbedtls/des.h>
109 # include <mbedtls/md4.h>
110 # if !defined(MBEDTLS_MD4_C)
111 # include "curl_md4.h"
112 # endif
113
114 #elif defined(USE_DARWINSSL)
115
116 # include <CommonCrypto/CommonCryptor.h>
117 # include <CommonCrypto/CommonDigest.h>
118
119 #elif defined(USE_OS400CRYPTO)
120 # include "cipher.mih" /* mih/cipher */
121 # include "curl_md4.h"
122 #elif defined(USE_WIN32_CRYPTO)
123 # include <wincrypt.h>
124 #else
125 # error "Can't compile NTLM support without a crypto library."
126 #endif
127
128 #include "urldata.h"
129 #include "non-ascii.h"
130 #include "strcase.h"
131 #include "curl_ntlm_core.h"
132 #include "curl_md5.h"
133 #include "curl_hmac.h"
134 #include "warnless.h"
135 #include "curl_endian.h"
136 #include "curl_des.h"
137 /* The last 3 #include files should be in this order */
138 #include "curl_printf.h"
139 #include "curl_memory.h"
140 #include "memdebug.h"
141
142 #define NTLM_HMAC_MD5_LEN (16)
143 #define NTLMv2_BLOB_SIGNATURE "\x01\x01\x00\x00"
144 #define NTLMv2_BLOB_LEN (44 -16 + ntlm->target_info_len + 4)
145
146 /*
147 * Turns a 56-bit key into being 64-bit wide.
148 */
extend_key_56_to_64(const unsigned char * key_56,char * key)149 static void extend_key_56_to_64(const unsigned char *key_56, char *key)
150 {
151 key[0] = key_56[0];
152 key[1] = (unsigned char)(((key_56[0] << 7) & 0xFF) | (key_56[1] >> 1));
153 key[2] = (unsigned char)(((key_56[1] << 6) & 0xFF) | (key_56[2] >> 2));
154 key[3] = (unsigned char)(((key_56[2] << 5) & 0xFF) | (key_56[3] >> 3));
155 key[4] = (unsigned char)(((key_56[3] << 4) & 0xFF) | (key_56[4] >> 4));
156 key[5] = (unsigned char)(((key_56[4] << 3) & 0xFF) | (key_56[5] >> 5));
157 key[6] = (unsigned char)(((key_56[5] << 2) & 0xFF) | (key_56[6] >> 6));
158 key[7] = (unsigned char) ((key_56[6] << 1) & 0xFF);
159 }
160
161 #ifdef USE_OPENSSL
162 /*
163 * Turns a 56 bit key into the 64 bit, odd parity key and sets the key. The
164 * key schedule ks is also set.
165 */
setup_des_key(const unsigned char * key_56,DES_key_schedule DESKEYARG (ks))166 static void setup_des_key(const unsigned char *key_56,
167 DES_key_schedule DESKEYARG(ks))
168 {
169 DES_cblock key;
170
171 /* Expand the 56-bit key to 64-bits */
172 extend_key_56_to_64(key_56, (char *) &key);
173
174 /* Set the key parity to odd */
175 DES_set_odd_parity(&key);
176
177 /* Set the key */
178 DES_set_key(&key, ks);
179 }
180
181 #elif defined(USE_GNUTLS_NETTLE)
182
setup_des_key(const unsigned char * key_56,struct des_ctx * des)183 static void setup_des_key(const unsigned char *key_56,
184 struct des_ctx *des)
185 {
186 char key[8];
187
188 /* Expand the 56-bit key to 64-bits */
189 extend_key_56_to_64(key_56, key);
190
191 /* Set the key parity to odd */
192 Curl_des_set_odd_parity((unsigned char *) key, sizeof(key));
193
194 /* Set the key */
195 des_set_key(des, (const uint8_t *) key);
196 }
197
198 #elif defined(USE_GNUTLS)
199
200 /*
201 * Turns a 56 bit key into the 64 bit, odd parity key and sets the key.
202 */
setup_des_key(const unsigned char * key_56,gcry_cipher_hd_t * des)203 static void setup_des_key(const unsigned char *key_56,
204 gcry_cipher_hd_t *des)
205 {
206 char key[8];
207
208 /* Expand the 56-bit key to 64-bits */
209 extend_key_56_to_64(key_56, key);
210
211 /* Set the key parity to odd */
212 Curl_des_set_odd_parity((unsigned char *) key, sizeof(key));
213
214 /* Set the key */
215 gcry_cipher_setkey(*des, key, sizeof(key));
216 }
217
218 #elif defined(USE_NSS)
219
220 /*
221 * Expands a 56 bit key KEY_56 to 64 bit and encrypts 64 bit of data, using
222 * the expanded key. The caller is responsible for giving 64 bit of valid
223 * data is IN and (at least) 64 bit large buffer as OUT.
224 */
encrypt_des(const unsigned char * in,unsigned char * out,const unsigned char * key_56)225 static bool encrypt_des(const unsigned char *in, unsigned char *out,
226 const unsigned char *key_56)
227 {
228 const CK_MECHANISM_TYPE mech = CKM_DES_ECB; /* DES cipher in ECB mode */
229 PK11SlotInfo *slot = NULL;
230 char key[8]; /* expanded 64 bit key */
231 SECItem key_item;
232 PK11SymKey *symkey = NULL;
233 SECItem *param = NULL;
234 PK11Context *ctx = NULL;
235 int out_len; /* not used, required by NSS */
236 bool rv = FALSE;
237
238 /* use internal slot for DES encryption (requires NSS to be initialized) */
239 slot = PK11_GetInternalKeySlot();
240 if(!slot)
241 return FALSE;
242
243 /* Expand the 56-bit key to 64-bits */
244 extend_key_56_to_64(key_56, key);
245
246 /* Set the key parity to odd */
247 Curl_des_set_odd_parity((unsigned char *) key, sizeof(key));
248
249 /* Import the key */
250 key_item.data = (unsigned char *)key;
251 key_item.len = sizeof(key);
252 symkey = PK11_ImportSymKey(slot, mech, PK11_OriginUnwrap, CKA_ENCRYPT,
253 &key_item, NULL);
254 if(!symkey)
255 goto fail;
256
257 /* Create the DES encryption context */
258 param = PK11_ParamFromIV(mech, /* no IV in ECB mode */ NULL);
259 if(!param)
260 goto fail;
261 ctx = PK11_CreateContextBySymKey(mech, CKA_ENCRYPT, symkey, param);
262 if(!ctx)
263 goto fail;
264
265 /* Perform the encryption */
266 if(SECSuccess == PK11_CipherOp(ctx, out, &out_len, /* outbuflen */ 8,
267 (unsigned char *)in, /* inbuflen */ 8)
268 && SECSuccess == PK11_Finalize(ctx))
269 rv = /* all OK */ TRUE;
270
271 fail:
272 /* cleanup */
273 if(ctx)
274 PK11_DestroyContext(ctx, PR_TRUE);
275 if(symkey)
276 PK11_FreeSymKey(symkey);
277 if(param)
278 SECITEM_FreeItem(param, PR_TRUE);
279 PK11_FreeSlot(slot);
280 return rv;
281 }
282
283 #elif defined(USE_MBEDTLS)
284
encrypt_des(const unsigned char * in,unsigned char * out,const unsigned char * key_56)285 static bool encrypt_des(const unsigned char *in, unsigned char *out,
286 const unsigned char *key_56)
287 {
288 mbedtls_des_context ctx;
289 char key[8];
290
291 /* Expand the 56-bit key to 64-bits */
292 extend_key_56_to_64(key_56, key);
293
294 /* Set the key parity to odd */
295 mbedtls_des_key_set_parity((unsigned char *) key);
296
297 /* Perform the encryption */
298 mbedtls_des_init(&ctx);
299 mbedtls_des_setkey_enc(&ctx, (unsigned char *) key);
300 return mbedtls_des_crypt_ecb(&ctx, in, out) == 0;
301 }
302
303 #elif defined(USE_DARWINSSL)
304
encrypt_des(const unsigned char * in,unsigned char * out,const unsigned char * key_56)305 static bool encrypt_des(const unsigned char *in, unsigned char *out,
306 const unsigned char *key_56)
307 {
308 char key[8];
309 size_t out_len;
310 CCCryptorStatus err;
311
312 /* Expand the 56-bit key to 64-bits */
313 extend_key_56_to_64(key_56, key);
314
315 /* Set the key parity to odd */
316 Curl_des_set_odd_parity((unsigned char *) key, sizeof(key));
317
318 /* Perform the encryption */
319 err = CCCrypt(kCCEncrypt, kCCAlgorithmDES, kCCOptionECBMode, key,
320 kCCKeySizeDES, NULL, in, 8 /* inbuflen */, out,
321 8 /* outbuflen */, &out_len);
322
323 return err == kCCSuccess;
324 }
325
326 #elif defined(USE_OS400CRYPTO)
327
encrypt_des(const unsigned char * in,unsigned char * out,const unsigned char * key_56)328 static bool encrypt_des(const unsigned char *in, unsigned char *out,
329 const unsigned char *key_56)
330 {
331 char key[8];
332 _CIPHER_Control_T ctl;
333
334 /* Setup the cipher control structure */
335 ctl.Func_ID = ENCRYPT_ONLY;
336 ctl.Data_Len = sizeof(key);
337
338 /* Expand the 56-bit key to 64-bits */
339 extend_key_56_to_64(key_56, ctl.Crypto_Key);
340
341 /* Set the key parity to odd */
342 Curl_des_set_odd_parity((unsigned char *) ctl.Crypto_Key, ctl.Data_Len);
343
344 /* Perform the encryption */
345 _CIPHER((_SPCPTR *) &out, &ctl, (_SPCPTR *) &in);
346
347 return TRUE;
348 }
349
350 #elif defined(USE_WIN32_CRYPTO)
351
encrypt_des(const unsigned char * in,unsigned char * out,const unsigned char * key_56)352 static bool encrypt_des(const unsigned char *in, unsigned char *out,
353 const unsigned char *key_56)
354 {
355 HCRYPTPROV hprov;
356 HCRYPTKEY hkey;
357 struct {
358 BLOBHEADER hdr;
359 unsigned int len;
360 char key[8];
361 } blob;
362 DWORD len = 8;
363
364 /* Acquire the crypto provider */
365 if(!CryptAcquireContext(&hprov, NULL, NULL, PROV_RSA_FULL,
366 CRYPT_VERIFYCONTEXT))
367 return FALSE;
368
369 /* Setup the key blob structure */
370 memset(&blob, 0, sizeof(blob));
371 blob.hdr.bType = PLAINTEXTKEYBLOB;
372 blob.hdr.bVersion = 2;
373 blob.hdr.aiKeyAlg = CALG_DES;
374 blob.len = sizeof(blob.key);
375
376 /* Expand the 56-bit key to 64-bits */
377 extend_key_56_to_64(key_56, blob.key);
378
379 /* Set the key parity to odd */
380 Curl_des_set_odd_parity((unsigned char *) blob.key, sizeof(blob.key));
381
382 /* Import the key */
383 if(!CryptImportKey(hprov, (BYTE *) &blob, sizeof(blob), 0, 0, &hkey)) {
384 CryptReleaseContext(hprov, 0);
385
386 return FALSE;
387 }
388
389 memcpy(out, in, 8);
390
391 /* Perform the encryption */
392 CryptEncrypt(hkey, 0, FALSE, 0, out, &len, len);
393
394 CryptDestroyKey(hkey);
395 CryptReleaseContext(hprov, 0);
396
397 return TRUE;
398 }
399
400 #endif /* defined(USE_WIN32_CRYPTO) */
401
402 /*
403 * takes a 21 byte array and treats it as 3 56-bit DES keys. The
404 * 8 byte plaintext is encrypted with each key and the resulting 24
405 * bytes are stored in the results array.
406 */
Curl_ntlm_core_lm_resp(const unsigned char * keys,const unsigned char * plaintext,unsigned char * results)407 void Curl_ntlm_core_lm_resp(const unsigned char *keys,
408 const unsigned char *plaintext,
409 unsigned char *results)
410 {
411 #ifdef USE_OPENSSL
412 DES_key_schedule ks;
413
414 setup_des_key(keys, DESKEY(ks));
415 DES_ecb_encrypt((DES_cblock*) plaintext, (DES_cblock*) results,
416 DESKEY(ks), DES_ENCRYPT);
417
418 setup_des_key(keys + 7, DESKEY(ks));
419 DES_ecb_encrypt((DES_cblock*) plaintext, (DES_cblock*) (results + 8),
420 DESKEY(ks), DES_ENCRYPT);
421
422 setup_des_key(keys + 14, DESKEY(ks));
423 DES_ecb_encrypt((DES_cblock*) plaintext, (DES_cblock*) (results + 16),
424 DESKEY(ks), DES_ENCRYPT);
425 #elif defined(USE_GNUTLS_NETTLE)
426 struct des_ctx des;
427 setup_des_key(keys, &des);
428 des_encrypt(&des, 8, results, plaintext);
429 setup_des_key(keys + 7, &des);
430 des_encrypt(&des, 8, results + 8, plaintext);
431 setup_des_key(keys + 14, &des);
432 des_encrypt(&des, 8, results + 16, plaintext);
433 #elif defined(USE_GNUTLS)
434 gcry_cipher_hd_t des;
435
436 gcry_cipher_open(&des, GCRY_CIPHER_DES, GCRY_CIPHER_MODE_ECB, 0);
437 setup_des_key(keys, &des);
438 gcry_cipher_encrypt(des, results, 8, plaintext, 8);
439 gcry_cipher_close(des);
440
441 gcry_cipher_open(&des, GCRY_CIPHER_DES, GCRY_CIPHER_MODE_ECB, 0);
442 setup_des_key(keys + 7, &des);
443 gcry_cipher_encrypt(des, results + 8, 8, plaintext, 8);
444 gcry_cipher_close(des);
445
446 gcry_cipher_open(&des, GCRY_CIPHER_DES, GCRY_CIPHER_MODE_ECB, 0);
447 setup_des_key(keys + 14, &des);
448 gcry_cipher_encrypt(des, results + 16, 8, plaintext, 8);
449 gcry_cipher_close(des);
450 #elif defined(USE_NSS) || defined(USE_MBEDTLS) || defined(USE_DARWINSSL) \
451 || defined(USE_OS400CRYPTO) || defined(USE_WIN32_CRYPTO)
452 encrypt_des(plaintext, results, keys);
453 encrypt_des(plaintext, results + 8, keys + 7);
454 encrypt_des(plaintext, results + 16, keys + 14);
455 #endif
456 }
457
458 /*
459 * Set up lanmanager hashed password
460 */
Curl_ntlm_core_mk_lm_hash(struct Curl_easy * data,const char * password,unsigned char * lmbuffer)461 CURLcode Curl_ntlm_core_mk_lm_hash(struct Curl_easy *data,
462 const char *password,
463 unsigned char *lmbuffer /* 21 bytes */)
464 {
465 CURLcode result;
466 unsigned char pw[14];
467 static const unsigned char magic[] = {
468 0x4B, 0x47, 0x53, 0x21, 0x40, 0x23, 0x24, 0x25 /* i.e. KGS!@#$% */
469 };
470 size_t len = CURLMIN(strlen(password), 14);
471
472 Curl_strntoupper((char *)pw, password, len);
473 memset(&pw[len], 0, 14 - len);
474
475 /*
476 * The LanManager hashed password needs to be created using the
477 * password in the network encoding not the host encoding.
478 */
479 result = Curl_convert_to_network(data, (char *)pw, 14);
480 if(result)
481 return result;
482
483 {
484 /* Create LanManager hashed password. */
485
486 #ifdef USE_OPENSSL
487 DES_key_schedule ks;
488
489 setup_des_key(pw, DESKEY(ks));
490 DES_ecb_encrypt((DES_cblock *)magic, (DES_cblock *)lmbuffer,
491 DESKEY(ks), DES_ENCRYPT);
492
493 setup_des_key(pw + 7, DESKEY(ks));
494 DES_ecb_encrypt((DES_cblock *)magic, (DES_cblock *)(lmbuffer + 8),
495 DESKEY(ks), DES_ENCRYPT);
496 #elif defined(USE_GNUTLS_NETTLE)
497 struct des_ctx des;
498 setup_des_key(pw, &des);
499 des_encrypt(&des, 8, lmbuffer, magic);
500 setup_des_key(pw + 7, &des);
501 des_encrypt(&des, 8, lmbuffer + 8, magic);
502 #elif defined(USE_GNUTLS)
503 gcry_cipher_hd_t des;
504
505 gcry_cipher_open(&des, GCRY_CIPHER_DES, GCRY_CIPHER_MODE_ECB, 0);
506 setup_des_key(pw, &des);
507 gcry_cipher_encrypt(des, lmbuffer, 8, magic, 8);
508 gcry_cipher_close(des);
509
510 gcry_cipher_open(&des, GCRY_CIPHER_DES, GCRY_CIPHER_MODE_ECB, 0);
511 setup_des_key(pw + 7, &des);
512 gcry_cipher_encrypt(des, lmbuffer + 8, 8, magic, 8);
513 gcry_cipher_close(des);
514 #elif defined(USE_NSS) || defined(USE_MBEDTLS) || defined(USE_DARWINSSL) \
515 || defined(USE_OS400CRYPTO) || defined(USE_WIN32_CRYPTO)
516 encrypt_des(magic, lmbuffer, pw);
517 encrypt_des(magic, lmbuffer + 8, pw + 7);
518 #endif
519
520 memset(lmbuffer + 16, 0, 21 - 16);
521 }
522
523 return CURLE_OK;
524 }
525
526 #ifdef USE_NTRESPONSES
ascii_to_unicode_le(unsigned char * dest,const char * src,size_t srclen)527 static void ascii_to_unicode_le(unsigned char *dest, const char *src,
528 size_t srclen)
529 {
530 size_t i;
531 for(i = 0; i < srclen; i++) {
532 dest[2 * i] = (unsigned char)src[i];
533 dest[2 * i + 1] = '\0';
534 }
535 }
536
537 #if defined(USE_NTLM_V2) && !defined(USE_WINDOWS_SSPI)
538
ascii_uppercase_to_unicode_le(unsigned char * dest,const char * src,size_t srclen)539 static void ascii_uppercase_to_unicode_le(unsigned char *dest,
540 const char *src, size_t srclen)
541 {
542 size_t i;
543 for(i = 0; i < srclen; i++) {
544 dest[2 * i] = (unsigned char)(Curl_raw_toupper(src[i]));
545 dest[2 * i + 1] = '\0';
546 }
547 }
548
549 #endif /* USE_NTLM_V2 && !USE_WINDOWS_SSPI */
550
551 /*
552 * Set up nt hashed passwords
553 * @unittest: 1600
554 */
Curl_ntlm_core_mk_nt_hash(struct Curl_easy * data,const char * password,unsigned char * ntbuffer)555 CURLcode Curl_ntlm_core_mk_nt_hash(struct Curl_easy *data,
556 const char *password,
557 unsigned char *ntbuffer /* 21 bytes */)
558 {
559 size_t len = strlen(password);
560 unsigned char *pw = len ? malloc(len * 2) : strdup("");
561 CURLcode result;
562 if(!pw)
563 return CURLE_OUT_OF_MEMORY;
564
565 ascii_to_unicode_le(pw, password, len);
566
567 /*
568 * The NT hashed password needs to be created using the password in the
569 * network encoding not the host encoding.
570 */
571 result = Curl_convert_to_network(data, (char *)pw, len * 2);
572 if(result)
573 return result;
574
575 {
576 /* Create NT hashed password. */
577 #ifdef USE_OPENSSL
578 MD4_CTX MD4pw;
579 MD4_Init(&MD4pw);
580 MD4_Update(&MD4pw, pw, 2 * len);
581 MD4_Final(ntbuffer, &MD4pw);
582 #elif defined(USE_GNUTLS_NETTLE)
583 struct md4_ctx MD4pw;
584 md4_init(&MD4pw);
585 md4_update(&MD4pw, (unsigned int)(2 * len), pw);
586 md4_digest(&MD4pw, MD4_DIGEST_SIZE, ntbuffer);
587 #elif defined(USE_GNUTLS)
588 gcry_md_hd_t MD4pw;
589 gcry_md_open(&MD4pw, GCRY_MD_MD4, 0);
590 gcry_md_write(MD4pw, pw, 2 * len);
591 memcpy(ntbuffer, gcry_md_read(MD4pw, 0), MD4_DIGEST_LENGTH);
592 gcry_md_close(MD4pw);
593 #elif defined(USE_NSS)
594 Curl_md4it(ntbuffer, pw, 2 * len);
595 #elif defined(USE_MBEDTLS)
596 #if defined(MBEDTLS_MD4_C)
597 mbedtls_md4(pw, 2 * len, ntbuffer);
598 #else
599 Curl_md4it(ntbuffer, pw, 2 * len);
600 #endif
601 #elif defined(USE_DARWINSSL)
602 (void)CC_MD4(pw, (CC_LONG)(2 * len), ntbuffer);
603 #elif defined(USE_OS400CRYPTO)
604 Curl_md4it(ntbuffer, pw, 2 * len);
605 #elif defined(USE_WIN32_CRYPTO)
606 HCRYPTPROV hprov;
607 if(CryptAcquireContext(&hprov, NULL, NULL, PROV_RSA_FULL,
608 CRYPT_VERIFYCONTEXT)) {
609 HCRYPTHASH hhash;
610 if(CryptCreateHash(hprov, CALG_MD4, 0, 0, &hhash)) {
611 DWORD length = 16;
612 CryptHashData(hhash, pw, (unsigned int)len * 2, 0);
613 CryptGetHashParam(hhash, HP_HASHVAL, ntbuffer, &length, 0);
614 CryptDestroyHash(hhash);
615 }
616 CryptReleaseContext(hprov, 0);
617 }
618 #endif
619
620 memset(ntbuffer + 16, 0, 21 - 16);
621 }
622
623 free(pw);
624
625 return CURLE_OK;
626 }
627
628 #if defined(USE_NTLM_V2) && !defined(USE_WINDOWS_SSPI)
629
630 /* This returns the HMAC MD5 digest */
Curl_hmac_md5(const unsigned char * key,unsigned int keylen,const unsigned char * data,unsigned int datalen,unsigned char * output)631 CURLcode Curl_hmac_md5(const unsigned char *key, unsigned int keylen,
632 const unsigned char *data, unsigned int datalen,
633 unsigned char *output)
634 {
635 HMAC_context *ctxt = Curl_HMAC_init(Curl_HMAC_MD5, key, keylen);
636
637 if(!ctxt)
638 return CURLE_OUT_OF_MEMORY;
639
640 /* Update the digest with the given challenge */
641 Curl_HMAC_update(ctxt, data, datalen);
642
643 /* Finalise the digest */
644 Curl_HMAC_final(ctxt, output);
645
646 return CURLE_OK;
647 }
648
649 #ifndef SIZE_T_MAX
650 /* some limits.h headers have this defined, some don't */
651 #if defined(SIZEOF_SIZE_T) && (SIZEOF_SIZE_T > 4)
652 #define SIZE_T_MAX 18446744073709551615U
653 #else
654 #define SIZE_T_MAX 4294967295U
655 #endif
656 #endif
657
658 /* This creates the NTLMv2 hash by using NTLM hash as the key and Unicode
659 * (uppercase UserName + Domain) as the data
660 */
Curl_ntlm_core_mk_ntlmv2_hash(const char * user,size_t userlen,const char * domain,size_t domlen,unsigned char * ntlmhash,unsigned char * ntlmv2hash)661 CURLcode Curl_ntlm_core_mk_ntlmv2_hash(const char *user, size_t userlen,
662 const char *domain, size_t domlen,
663 unsigned char *ntlmhash,
664 unsigned char *ntlmv2hash)
665 {
666 /* Unicode representation */
667 size_t identity_len;
668 unsigned char *identity;
669 CURLcode result = CURLE_OK;
670
671 /* we do the length checks below separately to avoid integer overflow risk
672 on extreme data lengths */
673 if((userlen > SIZE_T_MAX/2) ||
674 (domlen > SIZE_T_MAX/2) ||
675 ((userlen + domlen) > SIZE_T_MAX/2))
676 return CURLE_OUT_OF_MEMORY;
677
678 identity_len = (userlen + domlen) * 2;
679 identity = malloc(identity_len);
680
681 if(!identity)
682 return CURLE_OUT_OF_MEMORY;
683
684 ascii_uppercase_to_unicode_le(identity, user, userlen);
685 ascii_to_unicode_le(identity + (userlen << 1), domain, domlen);
686
687 result = Curl_hmac_md5(ntlmhash, 16, identity, curlx_uztoui(identity_len),
688 ntlmv2hash);
689
690 free(identity);
691
692 return result;
693 }
694
695 /*
696 * Curl_ntlm_core_mk_ntlmv2_resp()
697 *
698 * This creates the NTLMv2 response as set in the ntlm type-3 message.
699 *
700 * Parameters:
701 *
702 * ntlmv2hash [in] - The ntlmv2 hash (16 bytes)
703 * challenge_client [in] - The client nonce (8 bytes)
704 * ntlm [in] - The ntlm data struct being used to read TargetInfo
705 and Server challenge received in the type-2 message
706 * ntresp [out] - The address where a pointer to newly allocated
707 * memory holding the NTLMv2 response.
708 * ntresp_len [out] - The length of the output message.
709 *
710 * Returns CURLE_OK on success.
711 */
Curl_ntlm_core_mk_ntlmv2_resp(unsigned char * ntlmv2hash,unsigned char * challenge_client,struct ntlmdata * ntlm,unsigned char ** ntresp,unsigned int * ntresp_len)712 CURLcode Curl_ntlm_core_mk_ntlmv2_resp(unsigned char *ntlmv2hash,
713 unsigned char *challenge_client,
714 struct ntlmdata *ntlm,
715 unsigned char **ntresp,
716 unsigned int *ntresp_len)
717 {
718 /* NTLMv2 response structure :
719 ------------------------------------------------------------------------------
720 0 HMAC MD5 16 bytes
721 ------BLOB--------------------------------------------------------------------
722 16 Signature 0x01010000
723 20 Reserved long (0x00000000)
724 24 Timestamp LE, 64-bit signed value representing the number of
725 tenths of a microsecond since January 1, 1601.
726 32 Client Nonce 8 bytes
727 40 Unknown 4 bytes
728 44 Target Info N bytes (from the type-2 message)
729 44+N Unknown 4 bytes
730 ------------------------------------------------------------------------------
731 */
732
733 unsigned int len = 0;
734 unsigned char *ptr = NULL;
735 unsigned char hmac_output[NTLM_HMAC_MD5_LEN];
736 curl_off_t tw;
737
738 CURLcode result = CURLE_OK;
739
740 #if CURL_SIZEOF_CURL_OFF_T < 8
741 #error "this section needs 64bit support to work"
742 #endif
743
744 /* Calculate the timestamp */
745 #ifdef DEBUGBUILD
746 char *force_timestamp = getenv("CURL_FORCETIME");
747 if(force_timestamp)
748 tw = CURL_OFF_T_C(11644473600) * 10000000;
749 else
750 #endif
751 tw = ((curl_off_t)time(NULL) + CURL_OFF_T_C(11644473600)) * 10000000;
752
753 /* Calculate the response len */
754 len = NTLM_HMAC_MD5_LEN + NTLMv2_BLOB_LEN;
755
756 /* Allocate the response */
757 ptr = malloc(len);
758 if(!ptr)
759 return CURLE_OUT_OF_MEMORY;
760
761 memset(ptr, 0, len);
762
763 /* Create the BLOB structure */
764 snprintf((char *)ptr + NTLM_HMAC_MD5_LEN, NTLMv2_BLOB_LEN,
765 "%c%c%c%c" /* NTLMv2_BLOB_SIGNATURE */
766 "%c%c%c%c", /* Reserved = 0 */
767 NTLMv2_BLOB_SIGNATURE[0], NTLMv2_BLOB_SIGNATURE[1],
768 NTLMv2_BLOB_SIGNATURE[2], NTLMv2_BLOB_SIGNATURE[3],
769 0, 0, 0, 0);
770
771 Curl_write64_le(tw, ptr + 24);
772 memcpy(ptr + 32, challenge_client, 8);
773 memcpy(ptr + 44, ntlm->target_info, ntlm->target_info_len);
774
775 /* Concatenate the Type 2 challenge with the BLOB and do HMAC MD5 */
776 memcpy(ptr + 8, &ntlm->nonce[0], 8);
777 result = Curl_hmac_md5(ntlmv2hash, NTLM_HMAC_MD5_LEN, ptr + 8,
778 NTLMv2_BLOB_LEN + 8, hmac_output);
779 if(result) {
780 free(ptr);
781 return result;
782 }
783
784 /* Concatenate the HMAC MD5 output with the BLOB */
785 memcpy(ptr, hmac_output, NTLM_HMAC_MD5_LEN);
786
787 /* Return the response */
788 *ntresp = ptr;
789 *ntresp_len = len;
790
791 return result;
792 }
793
794 /*
795 * Curl_ntlm_core_mk_lmv2_resp()
796 *
797 * This creates the LMv2 response as used in the ntlm type-3 message.
798 *
799 * Parameters:
800 *
801 * ntlmv2hash [in] - The ntlmv2 hash (16 bytes)
802 * challenge_client [in] - The client nonce (8 bytes)
803 * challenge_client [in] - The server challenge (8 bytes)
804 * lmresp [out] - The LMv2 response (24 bytes)
805 *
806 * Returns CURLE_OK on success.
807 */
Curl_ntlm_core_mk_lmv2_resp(unsigned char * ntlmv2hash,unsigned char * challenge_client,unsigned char * challenge_server,unsigned char * lmresp)808 CURLcode Curl_ntlm_core_mk_lmv2_resp(unsigned char *ntlmv2hash,
809 unsigned char *challenge_client,
810 unsigned char *challenge_server,
811 unsigned char *lmresp)
812 {
813 unsigned char data[16];
814 unsigned char hmac_output[16];
815 CURLcode result = CURLE_OK;
816
817 memcpy(&data[0], challenge_server, 8);
818 memcpy(&data[8], challenge_client, 8);
819
820 result = Curl_hmac_md5(ntlmv2hash, 16, &data[0], 16, hmac_output);
821 if(result)
822 return result;
823
824 /* Concatenate the HMAC MD5 output with the client nonce */
825 memcpy(lmresp, hmac_output, 16);
826 memcpy(lmresp + 16, challenge_client, 8);
827
828 return result;
829 }
830
831 #endif /* USE_NTLM_V2 && !USE_WINDOWS_SSPI */
832
833 #endif /* USE_NTRESPONSES */
834
835 #endif /* !USE_WINDOWS_SSPI || USE_WIN32_CRYPTO */
836
837 #endif /* USE_NTLM */
838