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