Merge branches 'acpi-scan', 'acpi-resource', 'acpi-apei', 'acpi-extlog' and 'acpi...
[sfrench/cifs-2.6.git] / fs / cifs / cifsencrypt.c
1 // SPDX-License-Identifier: LGPL-2.1
2 /*
3  *
4  *   Encryption and hashing operations relating to NTLM, NTLMv2.  See MS-NLMP
5  *   for more detailed information
6  *
7  *   Copyright (C) International Business Machines  Corp., 2005,2013
8  *   Author(s): Steve French (sfrench@us.ibm.com)
9  *
10  */
11
12 #include <linux/fs.h>
13 #include <linux/slab.h>
14 #include "cifspdu.h"
15 #include "cifsglob.h"
16 #include "cifs_debug.h"
17 #include "cifs_unicode.h"
18 #include "cifsproto.h"
19 #include "ntlmssp.h"
20 #include <linux/ctype.h>
21 #include <linux/random.h>
22 #include <linux/highmem.h>
23 #include <linux/fips.h>
24 #include "../smbfs_common/arc4.h"
25 #include <crypto/aead.h>
26
27 int __cifs_calc_signature(struct smb_rqst *rqst,
28                         struct TCP_Server_Info *server, char *signature,
29                         struct shash_desc *shash)
30 {
31         int i;
32         int rc;
33         struct kvec *iov = rqst->rq_iov;
34         int n_vec = rqst->rq_nvec;
35
36         /* iov[0] is actual data and not the rfc1002 length for SMB2+ */
37         if (!is_smb1(server)) {
38                 if (iov[0].iov_len <= 4)
39                         return -EIO;
40                 i = 0;
41         } else {
42                 if (n_vec < 2 || iov[0].iov_len != 4)
43                         return -EIO;
44                 i = 1; /* skip rfc1002 length */
45         }
46
47         for (; i < n_vec; i++) {
48                 if (iov[i].iov_len == 0)
49                         continue;
50                 if (iov[i].iov_base == NULL) {
51                         cifs_dbg(VFS, "null iovec entry\n");
52                         return -EIO;
53                 }
54
55                 rc = crypto_shash_update(shash,
56                                          iov[i].iov_base, iov[i].iov_len);
57                 if (rc) {
58                         cifs_dbg(VFS, "%s: Could not update with payload\n",
59                                  __func__);
60                         return rc;
61                 }
62         }
63
64         /* now hash over the rq_pages array */
65         for (i = 0; i < rqst->rq_npages; i++) {
66                 void *kaddr;
67                 unsigned int len, offset;
68
69                 rqst_page_get_length(rqst, i, &len, &offset);
70
71                 kaddr = (char *) kmap(rqst->rq_pages[i]) + offset;
72
73                 rc = crypto_shash_update(shash, kaddr, len);
74                 if (rc) {
75                         cifs_dbg(VFS, "%s: Could not update with payload\n",
76                                  __func__);
77                         kunmap(rqst->rq_pages[i]);
78                         return rc;
79                 }
80
81                 kunmap(rqst->rq_pages[i]);
82         }
83
84         rc = crypto_shash_final(shash, signature);
85         if (rc)
86                 cifs_dbg(VFS, "%s: Could not generate hash\n", __func__);
87
88         return rc;
89 }
90
91 /*
92  * Calculate and return the CIFS signature based on the mac key and SMB PDU.
93  * The 16 byte signature must be allocated by the caller. Note we only use the
94  * 1st eight bytes and that the smb header signature field on input contains
95  * the sequence number before this function is called. Also, this function
96  * should be called with the server->srv_mutex held.
97  */
98 static int cifs_calc_signature(struct smb_rqst *rqst,
99                         struct TCP_Server_Info *server, char *signature)
100 {
101         int rc;
102
103         if (!rqst->rq_iov || !signature || !server)
104                 return -EINVAL;
105
106         rc = cifs_alloc_hash("md5", &server->secmech.md5);
107         if (rc)
108                 return -1;
109
110         rc = crypto_shash_init(server->secmech.md5);
111         if (rc) {
112                 cifs_dbg(VFS, "%s: Could not init md5\n", __func__);
113                 return rc;
114         }
115
116         rc = crypto_shash_update(server->secmech.md5,
117                 server->session_key.response, server->session_key.len);
118         if (rc) {
119                 cifs_dbg(VFS, "%s: Could not update with response\n", __func__);
120                 return rc;
121         }
122
123         return __cifs_calc_signature(rqst, server, signature, server->secmech.md5);
124 }
125
126 /* must be called with server->srv_mutex held */
127 int cifs_sign_rqst(struct smb_rqst *rqst, struct TCP_Server_Info *server,
128                    __u32 *pexpected_response_sequence_number)
129 {
130         int rc = 0;
131         char smb_signature[20];
132         struct smb_hdr *cifs_pdu = (struct smb_hdr *)rqst->rq_iov[0].iov_base;
133
134         if (rqst->rq_iov[0].iov_len != 4 ||
135             rqst->rq_iov[0].iov_base + 4 != rqst->rq_iov[1].iov_base)
136                 return -EIO;
137
138         if ((cifs_pdu == NULL) || (server == NULL))
139                 return -EINVAL;
140
141         spin_lock(&server->srv_lock);
142         if (!(cifs_pdu->Flags2 & SMBFLG2_SECURITY_SIGNATURE) ||
143             server->tcpStatus == CifsNeedNegotiate) {
144                 spin_unlock(&server->srv_lock);
145                 return rc;
146         }
147         spin_unlock(&server->srv_lock);
148
149         if (!server->session_estab) {
150                 memcpy(cifs_pdu->Signature.SecuritySignature, "BSRSPYL", 8);
151                 return rc;
152         }
153
154         cifs_pdu->Signature.Sequence.SequenceNumber =
155                                 cpu_to_le32(server->sequence_number);
156         cifs_pdu->Signature.Sequence.Reserved = 0;
157
158         *pexpected_response_sequence_number = ++server->sequence_number;
159         ++server->sequence_number;
160
161         rc = cifs_calc_signature(rqst, server, smb_signature);
162         if (rc)
163                 memset(cifs_pdu->Signature.SecuritySignature, 0, 8);
164         else
165                 memcpy(cifs_pdu->Signature.SecuritySignature, smb_signature, 8);
166
167         return rc;
168 }
169
170 int cifs_sign_smbv(struct kvec *iov, int n_vec, struct TCP_Server_Info *server,
171                    __u32 *pexpected_response_sequence)
172 {
173         struct smb_rqst rqst = { .rq_iov = iov,
174                                  .rq_nvec = n_vec };
175
176         return cifs_sign_rqst(&rqst, server, pexpected_response_sequence);
177 }
178
179 /* must be called with server->srv_mutex held */
180 int cifs_sign_smb(struct smb_hdr *cifs_pdu, struct TCP_Server_Info *server,
181                   __u32 *pexpected_response_sequence_number)
182 {
183         struct kvec iov[2];
184
185         iov[0].iov_base = cifs_pdu;
186         iov[0].iov_len = 4;
187         iov[1].iov_base = (char *)cifs_pdu + 4;
188         iov[1].iov_len = be32_to_cpu(cifs_pdu->smb_buf_length);
189
190         return cifs_sign_smbv(iov, 2, server,
191                               pexpected_response_sequence_number);
192 }
193
194 int cifs_verify_signature(struct smb_rqst *rqst,
195                           struct TCP_Server_Info *server,
196                           __u32 expected_sequence_number)
197 {
198         unsigned int rc;
199         char server_response_sig[8];
200         char what_we_think_sig_should_be[20];
201         struct smb_hdr *cifs_pdu = (struct smb_hdr *)rqst->rq_iov[0].iov_base;
202
203         if (rqst->rq_iov[0].iov_len != 4 ||
204             rqst->rq_iov[0].iov_base + 4 != rqst->rq_iov[1].iov_base)
205                 return -EIO;
206
207         if (cifs_pdu == NULL || server == NULL)
208                 return -EINVAL;
209
210         if (!server->session_estab)
211                 return 0;
212
213         if (cifs_pdu->Command == SMB_COM_LOCKING_ANDX) {
214                 struct smb_com_lock_req *pSMB =
215                         (struct smb_com_lock_req *)cifs_pdu;
216                 if (pSMB->LockType & LOCKING_ANDX_OPLOCK_RELEASE)
217                         return 0;
218         }
219
220         /* BB what if signatures are supposed to be on for session but
221            server does not send one? BB */
222
223         /* Do not need to verify session setups with signature "BSRSPYL "  */
224         if (memcmp(cifs_pdu->Signature.SecuritySignature, "BSRSPYL ", 8) == 0)
225                 cifs_dbg(FYI, "dummy signature received for smb command 0x%x\n",
226                          cifs_pdu->Command);
227
228         /* save off the origiginal signature so we can modify the smb and check
229                 its signature against what the server sent */
230         memcpy(server_response_sig, cifs_pdu->Signature.SecuritySignature, 8);
231
232         cifs_pdu->Signature.Sequence.SequenceNumber =
233                                         cpu_to_le32(expected_sequence_number);
234         cifs_pdu->Signature.Sequence.Reserved = 0;
235
236         cifs_server_lock(server);
237         rc = cifs_calc_signature(rqst, server, what_we_think_sig_should_be);
238         cifs_server_unlock(server);
239
240         if (rc)
241                 return rc;
242
243 /*      cifs_dump_mem("what we think it should be: ",
244                       what_we_think_sig_should_be, 16); */
245
246         if (memcmp(server_response_sig, what_we_think_sig_should_be, 8))
247                 return -EACCES;
248         else
249                 return 0;
250
251 }
252
253 /* Build a proper attribute value/target info pairs blob.
254  * Fill in netbios and dns domain name and workstation name
255  * and client time (total five av pairs and + one end of fields indicator.
256  * Allocate domain name which gets freed when session struct is deallocated.
257  */
258 static int
259 build_avpair_blob(struct cifs_ses *ses, const struct nls_table *nls_cp)
260 {
261         unsigned int dlen;
262         unsigned int size = 2 * sizeof(struct ntlmssp2_name);
263         char *defdmname = "WORKGROUP";
264         unsigned char *blobptr;
265         struct ntlmssp2_name *attrptr;
266
267         if (!ses->domainName) {
268                 ses->domainName = kstrdup(defdmname, GFP_KERNEL);
269                 if (!ses->domainName)
270                         return -ENOMEM;
271         }
272
273         dlen = strlen(ses->domainName);
274
275         /*
276          * The length of this blob is two times the size of a
277          * structure (av pair) which holds name/size
278          * ( for NTLMSSP_AV_NB_DOMAIN_NAME followed by NTLMSSP_AV_EOL ) +
279          * unicode length of a netbios domain name
280          */
281         ses->auth_key.len = size + 2 * dlen;
282         ses->auth_key.response = kzalloc(ses->auth_key.len, GFP_KERNEL);
283         if (!ses->auth_key.response) {
284                 ses->auth_key.len = 0;
285                 return -ENOMEM;
286         }
287
288         blobptr = ses->auth_key.response;
289         attrptr = (struct ntlmssp2_name *) blobptr;
290
291         /*
292          * As defined in MS-NTLM 3.3.2, just this av pair field
293          * is sufficient as part of the temp
294          */
295         attrptr->type = cpu_to_le16(NTLMSSP_AV_NB_DOMAIN_NAME);
296         attrptr->length = cpu_to_le16(2 * dlen);
297         blobptr = (unsigned char *)attrptr + sizeof(struct ntlmssp2_name);
298         cifs_strtoUTF16((__le16 *)blobptr, ses->domainName, dlen, nls_cp);
299
300         return 0;
301 }
302
303 /* Server has provided av pairs/target info in the type 2 challenge
304  * packet and we have plucked it and stored within smb session.
305  * We parse that blob here to find netbios domain name to be used
306  * as part of ntlmv2 authentication (in Target String), if not already
307  * specified on the command line.
308  * If this function returns without any error but without fetching
309  * domain name, authentication may fail against some server but
310  * may not fail against other (those who are not very particular
311  * about target string i.e. for some, just user name might suffice.
312  */
313 static int
314 find_domain_name(struct cifs_ses *ses, const struct nls_table *nls_cp)
315 {
316         unsigned int attrsize;
317         unsigned int type;
318         unsigned int onesize = sizeof(struct ntlmssp2_name);
319         unsigned char *blobptr;
320         unsigned char *blobend;
321         struct ntlmssp2_name *attrptr;
322
323         if (!ses->auth_key.len || !ses->auth_key.response)
324                 return 0;
325
326         blobptr = ses->auth_key.response;
327         blobend = blobptr + ses->auth_key.len;
328
329         while (blobptr + onesize < blobend) {
330                 attrptr = (struct ntlmssp2_name *) blobptr;
331                 type = le16_to_cpu(attrptr->type);
332                 if (type == NTLMSSP_AV_EOL)
333                         break;
334                 blobptr += 2; /* advance attr type */
335                 attrsize = le16_to_cpu(attrptr->length);
336                 blobptr += 2; /* advance attr size */
337                 if (blobptr + attrsize > blobend)
338                         break;
339                 if (type == NTLMSSP_AV_NB_DOMAIN_NAME) {
340                         if (!attrsize || attrsize >= CIFS_MAX_DOMAINNAME_LEN)
341                                 break;
342                         if (!ses->domainName) {
343                                 ses->domainName =
344                                         kmalloc(attrsize + 1, GFP_KERNEL);
345                                 if (!ses->domainName)
346                                                 return -ENOMEM;
347                                 cifs_from_utf16(ses->domainName,
348                                         (__le16 *)blobptr, attrsize, attrsize,
349                                         nls_cp, NO_MAP_UNI_RSVD);
350                                 break;
351                         }
352                 }
353                 blobptr += attrsize; /* advance attr  value */
354         }
355
356         return 0;
357 }
358
359 /* Server has provided av pairs/target info in the type 2 challenge
360  * packet and we have plucked it and stored within smb session.
361  * We parse that blob here to find the server given timestamp
362  * as part of ntlmv2 authentication (or local current time as
363  * default in case of failure)
364  */
365 static __le64
366 find_timestamp(struct cifs_ses *ses)
367 {
368         unsigned int attrsize;
369         unsigned int type;
370         unsigned int onesize = sizeof(struct ntlmssp2_name);
371         unsigned char *blobptr;
372         unsigned char *blobend;
373         struct ntlmssp2_name *attrptr;
374         struct timespec64 ts;
375
376         if (!ses->auth_key.len || !ses->auth_key.response)
377                 return 0;
378
379         blobptr = ses->auth_key.response;
380         blobend = blobptr + ses->auth_key.len;
381
382         while (blobptr + onesize < blobend) {
383                 attrptr = (struct ntlmssp2_name *) blobptr;
384                 type = le16_to_cpu(attrptr->type);
385                 if (type == NTLMSSP_AV_EOL)
386                         break;
387                 blobptr += 2; /* advance attr type */
388                 attrsize = le16_to_cpu(attrptr->length);
389                 blobptr += 2; /* advance attr size */
390                 if (blobptr + attrsize > blobend)
391                         break;
392                 if (type == NTLMSSP_AV_TIMESTAMP) {
393                         if (attrsize == sizeof(u64))
394                                 return *((__le64 *)blobptr);
395                 }
396                 blobptr += attrsize; /* advance attr value */
397         }
398
399         ktime_get_real_ts64(&ts);
400         return cpu_to_le64(cifs_UnixTimeToNT(ts));
401 }
402
403 static int calc_ntlmv2_hash(struct cifs_ses *ses, char *ntlmv2_hash,
404                             const struct nls_table *nls_cp)
405 {
406         int rc = 0;
407         int len;
408         char nt_hash[CIFS_NTHASH_SIZE];
409         __le16 *user;
410         wchar_t *domain;
411         wchar_t *server;
412
413         if (!ses->server->secmech.hmacmd5) {
414                 cifs_dbg(VFS, "%s: can't generate ntlmv2 hash\n", __func__);
415                 return -1;
416         }
417
418         /* calculate md4 hash of password */
419         E_md4hash(ses->password, nt_hash, nls_cp);
420
421         rc = crypto_shash_setkey(ses->server->secmech.hmacmd5->tfm, nt_hash,
422                                 CIFS_NTHASH_SIZE);
423         if (rc) {
424                 cifs_dbg(VFS, "%s: Could not set NT Hash as a key\n", __func__);
425                 return rc;
426         }
427
428         rc = crypto_shash_init(ses->server->secmech.hmacmd5);
429         if (rc) {
430                 cifs_dbg(VFS, "%s: Could not init hmacmd5\n", __func__);
431                 return rc;
432         }
433
434         /* convert ses->user_name to unicode */
435         len = ses->user_name ? strlen(ses->user_name) : 0;
436         user = kmalloc(2 + (len * 2), GFP_KERNEL);
437         if (user == NULL) {
438                 rc = -ENOMEM;
439                 return rc;
440         }
441
442         if (len) {
443                 len = cifs_strtoUTF16(user, ses->user_name, len, nls_cp);
444                 UniStrupr(user);
445         } else {
446                 memset(user, '\0', 2);
447         }
448
449         rc = crypto_shash_update(ses->server->secmech.hmacmd5,
450                                 (char *)user, 2 * len);
451         kfree(user);
452         if (rc) {
453                 cifs_dbg(VFS, "%s: Could not update with user\n", __func__);
454                 return rc;
455         }
456
457         /* convert ses->domainName to unicode and uppercase */
458         if (ses->domainName) {
459                 len = strlen(ses->domainName);
460
461                 domain = kmalloc(2 + (len * 2), GFP_KERNEL);
462                 if (domain == NULL) {
463                         rc = -ENOMEM;
464                         return rc;
465                 }
466                 len = cifs_strtoUTF16((__le16 *)domain, ses->domainName, len,
467                                       nls_cp);
468                 rc =
469                 crypto_shash_update(ses->server->secmech.hmacmd5,
470                                         (char *)domain, 2 * len);
471                 kfree(domain);
472                 if (rc) {
473                         cifs_dbg(VFS, "%s: Could not update with domain\n",
474                                  __func__);
475                         return rc;
476                 }
477         } else {
478                 /* We use ses->ip_addr if no domain name available */
479                 len = strlen(ses->ip_addr);
480
481                 server = kmalloc(2 + (len * 2), GFP_KERNEL);
482                 if (server == NULL) {
483                         rc = -ENOMEM;
484                         return rc;
485                 }
486                 len = cifs_strtoUTF16((__le16 *)server, ses->ip_addr, len,
487                                         nls_cp);
488                 rc =
489                 crypto_shash_update(ses->server->secmech.hmacmd5,
490                                         (char *)server, 2 * len);
491                 kfree(server);
492                 if (rc) {
493                         cifs_dbg(VFS, "%s: Could not update with server\n",
494                                  __func__);
495                         return rc;
496                 }
497         }
498
499         rc = crypto_shash_final(ses->server->secmech.hmacmd5,
500                                         ntlmv2_hash);
501         if (rc)
502                 cifs_dbg(VFS, "%s: Could not generate md5 hash\n", __func__);
503
504         return rc;
505 }
506
507 static int
508 CalcNTLMv2_response(const struct cifs_ses *ses, char *ntlmv2_hash)
509 {
510         int rc;
511         struct ntlmv2_resp *ntlmv2 = (struct ntlmv2_resp *)
512             (ses->auth_key.response + CIFS_SESS_KEY_SIZE);
513         unsigned int hash_len;
514
515         /* The MD5 hash starts at challenge_key.key */
516         hash_len = ses->auth_key.len - (CIFS_SESS_KEY_SIZE +
517                 offsetof(struct ntlmv2_resp, challenge.key[0]));
518
519         if (!ses->server->secmech.hmacmd5) {
520                 cifs_dbg(VFS, "%s: can't generate ntlmv2 hash\n", __func__);
521                 return -1;
522         }
523
524         rc = crypto_shash_setkey(ses->server->secmech.hmacmd5->tfm,
525                                  ntlmv2_hash, CIFS_HMAC_MD5_HASH_SIZE);
526         if (rc) {
527                 cifs_dbg(VFS, "%s: Could not set NTLMV2 Hash as a key\n",
528                          __func__);
529                 return rc;
530         }
531
532         rc = crypto_shash_init(ses->server->secmech.hmacmd5);
533         if (rc) {
534                 cifs_dbg(VFS, "%s: Could not init hmacmd5\n", __func__);
535                 return rc;
536         }
537
538         if (ses->server->negflavor == CIFS_NEGFLAVOR_EXTENDED)
539                 memcpy(ntlmv2->challenge.key,
540                        ses->ntlmssp->cryptkey, CIFS_SERVER_CHALLENGE_SIZE);
541         else
542                 memcpy(ntlmv2->challenge.key,
543                        ses->server->cryptkey, CIFS_SERVER_CHALLENGE_SIZE);
544         rc = crypto_shash_update(ses->server->secmech.hmacmd5,
545                                  ntlmv2->challenge.key, hash_len);
546         if (rc) {
547                 cifs_dbg(VFS, "%s: Could not update with response\n", __func__);
548                 return rc;
549         }
550
551         /* Note that the MD5 digest over writes anon.challenge_key.key */
552         rc = crypto_shash_final(ses->server->secmech.hmacmd5,
553                                 ntlmv2->ntlmv2_hash);
554         if (rc)
555                 cifs_dbg(VFS, "%s: Could not generate md5 hash\n", __func__);
556
557         return rc;
558 }
559
560 int
561 setup_ntlmv2_rsp(struct cifs_ses *ses, const struct nls_table *nls_cp)
562 {
563         int rc;
564         int baselen;
565         unsigned int tilen;
566         struct ntlmv2_resp *ntlmv2;
567         char ntlmv2_hash[16];
568         unsigned char *tiblob = NULL; /* target info blob */
569         __le64 rsp_timestamp;
570
571         if (nls_cp == NULL) {
572                 cifs_dbg(VFS, "%s called with nls_cp==NULL\n", __func__);
573                 return -EINVAL;
574         }
575
576         if (ses->server->negflavor == CIFS_NEGFLAVOR_EXTENDED) {
577                 if (!ses->domainName) {
578                         if (ses->domainAuto) {
579                                 rc = find_domain_name(ses, nls_cp);
580                                 if (rc) {
581                                         cifs_dbg(VFS, "error %d finding domain name\n",
582                                                  rc);
583                                         goto setup_ntlmv2_rsp_ret;
584                                 }
585                         } else {
586                                 ses->domainName = kstrdup("", GFP_KERNEL);
587                         }
588                 }
589         } else {
590                 rc = build_avpair_blob(ses, nls_cp);
591                 if (rc) {
592                         cifs_dbg(VFS, "error %d building av pair blob\n", rc);
593                         goto setup_ntlmv2_rsp_ret;
594                 }
595         }
596
597         /* Must be within 5 minutes of the server (or in range +/-2h
598          * in case of Mac OS X), so simply carry over server timestamp
599          * (as Windows 7 does)
600          */
601         rsp_timestamp = find_timestamp(ses);
602
603         baselen = CIFS_SESS_KEY_SIZE + sizeof(struct ntlmv2_resp);
604         tilen = ses->auth_key.len;
605         tiblob = ses->auth_key.response;
606
607         ses->auth_key.response = kmalloc(baselen + tilen, GFP_KERNEL);
608         if (!ses->auth_key.response) {
609                 rc = -ENOMEM;
610                 ses->auth_key.len = 0;
611                 goto setup_ntlmv2_rsp_ret;
612         }
613         ses->auth_key.len += baselen;
614
615         ntlmv2 = (struct ntlmv2_resp *)
616                         (ses->auth_key.response + CIFS_SESS_KEY_SIZE);
617         ntlmv2->blob_signature = cpu_to_le32(0x00000101);
618         ntlmv2->reserved = 0;
619         ntlmv2->time = rsp_timestamp;
620
621         get_random_bytes(&ntlmv2->client_chal, sizeof(ntlmv2->client_chal));
622         ntlmv2->reserved2 = 0;
623
624         memcpy(ses->auth_key.response + baselen, tiblob, tilen);
625
626         cifs_server_lock(ses->server);
627
628         rc = cifs_alloc_hash("hmac(md5)", &ses->server->secmech.hmacmd5);
629         if (rc) {
630                 goto unlock;
631         }
632
633         /* calculate ntlmv2_hash */
634         rc = calc_ntlmv2_hash(ses, ntlmv2_hash, nls_cp);
635         if (rc) {
636                 cifs_dbg(VFS, "Could not get v2 hash rc %d\n", rc);
637                 goto unlock;
638         }
639
640         /* calculate first part of the client response (CR1) */
641         rc = CalcNTLMv2_response(ses, ntlmv2_hash);
642         if (rc) {
643                 cifs_dbg(VFS, "Could not calculate CR1 rc: %d\n", rc);
644                 goto unlock;
645         }
646
647         /* now calculate the session key for NTLMv2 */
648         rc = crypto_shash_setkey(ses->server->secmech.hmacmd5->tfm,
649                 ntlmv2_hash, CIFS_HMAC_MD5_HASH_SIZE);
650         if (rc) {
651                 cifs_dbg(VFS, "%s: Could not set NTLMV2 Hash as a key\n",
652                          __func__);
653                 goto unlock;
654         }
655
656         rc = crypto_shash_init(ses->server->secmech.hmacmd5);
657         if (rc) {
658                 cifs_dbg(VFS, "%s: Could not init hmacmd5\n", __func__);
659                 goto unlock;
660         }
661
662         rc = crypto_shash_update(ses->server->secmech.hmacmd5,
663                 ntlmv2->ntlmv2_hash,
664                 CIFS_HMAC_MD5_HASH_SIZE);
665         if (rc) {
666                 cifs_dbg(VFS, "%s: Could not update with response\n", __func__);
667                 goto unlock;
668         }
669
670         rc = crypto_shash_final(ses->server->secmech.hmacmd5,
671                 ses->auth_key.response);
672         if (rc)
673                 cifs_dbg(VFS, "%s: Could not generate md5 hash\n", __func__);
674
675 unlock:
676         cifs_server_unlock(ses->server);
677 setup_ntlmv2_rsp_ret:
678         kfree_sensitive(tiblob);
679
680         return rc;
681 }
682
683 int
684 calc_seckey(struct cifs_ses *ses)
685 {
686         unsigned char sec_key[CIFS_SESS_KEY_SIZE]; /* a nonce */
687         struct arc4_ctx *ctx_arc4;
688
689         if (fips_enabled)
690                 return -ENODEV;
691
692         get_random_bytes(sec_key, CIFS_SESS_KEY_SIZE);
693
694         ctx_arc4 = kmalloc(sizeof(*ctx_arc4), GFP_KERNEL);
695         if (!ctx_arc4) {
696                 cifs_dbg(VFS, "Could not allocate arc4 context\n");
697                 return -ENOMEM;
698         }
699
700         cifs_arc4_setkey(ctx_arc4, ses->auth_key.response, CIFS_SESS_KEY_SIZE);
701         cifs_arc4_crypt(ctx_arc4, ses->ntlmssp->ciphertext, sec_key,
702                         CIFS_CPHTXT_SIZE);
703
704         /* make secondary_key/nonce as session key */
705         memcpy(ses->auth_key.response, sec_key, CIFS_SESS_KEY_SIZE);
706         /* and make len as that of session key only */
707         ses->auth_key.len = CIFS_SESS_KEY_SIZE;
708
709         memzero_explicit(sec_key, CIFS_SESS_KEY_SIZE);
710         kfree_sensitive(ctx_arc4);
711         return 0;
712 }
713
714 void
715 cifs_crypto_secmech_release(struct TCP_Server_Info *server)
716 {
717         cifs_free_hash(&server->secmech.aes_cmac);
718         cifs_free_hash(&server->secmech.hmacsha256);
719         cifs_free_hash(&server->secmech.md5);
720         cifs_free_hash(&server->secmech.sha512);
721         cifs_free_hash(&server->secmech.hmacmd5);
722
723         if (server->secmech.enc) {
724                 crypto_free_aead(server->secmech.enc);
725                 server->secmech.enc = NULL;
726         }
727
728         if (server->secmech.dec) {
729                 crypto_free_aead(server->secmech.dec);
730                 server->secmech.dec = NULL;
731         }
732 }