]> Pileus Git - ~andy/linux/blob - fs/cifs/cifsencrypt.c
Merge branch 'nfs-for-3.1' of git://git.linux-nfs.org/projects/trondmy/linux-nfs
[~andy/linux] / fs / cifs / cifsencrypt.c
1 /*
2  *   fs/cifs/cifsencrypt.c
3  *
4  *   Copyright (C) International Business Machines  Corp., 2005,2006
5  *   Author(s): Steve French (sfrench@us.ibm.com)
6  *
7  *   This library is free software; you can redistribute it and/or modify
8  *   it under the terms of the GNU Lesser General Public License as published
9  *   by the Free Software Foundation; either version 2.1 of the License, or
10  *   (at your option) any later version.
11  *
12  *   This library is distributed in the hope that it will be useful,
13  *   but WITHOUT ANY WARRANTY; without even the implied warranty of
14  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See
15  *   the GNU Lesser General Public License for more details.
16  *
17  *   You should have received a copy of the GNU Lesser General Public License
18  *   along with this library; if not, write to the Free Software
19  *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
20  */
21
22 #include <linux/fs.h>
23 #include <linux/slab.h>
24 #include "cifspdu.h"
25 #include "cifsglob.h"
26 #include "cifs_debug.h"
27 #include "cifs_unicode.h"
28 #include "cifsproto.h"
29 #include "ntlmssp.h"
30 #include <linux/ctype.h>
31 #include <linux/random.h>
32
33 /*
34  * Calculate and return the CIFS signature based on the mac key and SMB PDU.
35  * The 16 byte signature must be allocated by the caller. Note we only use the
36  * 1st eight bytes and that the smb header signature field on input contains
37  * the sequence number before this function is called. Also, this function
38  * should be called with the server->srv_mutex held.
39  */
40 static int cifs_calculate_signature(const struct smb_hdr *cifs_pdu,
41                                 struct TCP_Server_Info *server, char *signature)
42 {
43         int rc;
44
45         if (cifs_pdu == NULL || signature == NULL || server == NULL)
46                 return -EINVAL;
47
48         if (!server->secmech.sdescmd5) {
49                 cERROR(1, "%s: Can't generate signature\n", __func__);
50                 return -1;
51         }
52
53         rc = crypto_shash_init(&server->secmech.sdescmd5->shash);
54         if (rc) {
55                 cERROR(1, "%s: Could not init md5\n", __func__);
56                 return rc;
57         }
58
59         rc = crypto_shash_update(&server->secmech.sdescmd5->shash,
60                 server->session_key.response, server->session_key.len);
61         if (rc) {
62                 cERROR(1, "%s: Could not update with response\n", __func__);
63                 return rc;
64         }
65
66         rc = crypto_shash_update(&server->secmech.sdescmd5->shash,
67                 cifs_pdu->Protocol, be32_to_cpu(cifs_pdu->smb_buf_length));
68         if (rc) {
69                 cERROR(1, "%s: Could not update with payload\n", __func__);
70                 return rc;
71         }
72
73         rc = crypto_shash_final(&server->secmech.sdescmd5->shash, signature);
74         if (rc)
75                 cERROR(1, "%s: Could not generate md5 hash\n", __func__);
76
77         return rc;
78 }
79
80 /* must be called with server->srv_mutex held */
81 int cifs_sign_smb(struct smb_hdr *cifs_pdu, struct TCP_Server_Info *server,
82                   __u32 *pexpected_response_sequence_number)
83 {
84         int rc = 0;
85         char smb_signature[20];
86
87         if ((cifs_pdu == NULL) || (server == NULL))
88                 return -EINVAL;
89
90         if ((cifs_pdu->Flags2 & SMBFLG2_SECURITY_SIGNATURE) == 0)
91                 return rc;
92
93         cifs_pdu->Signature.Sequence.SequenceNumber =
94                         cpu_to_le32(server->sequence_number);
95         cifs_pdu->Signature.Sequence.Reserved = 0;
96
97         *pexpected_response_sequence_number = server->sequence_number++;
98         server->sequence_number++;
99
100         rc = cifs_calculate_signature(cifs_pdu, server, smb_signature);
101         if (rc)
102                 memset(cifs_pdu->Signature.SecuritySignature, 0, 8);
103         else
104                 memcpy(cifs_pdu->Signature.SecuritySignature, smb_signature, 8);
105
106         return rc;
107 }
108
109 static int cifs_calc_signature2(const struct kvec *iov, int n_vec,
110                                 struct TCP_Server_Info *server, char *signature)
111 {
112         int i;
113         int rc;
114
115         if (iov == NULL || signature == NULL || server == NULL)
116                 return -EINVAL;
117
118         if (!server->secmech.sdescmd5) {
119                 cERROR(1, "%s: Can't generate signature\n", __func__);
120                 return -1;
121         }
122
123         rc = crypto_shash_init(&server->secmech.sdescmd5->shash);
124         if (rc) {
125                 cERROR(1, "%s: Could not init md5\n", __func__);
126                 return rc;
127         }
128
129         rc = crypto_shash_update(&server->secmech.sdescmd5->shash,
130                 server->session_key.response, server->session_key.len);
131         if (rc) {
132                 cERROR(1, "%s: Could not update with response\n", __func__);
133                 return rc;
134         }
135
136         for (i = 0; i < n_vec; i++) {
137                 if (iov[i].iov_len == 0)
138                         continue;
139                 if (iov[i].iov_base == NULL) {
140                         cERROR(1, "null iovec entry");
141                         return -EIO;
142                 }
143                 /* The first entry includes a length field (which does not get
144                    signed that occupies the first 4 bytes before the header */
145                 if (i == 0) {
146                         if (iov[0].iov_len <= 8) /* cmd field at offset 9 */
147                                 break; /* nothing to sign or corrupt header */
148                         rc =
149                         crypto_shash_update(&server->secmech.sdescmd5->shash,
150                                 iov[i].iov_base + 4, iov[i].iov_len - 4);
151                 } else {
152                         rc =
153                         crypto_shash_update(&server->secmech.sdescmd5->shash,
154                                 iov[i].iov_base, iov[i].iov_len);
155                 }
156                 if (rc) {
157                         cERROR(1, "%s: Could not update with payload\n",
158                                                         __func__);
159                         return rc;
160                 }
161         }
162
163         rc = crypto_shash_final(&server->secmech.sdescmd5->shash, signature);
164         if (rc)
165                 cERROR(1, "%s: Could not generate md5 hash\n", __func__);
166
167         return rc;
168 }
169
170 /* must be called with server->srv_mutex held */
171 int cifs_sign_smb2(struct kvec *iov, int n_vec, struct TCP_Server_Info *server,
172                    __u32 *pexpected_response_sequence_number)
173 {
174         int rc = 0;
175         char smb_signature[20];
176         struct smb_hdr *cifs_pdu = iov[0].iov_base;
177
178         if ((cifs_pdu == NULL) || (server == NULL))
179                 return -EINVAL;
180
181         if ((cifs_pdu->Flags2 & SMBFLG2_SECURITY_SIGNATURE) == 0)
182                 return rc;
183
184         cifs_pdu->Signature.Sequence.SequenceNumber =
185                                 cpu_to_le32(server->sequence_number);
186         cifs_pdu->Signature.Sequence.Reserved = 0;
187
188         *pexpected_response_sequence_number = server->sequence_number++;
189         server->sequence_number++;
190
191         rc = cifs_calc_signature2(iov, n_vec, server, smb_signature);
192         if (rc)
193                 memset(cifs_pdu->Signature.SecuritySignature, 0, 8);
194         else
195                 memcpy(cifs_pdu->Signature.SecuritySignature, smb_signature, 8);
196
197         return rc;
198 }
199
200 int cifs_verify_signature(struct smb_hdr *cifs_pdu,
201                           struct TCP_Server_Info *server,
202                           __u32 expected_sequence_number)
203 {
204         unsigned int rc;
205         char server_response_sig[8];
206         char what_we_think_sig_should_be[20];
207
208         if (cifs_pdu == NULL || server == NULL)
209                 return -EINVAL;
210
211         if (!server->session_estab)
212                 return 0;
213
214         if (cifs_pdu->Command == SMB_COM_LOCKING_ANDX) {
215                 struct smb_com_lock_req *pSMB =
216                         (struct smb_com_lock_req *)cifs_pdu;
217             if (pSMB->LockType & LOCKING_ANDX_OPLOCK_RELEASE)
218                         return 0;
219         }
220
221         /* BB what if signatures are supposed to be on for session but
222            server does not send one? BB */
223
224         /* Do not need to verify session setups with signature "BSRSPYL "  */
225         if (memcmp(cifs_pdu->Signature.SecuritySignature, "BSRSPYL ", 8) == 0)
226                 cFYI(1, "dummy signature received for smb command 0x%x",
227                         cifs_pdu->Command);
228
229         /* save off the origiginal signature so we can modify the smb and check
230                 its signature against what the server sent */
231         memcpy(server_response_sig, cifs_pdu->Signature.SecuritySignature, 8);
232
233         cifs_pdu->Signature.Sequence.SequenceNumber =
234                                         cpu_to_le32(expected_sequence_number);
235         cifs_pdu->Signature.Sequence.Reserved = 0;
236
237         mutex_lock(&server->srv_mutex);
238         rc = cifs_calculate_signature(cifs_pdu, server,
239                 what_we_think_sig_should_be);
240         mutex_unlock(&server->srv_mutex);
241
242         if (rc)
243                 return rc;
244
245 /*      cifs_dump_mem("what we think it should be: ",
246                       what_we_think_sig_should_be, 16); */
247
248         if (memcmp(server_response_sig, what_we_think_sig_should_be, 8))
249                 return -EACCES;
250         else
251                 return 0;
252
253 }
254
255 /* first calculate 24 bytes ntlm response and then 16 byte session key */
256 int setup_ntlm_response(struct cifs_ses *ses)
257 {
258         int rc = 0;
259         unsigned int temp_len = CIFS_SESS_KEY_SIZE + CIFS_AUTH_RESP_SIZE;
260         char temp_key[CIFS_SESS_KEY_SIZE];
261
262         if (!ses)
263                 return -EINVAL;
264
265         ses->auth_key.response = kmalloc(temp_len, GFP_KERNEL);
266         if (!ses->auth_key.response) {
267                 cERROR(1, "NTLM can't allocate (%u bytes) memory", temp_len);
268                 return -ENOMEM;
269         }
270         ses->auth_key.len = temp_len;
271
272         rc = SMBNTencrypt(ses->password, ses->server->cryptkey,
273                         ses->auth_key.response + CIFS_SESS_KEY_SIZE);
274         if (rc) {
275                 cFYI(1, "%s Can't generate NTLM response, error: %d",
276                         __func__, rc);
277                 return rc;
278         }
279
280         rc = E_md4hash(ses->password, temp_key);
281         if (rc) {
282                 cFYI(1, "%s Can't generate NT hash, error: %d", __func__, rc);
283                 return rc;
284         }
285
286         rc = mdfour(ses->auth_key.response, temp_key, CIFS_SESS_KEY_SIZE);
287         if (rc)
288                 cFYI(1, "%s Can't generate NTLM session key, error: %d",
289                         __func__, rc);
290
291         return rc;
292 }
293
294 #ifdef CONFIG_CIFS_WEAK_PW_HASH
295 int calc_lanman_hash(const char *password, const char *cryptkey, bool encrypt,
296                         char *lnm_session_key)
297 {
298         int i;
299         int rc;
300         char password_with_pad[CIFS_ENCPWD_SIZE];
301
302         memset(password_with_pad, 0, CIFS_ENCPWD_SIZE);
303         if (password)
304                 strncpy(password_with_pad, password, CIFS_ENCPWD_SIZE);
305
306         if (!encrypt && global_secflags & CIFSSEC_MAY_PLNTXT) {
307                 memset(lnm_session_key, 0, CIFS_SESS_KEY_SIZE);
308                 memcpy(lnm_session_key, password_with_pad,
309                         CIFS_ENCPWD_SIZE);
310                 return 0;
311         }
312
313         /* calculate old style session key */
314         /* calling toupper is less broken than repeatedly
315         calling nls_toupper would be since that will never
316         work for UTF8, but neither handles multibyte code pages
317         but the only alternative would be converting to UCS-16 (Unicode)
318         (using a routine something like UniStrupr) then
319         uppercasing and then converting back from Unicode - which
320         would only worth doing it if we knew it were utf8. Basically
321         utf8 and other multibyte codepages each need their own strupper
322         function since a byte at a time will ont work. */
323
324         for (i = 0; i < CIFS_ENCPWD_SIZE; i++)
325                 password_with_pad[i] = toupper(password_with_pad[i]);
326
327         rc = SMBencrypt(password_with_pad, cryptkey, lnm_session_key);
328
329         return rc;
330 }
331 #endif /* CIFS_WEAK_PW_HASH */
332
333 /* Build a proper attribute value/target info pairs blob.
334  * Fill in netbios and dns domain name and workstation name
335  * and client time (total five av pairs and + one end of fields indicator.
336  * Allocate domain name which gets freed when session struct is deallocated.
337  */
338 static int
339 build_avpair_blob(struct cifs_ses *ses, const struct nls_table *nls_cp)
340 {
341         unsigned int dlen;
342         unsigned int wlen;
343         unsigned int size = 6 * sizeof(struct ntlmssp2_name);
344         __le64  curtime;
345         char *defdmname = "WORKGROUP";
346         unsigned char *blobptr;
347         struct ntlmssp2_name *attrptr;
348
349         if (!ses->domainName) {
350                 ses->domainName = kstrdup(defdmname, GFP_KERNEL);
351                 if (!ses->domainName)
352                         return -ENOMEM;
353         }
354
355         dlen = strlen(ses->domainName);
356         wlen = strlen(ses->server->hostname);
357
358         /* The length of this blob is a size which is
359          * six times the size of a structure which holds name/size +
360          * two times the unicode length of a domain name +
361          * two times the unicode length of a server name +
362          * size of a timestamp (which is 8 bytes).
363          */
364         ses->auth_key.len = size + 2 * (2 * dlen) + 2 * (2 * wlen) + 8;
365         ses->auth_key.response = kzalloc(ses->auth_key.len, GFP_KERNEL);
366         if (!ses->auth_key.response) {
367                 ses->auth_key.len = 0;
368                 cERROR(1, "Challenge target info allocation failure");
369                 return -ENOMEM;
370         }
371
372         blobptr = ses->auth_key.response;
373         attrptr = (struct ntlmssp2_name *) blobptr;
374
375         attrptr->type = cpu_to_le16(NTLMSSP_AV_NB_DOMAIN_NAME);
376         attrptr->length = cpu_to_le16(2 * dlen);
377         blobptr = (unsigned char *)attrptr + sizeof(struct ntlmssp2_name);
378         cifs_strtoUCS((__le16 *)blobptr, ses->domainName, dlen, nls_cp);
379
380         blobptr += 2 * dlen;
381         attrptr = (struct ntlmssp2_name *) blobptr;
382
383         attrptr->type = cpu_to_le16(NTLMSSP_AV_NB_COMPUTER_NAME);
384         attrptr->length = cpu_to_le16(2 * wlen);
385         blobptr = (unsigned char *)attrptr + sizeof(struct ntlmssp2_name);
386         cifs_strtoUCS((__le16 *)blobptr, ses->server->hostname, wlen, nls_cp);
387
388         blobptr += 2 * wlen;
389         attrptr = (struct ntlmssp2_name *) blobptr;
390
391         attrptr->type = cpu_to_le16(NTLMSSP_AV_DNS_DOMAIN_NAME);
392         attrptr->length = cpu_to_le16(2 * dlen);
393         blobptr = (unsigned char *)attrptr + sizeof(struct ntlmssp2_name);
394         cifs_strtoUCS((__le16 *)blobptr, ses->domainName, dlen, nls_cp);
395
396         blobptr += 2 * dlen;
397         attrptr = (struct ntlmssp2_name *) blobptr;
398
399         attrptr->type = cpu_to_le16(NTLMSSP_AV_DNS_COMPUTER_NAME);
400         attrptr->length = cpu_to_le16(2 * wlen);
401         blobptr = (unsigned char *)attrptr + sizeof(struct ntlmssp2_name);
402         cifs_strtoUCS((__le16 *)blobptr, ses->server->hostname, wlen, nls_cp);
403
404         blobptr += 2 * wlen;
405         attrptr = (struct ntlmssp2_name *) blobptr;
406
407         attrptr->type = cpu_to_le16(NTLMSSP_AV_TIMESTAMP);
408         attrptr->length = cpu_to_le16(sizeof(__le64));
409         blobptr = (unsigned char *)attrptr + sizeof(struct ntlmssp2_name);
410         curtime = cpu_to_le64(cifs_UnixTimeToNT(CURRENT_TIME));
411         memcpy(blobptr, &curtime, sizeof(__le64));
412
413         return 0;
414 }
415
416 /* Server has provided av pairs/target info in the type 2 challenge
417  * packet and we have plucked it and stored within smb session.
418  * We parse that blob here to find netbios domain name to be used
419  * as part of ntlmv2 authentication (in Target String), if not already
420  * specified on the command line.
421  * If this function returns without any error but without fetching
422  * domain name, authentication may fail against some server but
423  * may not fail against other (those who are not very particular
424  * about target string i.e. for some, just user name might suffice.
425  */
426 static int
427 find_domain_name(struct cifs_ses *ses, const struct nls_table *nls_cp)
428 {
429         unsigned int attrsize;
430         unsigned int type;
431         unsigned int onesize = sizeof(struct ntlmssp2_name);
432         unsigned char *blobptr;
433         unsigned char *blobend;
434         struct ntlmssp2_name *attrptr;
435
436         if (!ses->auth_key.len || !ses->auth_key.response)
437                 return 0;
438
439         blobptr = ses->auth_key.response;
440         blobend = blobptr + ses->auth_key.len;
441
442         while (blobptr + onesize < blobend) {
443                 attrptr = (struct ntlmssp2_name *) blobptr;
444                 type = le16_to_cpu(attrptr->type);
445                 if (type == NTLMSSP_AV_EOL)
446                         break;
447                 blobptr += 2; /* advance attr type */
448                 attrsize = le16_to_cpu(attrptr->length);
449                 blobptr += 2; /* advance attr size */
450                 if (blobptr + attrsize > blobend)
451                         break;
452                 if (type == NTLMSSP_AV_NB_DOMAIN_NAME) {
453                         if (!attrsize)
454                                 break;
455                         if (!ses->domainName) {
456                                 ses->domainName =
457                                         kmalloc(attrsize + 1, GFP_KERNEL);
458                                 if (!ses->domainName)
459                                                 return -ENOMEM;
460                                 cifs_from_ucs2(ses->domainName,
461                                         (__le16 *)blobptr, attrsize, attrsize,
462                                         nls_cp, false);
463                                 break;
464                         }
465                 }
466                 blobptr += attrsize; /* advance attr  value */
467         }
468
469         return 0;
470 }
471
472 static int calc_ntlmv2_hash(struct cifs_ses *ses, char *ntlmv2_hash,
473                             const struct nls_table *nls_cp)
474 {
475         int rc = 0;
476         int len;
477         char nt_hash[CIFS_NTHASH_SIZE];
478         wchar_t *user;
479         wchar_t *domain;
480         wchar_t *server;
481
482         if (!ses->server->secmech.sdeschmacmd5) {
483                 cERROR(1, "calc_ntlmv2_hash: can't generate ntlmv2 hash\n");
484                 return -1;
485         }
486
487         /* calculate md4 hash of password */
488         E_md4hash(ses->password, nt_hash);
489
490         rc = crypto_shash_setkey(ses->server->secmech.hmacmd5, nt_hash,
491                                 CIFS_NTHASH_SIZE);
492         if (rc) {
493                 cERROR(1, "%s: Could not set NT Hash as a key", __func__);
494                 return rc;
495         }
496
497         rc = crypto_shash_init(&ses->server->secmech.sdeschmacmd5->shash);
498         if (rc) {
499                 cERROR(1, "calc_ntlmv2_hash: could not init hmacmd5\n");
500                 return rc;
501         }
502
503         /* convert ses->user_name to unicode and uppercase */
504         len = strlen(ses->user_name);
505         user = kmalloc(2 + (len * 2), GFP_KERNEL);
506         if (user == NULL) {
507                 cERROR(1, "calc_ntlmv2_hash: user mem alloc failure\n");
508                 rc = -ENOMEM;
509                 return rc;
510         }
511         len = cifs_strtoUCS((__le16 *)user, ses->user_name, len, nls_cp);
512         UniStrupr(user);
513
514         rc = crypto_shash_update(&ses->server->secmech.sdeschmacmd5->shash,
515                                 (char *)user, 2 * len);
516         kfree(user);
517         if (rc) {
518                 cERROR(1, "%s: Could not update with user\n", __func__);
519                 return rc;
520         }
521
522         /* convert ses->domainName to unicode and uppercase */
523         if (ses->domainName) {
524                 len = strlen(ses->domainName);
525
526                 domain = kmalloc(2 + (len * 2), GFP_KERNEL);
527                 if (domain == NULL) {
528                         cERROR(1, "calc_ntlmv2_hash: domain mem alloc failure");
529                         rc = -ENOMEM;
530                         return rc;
531                 }
532                 len = cifs_strtoUCS((__le16 *)domain, ses->domainName, len,
533                                         nls_cp);
534                 rc =
535                 crypto_shash_update(&ses->server->secmech.sdeschmacmd5->shash,
536                                         (char *)domain, 2 * len);
537                 kfree(domain);
538                 if (rc) {
539                         cERROR(1, "%s: Could not update with domain\n",
540                                                                 __func__);
541                         return rc;
542                 }
543         } else if (ses->serverName) {
544                 len = strlen(ses->serverName);
545
546                 server = kmalloc(2 + (len * 2), GFP_KERNEL);
547                 if (server == NULL) {
548                         cERROR(1, "calc_ntlmv2_hash: server mem alloc failure");
549                         rc = -ENOMEM;
550                         return rc;
551                 }
552                 len = cifs_strtoUCS((__le16 *)server, ses->serverName, len,
553                                         nls_cp);
554                 rc =
555                 crypto_shash_update(&ses->server->secmech.sdeschmacmd5->shash,
556                                         (char *)server, 2 * len);
557                 kfree(server);
558                 if (rc) {
559                         cERROR(1, "%s: Could not update with server\n",
560                                                                 __func__);
561                         return rc;
562                 }
563         }
564
565         rc = crypto_shash_final(&ses->server->secmech.sdeschmacmd5->shash,
566                                         ntlmv2_hash);
567         if (rc)
568                 cERROR(1, "%s: Could not generate md5 hash\n", __func__);
569
570         return rc;
571 }
572
573 static int
574 CalcNTLMv2_response(const struct cifs_ses *ses, char *ntlmv2_hash)
575 {
576         int rc;
577         unsigned int offset = CIFS_SESS_KEY_SIZE + 8;
578
579         if (!ses->server->secmech.sdeschmacmd5) {
580                 cERROR(1, "calc_ntlmv2_hash: can't generate ntlmv2 hash\n");
581                 return -1;
582         }
583
584         rc = crypto_shash_setkey(ses->server->secmech.hmacmd5,
585                                 ntlmv2_hash, CIFS_HMAC_MD5_HASH_SIZE);
586         if (rc) {
587                 cERROR(1, "%s: Could not set NTLMV2 Hash as a key", __func__);
588                 return rc;
589         }
590
591         rc = crypto_shash_init(&ses->server->secmech.sdeschmacmd5->shash);
592         if (rc) {
593                 cERROR(1, "CalcNTLMv2_response: could not init hmacmd5");
594                 return rc;
595         }
596
597         if (ses->server->secType == RawNTLMSSP)
598                 memcpy(ses->auth_key.response + offset,
599                         ses->ntlmssp->cryptkey, CIFS_SERVER_CHALLENGE_SIZE);
600         else
601                 memcpy(ses->auth_key.response + offset,
602                         ses->server->cryptkey, CIFS_SERVER_CHALLENGE_SIZE);
603         rc = crypto_shash_update(&ses->server->secmech.sdeschmacmd5->shash,
604                 ses->auth_key.response + offset, ses->auth_key.len - offset);
605         if (rc) {
606                 cERROR(1, "%s: Could not update with response\n", __func__);
607                 return rc;
608         }
609
610         rc = crypto_shash_final(&ses->server->secmech.sdeschmacmd5->shash,
611                 ses->auth_key.response + CIFS_SESS_KEY_SIZE);
612         if (rc)
613                 cERROR(1, "%s: Could not generate md5 hash\n", __func__);
614
615         return rc;
616 }
617
618
619 int
620 setup_ntlmv2_rsp(struct cifs_ses *ses, const struct nls_table *nls_cp)
621 {
622         int rc;
623         int baselen;
624         unsigned int tilen;
625         struct ntlmv2_resp *buf;
626         char ntlmv2_hash[16];
627         unsigned char *tiblob = NULL; /* target info blob */
628
629         if (ses->server->secType == RawNTLMSSP) {
630                 if (!ses->domainName) {
631                         rc = find_domain_name(ses, nls_cp);
632                         if (rc) {
633                                 cERROR(1, "error %d finding domain name", rc);
634                                 goto setup_ntlmv2_rsp_ret;
635                         }
636                 }
637         } else {
638                 rc = build_avpair_blob(ses, nls_cp);
639                 if (rc) {
640                         cERROR(1, "error %d building av pair blob", rc);
641                         goto setup_ntlmv2_rsp_ret;
642                 }
643         }
644
645         baselen = CIFS_SESS_KEY_SIZE + sizeof(struct ntlmv2_resp);
646         tilen = ses->auth_key.len;
647         tiblob = ses->auth_key.response;
648
649         ses->auth_key.response = kmalloc(baselen + tilen, GFP_KERNEL);
650         if (!ses->auth_key.response) {
651                 rc = ENOMEM;
652                 ses->auth_key.len = 0;
653                 cERROR(1, "%s: Can't allocate auth blob", __func__);
654                 goto setup_ntlmv2_rsp_ret;
655         }
656         ses->auth_key.len += baselen;
657
658         buf = (struct ntlmv2_resp *)
659                         (ses->auth_key.response + CIFS_SESS_KEY_SIZE);
660         buf->blob_signature = cpu_to_le32(0x00000101);
661         buf->reserved = 0;
662         buf->time = cpu_to_le64(cifs_UnixTimeToNT(CURRENT_TIME));
663         get_random_bytes(&buf->client_chal, sizeof(buf->client_chal));
664         buf->reserved2 = 0;
665
666         memcpy(ses->auth_key.response + baselen, tiblob, tilen);
667
668         /* calculate ntlmv2_hash */
669         rc = calc_ntlmv2_hash(ses, ntlmv2_hash, nls_cp);
670         if (rc) {
671                 cERROR(1, "could not get v2 hash rc %d", rc);
672                 goto setup_ntlmv2_rsp_ret;
673         }
674
675         /* calculate first part of the client response (CR1) */
676         rc = CalcNTLMv2_response(ses, ntlmv2_hash);
677         if (rc) {
678                 cERROR(1, "Could not calculate CR1  rc: %d", rc);
679                 goto setup_ntlmv2_rsp_ret;
680         }
681
682         /* now calculate the session key for NTLMv2 */
683         rc = crypto_shash_setkey(ses->server->secmech.hmacmd5,
684                 ntlmv2_hash, CIFS_HMAC_MD5_HASH_SIZE);
685         if (rc) {
686                 cERROR(1, "%s: Could not set NTLMV2 Hash as a key", __func__);
687                 goto setup_ntlmv2_rsp_ret;
688         }
689
690         rc = crypto_shash_init(&ses->server->secmech.sdeschmacmd5->shash);
691         if (rc) {
692                 cERROR(1, "%s: Could not init hmacmd5\n", __func__);
693                 goto setup_ntlmv2_rsp_ret;
694         }
695
696         rc = crypto_shash_update(&ses->server->secmech.sdeschmacmd5->shash,
697                 ses->auth_key.response + CIFS_SESS_KEY_SIZE,
698                 CIFS_HMAC_MD5_HASH_SIZE);
699         if (rc) {
700                 cERROR(1, "%s: Could not update with response\n", __func__);
701                 goto setup_ntlmv2_rsp_ret;
702         }
703
704         rc = crypto_shash_final(&ses->server->secmech.sdeschmacmd5->shash,
705                 ses->auth_key.response);
706         if (rc)
707                 cERROR(1, "%s: Could not generate md5 hash\n", __func__);
708
709 setup_ntlmv2_rsp_ret:
710         kfree(tiblob);
711
712         return rc;
713 }
714
715 int
716 calc_seckey(struct cifs_ses *ses)
717 {
718         int rc;
719         struct crypto_blkcipher *tfm_arc4;
720         struct scatterlist sgin, sgout;
721         struct blkcipher_desc desc;
722         unsigned char sec_key[CIFS_SESS_KEY_SIZE]; /* a nonce */
723
724         get_random_bytes(sec_key, CIFS_SESS_KEY_SIZE);
725
726         tfm_arc4 = crypto_alloc_blkcipher("ecb(arc4)", 0, CRYPTO_ALG_ASYNC);
727         if (IS_ERR(tfm_arc4)) {
728                 rc = PTR_ERR(tfm_arc4);
729                 cERROR(1, "could not allocate crypto API arc4\n");
730                 return rc;
731         }
732
733         desc.tfm = tfm_arc4;
734
735         rc = crypto_blkcipher_setkey(tfm_arc4, ses->auth_key.response,
736                                         CIFS_SESS_KEY_SIZE);
737         if (rc) {
738                 cERROR(1, "%s: Could not set response as a key", __func__);
739                 return rc;
740         }
741
742         sg_init_one(&sgin, sec_key, CIFS_SESS_KEY_SIZE);
743         sg_init_one(&sgout, ses->ntlmssp->ciphertext, CIFS_CPHTXT_SIZE);
744
745         rc = crypto_blkcipher_encrypt(&desc, &sgout, &sgin, CIFS_CPHTXT_SIZE);
746         if (rc) {
747                 cERROR(1, "could not encrypt session key rc: %d\n", rc);
748                 crypto_free_blkcipher(tfm_arc4);
749                 return rc;
750         }
751
752         /* make secondary_key/nonce as session key */
753         memcpy(ses->auth_key.response, sec_key, CIFS_SESS_KEY_SIZE);
754         /* and make len as that of session key only */
755         ses->auth_key.len = CIFS_SESS_KEY_SIZE;
756
757         crypto_free_blkcipher(tfm_arc4);
758
759         return rc;
760 }
761
762 void
763 cifs_crypto_shash_release(struct TCP_Server_Info *server)
764 {
765         if (server->secmech.md5)
766                 crypto_free_shash(server->secmech.md5);
767
768         if (server->secmech.hmacmd5)
769                 crypto_free_shash(server->secmech.hmacmd5);
770
771         kfree(server->secmech.sdeschmacmd5);
772
773         kfree(server->secmech.sdescmd5);
774 }
775
776 int
777 cifs_crypto_shash_allocate(struct TCP_Server_Info *server)
778 {
779         int rc;
780         unsigned int size;
781
782         server->secmech.hmacmd5 = crypto_alloc_shash("hmac(md5)", 0, 0);
783         if (IS_ERR(server->secmech.hmacmd5)) {
784                 cERROR(1, "could not allocate crypto hmacmd5\n");
785                 return PTR_ERR(server->secmech.hmacmd5);
786         }
787
788         server->secmech.md5 = crypto_alloc_shash("md5", 0, 0);
789         if (IS_ERR(server->secmech.md5)) {
790                 cERROR(1, "could not allocate crypto md5\n");
791                 rc = PTR_ERR(server->secmech.md5);
792                 goto crypto_allocate_md5_fail;
793         }
794
795         size = sizeof(struct shash_desc) +
796                         crypto_shash_descsize(server->secmech.hmacmd5);
797         server->secmech.sdeschmacmd5 = kmalloc(size, GFP_KERNEL);
798         if (!server->secmech.sdeschmacmd5) {
799                 cERROR(1, "cifs_crypto_shash_allocate: can't alloc hmacmd5\n");
800                 rc = -ENOMEM;
801                 goto crypto_allocate_hmacmd5_sdesc_fail;
802         }
803         server->secmech.sdeschmacmd5->shash.tfm = server->secmech.hmacmd5;
804         server->secmech.sdeschmacmd5->shash.flags = 0x0;
805
806
807         size = sizeof(struct shash_desc) +
808                         crypto_shash_descsize(server->secmech.md5);
809         server->secmech.sdescmd5 = kmalloc(size, GFP_KERNEL);
810         if (!server->secmech.sdescmd5) {
811                 cERROR(1, "cifs_crypto_shash_allocate: can't alloc md5\n");
812                 rc = -ENOMEM;
813                 goto crypto_allocate_md5_sdesc_fail;
814         }
815         server->secmech.sdescmd5->shash.tfm = server->secmech.md5;
816         server->secmech.sdescmd5->shash.flags = 0x0;
817
818         return 0;
819
820 crypto_allocate_md5_sdesc_fail:
821         kfree(server->secmech.sdeschmacmd5);
822
823 crypto_allocate_hmacmd5_sdesc_fail:
824         crypto_free_shash(server->secmech.md5);
825
826 crypto_allocate_md5_fail:
827         crypto_free_shash(server->secmech.hmacmd5);
828
829         return rc;
830 }