• Home
  • Line#
  • Scopes#
  • Navigate#
  • Raw
  • Download
1 /*
2  *   fs/cifs/smb2misc.c
3  *
4  *   Copyright (C) International Business Machines  Corp., 2002,2011
5  *                 Etersoft, 2012
6  *   Author(s): Steve French (sfrench@us.ibm.com)
7  *              Pavel Shilovsky (pshilovsky@samba.org) 2012
8  *
9  *   This library is free software; you can redistribute it and/or modify
10  *   it under the terms of the GNU Lesser General Public License as published
11  *   by the Free Software Foundation; either version 2.1 of the License, or
12  *   (at your option) any later version.
13  *
14  *   This library is distributed in the hope that it will be useful,
15  *   but WITHOUT ANY WARRANTY; without even the implied warranty of
16  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See
17  *   the GNU Lesser General Public License for more details.
18  *
19  *   You should have received a copy of the GNU Lesser General Public License
20  *   along with this library; if not, write to the Free Software
21  *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
22  */
23 #include <linux/ctype.h>
24 #include "smb2pdu.h"
25 #include "cifsglob.h"
26 #include "cifsproto.h"
27 #include "smb2proto.h"
28 #include "cifs_debug.h"
29 #include "cifs_unicode.h"
30 #include "smb2status.h"
31 #include "smb2glob.h"
32 
33 static int
check_smb2_hdr(struct smb2_sync_hdr * shdr,__u64 mid)34 check_smb2_hdr(struct smb2_sync_hdr *shdr, __u64 mid)
35 {
36 	__u64 wire_mid = le64_to_cpu(shdr->MessageId);
37 
38 	/*
39 	 * Make sure that this really is an SMB, that it is a response,
40 	 * and that the message ids match.
41 	 */
42 	if ((shdr->ProtocolId == SMB2_PROTO_NUMBER) &&
43 	    (mid == wire_mid)) {
44 		if (shdr->Flags & SMB2_FLAGS_SERVER_TO_REDIR)
45 			return 0;
46 		else {
47 			/* only one valid case where server sends us request */
48 			if (shdr->Command == SMB2_OPLOCK_BREAK)
49 				return 0;
50 			else
51 				cifs_dbg(VFS, "Received Request not response\n");
52 		}
53 	} else { /* bad signature or mid */
54 		if (shdr->ProtocolId != SMB2_PROTO_NUMBER)
55 			cifs_dbg(VFS, "Bad protocol string signature header %x\n",
56 				 le32_to_cpu(shdr->ProtocolId));
57 		if (mid != wire_mid)
58 			cifs_dbg(VFS, "Mids do not match: %llu and %llu\n",
59 				 mid, wire_mid);
60 	}
61 	cifs_dbg(VFS, "Bad SMB detected. The Mid=%llu\n", wire_mid);
62 	return 1;
63 }
64 
65 /*
66  *  The following table defines the expected "StructureSize" of SMB2 responses
67  *  in order by SMB2 command.  This is similar to "wct" in SMB/CIFS responses.
68  *
69  *  Note that commands are defined in smb2pdu.h in le16 but the array below is
70  *  indexed by command in host byte order
71  */
72 static const __le16 smb2_rsp_struct_sizes[NUMBER_OF_SMB2_COMMANDS] = {
73 	/* SMB2_NEGOTIATE */ cpu_to_le16(65),
74 	/* SMB2_SESSION_SETUP */ cpu_to_le16(9),
75 	/* SMB2_LOGOFF */ cpu_to_le16(4),
76 	/* SMB2_TREE_CONNECT */ cpu_to_le16(16),
77 	/* SMB2_TREE_DISCONNECT */ cpu_to_le16(4),
78 	/* SMB2_CREATE */ cpu_to_le16(89),
79 	/* SMB2_CLOSE */ cpu_to_le16(60),
80 	/* SMB2_FLUSH */ cpu_to_le16(4),
81 	/* SMB2_READ */ cpu_to_le16(17),
82 	/* SMB2_WRITE */ cpu_to_le16(17),
83 	/* SMB2_LOCK */ cpu_to_le16(4),
84 	/* SMB2_IOCTL */ cpu_to_le16(49),
85 	/* BB CHECK this ... not listed in documentation */
86 	/* SMB2_CANCEL */ cpu_to_le16(0),
87 	/* SMB2_ECHO */ cpu_to_le16(4),
88 	/* SMB2_QUERY_DIRECTORY */ cpu_to_le16(9),
89 	/* SMB2_CHANGE_NOTIFY */ cpu_to_le16(9),
90 	/* SMB2_QUERY_INFO */ cpu_to_le16(9),
91 	/* SMB2_SET_INFO */ cpu_to_le16(2),
92 	/* BB FIXME can also be 44 for lease break */
93 	/* SMB2_OPLOCK_BREAK */ cpu_to_le16(24)
94 };
95 
get_neg_ctxt_len(struct smb2_sync_hdr * hdr,__u32 len,__u32 non_ctxlen)96 static __u32 get_neg_ctxt_len(struct smb2_sync_hdr *hdr, __u32 len,
97 			      __u32 non_ctxlen)
98 {
99 	__u16 neg_count;
100 	__u32 nc_offset, size_of_pad_before_neg_ctxts;
101 	struct smb2_negotiate_rsp *pneg_rsp = (struct smb2_negotiate_rsp *)hdr;
102 
103 	/* Negotiate contexts are only valid for latest dialect SMB3.11 */
104 	neg_count = le16_to_cpu(pneg_rsp->NegotiateContextCount);
105 	if ((neg_count == 0) ||
106 	   (pneg_rsp->DialectRevision != cpu_to_le16(SMB311_PROT_ID)))
107 		return 0;
108 
109 	/* Make sure that negotiate contexts start after gss security blob */
110 	nc_offset = le32_to_cpu(pneg_rsp->NegotiateContextOffset);
111 	if (nc_offset < non_ctxlen) {
112 		printk_once(KERN_WARNING "invalid negotiate context offset\n");
113 		return 0;
114 	}
115 	size_of_pad_before_neg_ctxts = nc_offset - non_ctxlen;
116 
117 	/* Verify that at least minimal negotiate contexts fit within frame */
118 	if (len < nc_offset + (neg_count * sizeof(struct smb2_neg_context))) {
119 		printk_once(KERN_WARNING "negotiate context goes beyond end\n");
120 		return 0;
121 	}
122 
123 	cifs_dbg(FYI, "length of negcontexts %d pad %d\n",
124 		len - nc_offset, size_of_pad_before_neg_ctxts);
125 
126 	/* length of negcontexts including pad from end of sec blob to them */
127 	return (len - nc_offset) + size_of_pad_before_neg_ctxts;
128 }
129 
130 int
smb2_check_message(char * buf,unsigned int len,struct TCP_Server_Info * srvr)131 smb2_check_message(char *buf, unsigned int len, struct TCP_Server_Info *srvr)
132 {
133 	struct smb2_sync_hdr *shdr = (struct smb2_sync_hdr *)buf;
134 	struct smb2_sync_pdu *pdu = (struct smb2_sync_pdu *)shdr;
135 	__u64 mid;
136 	__u32 clc_len;  /* calculated length */
137 	int command;
138 	int pdu_size = sizeof(struct smb2_sync_pdu);
139 	int hdr_size = sizeof(struct smb2_sync_hdr);
140 
141 	/*
142 	 * Add function to do table lookup of StructureSize by command
143 	 * ie Validate the wct via smb2_struct_sizes table above
144 	 */
145 	if (shdr->ProtocolId == SMB2_TRANSFORM_PROTO_NUM) {
146 		struct smb2_transform_hdr *thdr =
147 			(struct smb2_transform_hdr *)buf;
148 		struct cifs_ses *ses = NULL;
149 		struct list_head *tmp;
150 
151 		/* decrypt frame now that it is completely read in */
152 		spin_lock(&cifs_tcp_ses_lock);
153 		list_for_each(tmp, &srvr->smb_ses_list) {
154 			ses = list_entry(tmp, struct cifs_ses, smb_ses_list);
155 			if (ses->Suid == thdr->SessionId)
156 				break;
157 
158 			ses = NULL;
159 		}
160 		spin_unlock(&cifs_tcp_ses_lock);
161 		if (ses == NULL) {
162 			cifs_dbg(VFS, "no decryption - session id not found\n");
163 			return 1;
164 		}
165 	}
166 
167 	mid = le64_to_cpu(shdr->MessageId);
168 	if (len < pdu_size) {
169 		if ((len >= hdr_size)
170 		    && (shdr->Status != 0)) {
171 			pdu->StructureSize2 = 0;
172 			/*
173 			 * As with SMB/CIFS, on some error cases servers may
174 			 * not return wct properly
175 			 */
176 			return 0;
177 		} else {
178 			cifs_dbg(VFS, "Length less than SMB header size\n");
179 		}
180 		return 1;
181 	}
182 	if (len > CIFSMaxBufSize + MAX_SMB2_HDR_SIZE) {
183 		cifs_dbg(VFS, "SMB length greater than maximum, mid=%llu\n",
184 			 mid);
185 		return 1;
186 	}
187 
188 	if (check_smb2_hdr(shdr, mid))
189 		return 1;
190 
191 	if (shdr->StructureSize != SMB2_HEADER_STRUCTURE_SIZE) {
192 		cifs_dbg(VFS, "Illegal structure size %u\n",
193 			 le16_to_cpu(shdr->StructureSize));
194 		return 1;
195 	}
196 
197 	command = le16_to_cpu(shdr->Command);
198 	if (command >= NUMBER_OF_SMB2_COMMANDS) {
199 		cifs_dbg(VFS, "Illegal SMB2 command %d\n", command);
200 		return 1;
201 	}
202 
203 	if (smb2_rsp_struct_sizes[command] != pdu->StructureSize2) {
204 		if (command != SMB2_OPLOCK_BREAK_HE && (shdr->Status == 0 ||
205 		    pdu->StructureSize2 != SMB2_ERROR_STRUCTURE_SIZE2)) {
206 			/* error packets have 9 byte structure size */
207 			cifs_dbg(VFS, "Illegal response size %u for command %d\n",
208 				 le16_to_cpu(pdu->StructureSize2), command);
209 			return 1;
210 		} else if (command == SMB2_OPLOCK_BREAK_HE
211 			   && (shdr->Status == 0)
212 			   && (le16_to_cpu(pdu->StructureSize2) != 44)
213 			   && (le16_to_cpu(pdu->StructureSize2) != 36)) {
214 			/* special case for SMB2.1 lease break message */
215 			cifs_dbg(VFS, "Illegal response size %d for oplock break\n",
216 				 le16_to_cpu(pdu->StructureSize2));
217 			return 1;
218 		}
219 	}
220 
221 	clc_len = smb2_calc_size(buf, srvr);
222 
223 	if (shdr->Command == SMB2_NEGOTIATE)
224 		clc_len += get_neg_ctxt_len(shdr, len, clc_len);
225 
226 	if (len != clc_len) {
227 		cifs_dbg(FYI, "Calculated size %u length %u mismatch mid %llu\n",
228 			 clc_len, len, mid);
229 		/* create failed on symlink */
230 		if (command == SMB2_CREATE_HE &&
231 		    shdr->Status == STATUS_STOPPED_ON_SYMLINK)
232 			return 0;
233 		/* Windows 7 server returns 24 bytes more */
234 		if (clc_len + 24 == len && command == SMB2_OPLOCK_BREAK_HE)
235 			return 0;
236 		/* server can return one byte more due to implied bcc[0] */
237 		if (clc_len == len + 1)
238 			return 0;
239 
240 		/*
241 		 * Some windows servers (win2016) will pad also the final
242 		 * PDU in a compound to 8 bytes.
243 		 */
244 		if (((clc_len + 7) & ~7) == len)
245 			return 0;
246 
247 		/*
248 		 * MacOS server pads after SMB2.1 write response with 3 bytes
249 		 * of junk. Other servers match RFC1001 len to actual
250 		 * SMB2/SMB3 frame length (header + smb2 response specific data)
251 		 * Some windows servers also pad up to 8 bytes when compounding.
252 		 * If pad is longer than eight bytes, log the server behavior
253 		 * (once), since may indicate a problem but allow it and continue
254 		 * since the frame is parseable.
255 		 */
256 		if (clc_len < len) {
257 			pr_warn_once(
258 			     "srv rsp padded more than expected. Length %d not %d for cmd:%d mid:%llu\n",
259 			     len, clc_len, command, mid);
260 			return 0;
261 		}
262 		pr_warn_once(
263 			"srv rsp too short, len %d not %d. cmd:%d mid:%llu\n",
264 			len, clc_len, command, mid);
265 
266 		return 1;
267 	}
268 	return 0;
269 }
270 
271 /*
272  * The size of the variable area depends on the offset and length fields
273  * located in different fields for various SMB2 responses. SMB2 responses
274  * with no variable length info, show an offset of zero for the offset field.
275  */
276 static const bool has_smb2_data_area[NUMBER_OF_SMB2_COMMANDS] = {
277 	/* SMB2_NEGOTIATE */ true,
278 	/* SMB2_SESSION_SETUP */ true,
279 	/* SMB2_LOGOFF */ false,
280 	/* SMB2_TREE_CONNECT */	false,
281 	/* SMB2_TREE_DISCONNECT */ false,
282 	/* SMB2_CREATE */ true,
283 	/* SMB2_CLOSE */ false,
284 	/* SMB2_FLUSH */ false,
285 	/* SMB2_READ */	true,
286 	/* SMB2_WRITE */ false,
287 	/* SMB2_LOCK */	false,
288 	/* SMB2_IOCTL */ true,
289 	/* SMB2_CANCEL */ false, /* BB CHECK this not listed in documentation */
290 	/* SMB2_ECHO */ false,
291 	/* SMB2_QUERY_DIRECTORY */ true,
292 	/* SMB2_CHANGE_NOTIFY */ true,
293 	/* SMB2_QUERY_INFO */ true,
294 	/* SMB2_SET_INFO */ false,
295 	/* SMB2_OPLOCK_BREAK */ false
296 };
297 
298 /*
299  * Returns the pointer to the beginning of the data area. Length of the data
300  * area and the offset to it (from the beginning of the smb are also returned.
301  */
302 char *
smb2_get_data_area_len(int * off,int * len,struct smb2_sync_hdr * shdr)303 smb2_get_data_area_len(int *off, int *len, struct smb2_sync_hdr *shdr)
304 {
305 	const int max_off = 4096;
306 	const int max_len = 128 * 1024;
307 
308 	*off = 0;
309 	*len = 0;
310 
311 	/* error responses do not have data area */
312 	if (shdr->Status && shdr->Status != STATUS_MORE_PROCESSING_REQUIRED &&
313 	    (((struct smb2_err_rsp *)shdr)->StructureSize) ==
314 						SMB2_ERROR_STRUCTURE_SIZE2)
315 		return NULL;
316 
317 	/*
318 	 * Following commands have data areas so we have to get the location
319 	 * of the data buffer offset and data buffer length for the particular
320 	 * command.
321 	 */
322 	switch (shdr->Command) {
323 	case SMB2_NEGOTIATE:
324 		*off = le16_to_cpu(
325 		  ((struct smb2_negotiate_rsp *)shdr)->SecurityBufferOffset);
326 		*len = le16_to_cpu(
327 		  ((struct smb2_negotiate_rsp *)shdr)->SecurityBufferLength);
328 		break;
329 	case SMB2_SESSION_SETUP:
330 		*off = le16_to_cpu(
331 		  ((struct smb2_sess_setup_rsp *)shdr)->SecurityBufferOffset);
332 		*len = le16_to_cpu(
333 		  ((struct smb2_sess_setup_rsp *)shdr)->SecurityBufferLength);
334 		break;
335 	case SMB2_CREATE:
336 		*off = le32_to_cpu(
337 		    ((struct smb2_create_rsp *)shdr)->CreateContextsOffset);
338 		*len = le32_to_cpu(
339 		    ((struct smb2_create_rsp *)shdr)->CreateContextsLength);
340 		break;
341 	case SMB2_QUERY_INFO:
342 		*off = le16_to_cpu(
343 		    ((struct smb2_query_info_rsp *)shdr)->OutputBufferOffset);
344 		*len = le32_to_cpu(
345 		    ((struct smb2_query_info_rsp *)shdr)->OutputBufferLength);
346 		break;
347 	case SMB2_READ:
348 		/* TODO: is this a bug ? */
349 		*off = ((struct smb2_read_rsp *)shdr)->DataOffset;
350 		*len = le32_to_cpu(((struct smb2_read_rsp *)shdr)->DataLength);
351 		break;
352 	case SMB2_QUERY_DIRECTORY:
353 		*off = le16_to_cpu(
354 		  ((struct smb2_query_directory_rsp *)shdr)->OutputBufferOffset);
355 		*len = le32_to_cpu(
356 		  ((struct smb2_query_directory_rsp *)shdr)->OutputBufferLength);
357 		break;
358 	case SMB2_IOCTL:
359 		*off = le32_to_cpu(
360 		  ((struct smb2_ioctl_rsp *)shdr)->OutputOffset);
361 		*len = le32_to_cpu(
362 		  ((struct smb2_ioctl_rsp *)shdr)->OutputCount);
363 		break;
364 	case SMB2_CHANGE_NOTIFY:
365 	default:
366 		/* BB FIXME for unimplemented cases above */
367 		cifs_dbg(VFS, "no length check for command\n");
368 		break;
369 	}
370 
371 	/*
372 	 * Invalid length or offset probably means data area is invalid, but
373 	 * we have little choice but to ignore the data area in this case.
374 	 */
375 	if (unlikely(*off < 0 || *off > max_off ||
376 		     *len < 0 || *len > max_len)) {
377 		cifs_dbg(VFS, "%s: invalid data area (off=%d len=%d)\n",
378 			 __func__, *off, *len);
379 		*off = 0;
380 		*len = 0;
381 	} else if (*off == 0) {
382 		*len = 0;
383 	}
384 
385 	/* return pointer to beginning of data area, ie offset from SMB start */
386 	if (*off > 0 && *len > 0)
387 		return (char *)shdr + *off;
388 	return NULL;
389 }
390 
391 /*
392  * Calculate the size of the SMB message based on the fixed header
393  * portion, the number of word parameters and the data portion of the message.
394  */
395 unsigned int
smb2_calc_size(void * buf,struct TCP_Server_Info * srvr)396 smb2_calc_size(void *buf, struct TCP_Server_Info *srvr)
397 {
398 	struct smb2_sync_pdu *pdu = (struct smb2_sync_pdu *)buf;
399 	struct smb2_sync_hdr *shdr = &pdu->sync_hdr;
400 	int offset; /* the offset from the beginning of SMB to data area */
401 	int data_length; /* the length of the variable length data area */
402 	/* Structure Size has already been checked to make sure it is 64 */
403 	int len = le16_to_cpu(shdr->StructureSize);
404 
405 	/*
406 	 * StructureSize2, ie length of fixed parameter area has already
407 	 * been checked to make sure it is the correct length.
408 	 */
409 	len += le16_to_cpu(pdu->StructureSize2);
410 
411 	if (has_smb2_data_area[le16_to_cpu(shdr->Command)] == false)
412 		goto calc_size_exit;
413 
414 	smb2_get_data_area_len(&offset, &data_length, shdr);
415 	cifs_dbg(FYI, "SMB2 data length %d offset %d\n", data_length, offset);
416 
417 	if (data_length > 0) {
418 		/*
419 		 * Check to make sure that data area begins after fixed area,
420 		 * Note that last byte of the fixed area is part of data area
421 		 * for some commands, typically those with odd StructureSize,
422 		 * so we must add one to the calculation.
423 		 */
424 		if (offset + 1 < len) {
425 			cifs_dbg(VFS, "data area offset %d overlaps SMB2 header %d\n",
426 				 offset + 1, len);
427 			data_length = 0;
428 		} else {
429 			len = offset + data_length;
430 		}
431 	}
432 calc_size_exit:
433 	cifs_dbg(FYI, "SMB2 len %d\n", len);
434 	return len;
435 }
436 
437 /* Note: caller must free return buffer */
438 __le16 *
cifs_convert_path_to_utf16(const char * from,struct cifs_sb_info * cifs_sb)439 cifs_convert_path_to_utf16(const char *from, struct cifs_sb_info *cifs_sb)
440 {
441 	int len;
442 	const char *start_of_path;
443 	__le16 *to;
444 	int map_type;
445 
446 	if (cifs_sb->mnt_cifs_flags & CIFS_MOUNT_MAP_SFM_CHR)
447 		map_type = SFM_MAP_UNI_RSVD;
448 	else if (cifs_sb->mnt_cifs_flags & CIFS_MOUNT_MAP_SPECIAL_CHR)
449 		map_type = SFU_MAP_UNI_RSVD;
450 	else
451 		map_type = NO_MAP_UNI_RSVD;
452 
453 	/* Windows doesn't allow paths beginning with \ */
454 	if (from[0] == '\\')
455 		start_of_path = from + 1;
456 
457 	/* SMB311 POSIX extensions paths do not include leading slash */
458 	else if (cifs_sb_master_tlink(cifs_sb) &&
459 		 cifs_sb_master_tcon(cifs_sb)->posix_extensions &&
460 		 (from[0] == '/')) {
461 		start_of_path = from + 1;
462 	} else
463 		start_of_path = from;
464 
465 	to = cifs_strndup_to_utf16(start_of_path, PATH_MAX, &len,
466 				   cifs_sb->local_nls, map_type);
467 	return to;
468 }
469 
470 __le32
smb2_get_lease_state(struct cifsInodeInfo * cinode)471 smb2_get_lease_state(struct cifsInodeInfo *cinode)
472 {
473 	__le32 lease = 0;
474 
475 	if (CIFS_CACHE_WRITE(cinode))
476 		lease |= SMB2_LEASE_WRITE_CACHING;
477 	if (CIFS_CACHE_HANDLE(cinode))
478 		lease |= SMB2_LEASE_HANDLE_CACHING;
479 	if (CIFS_CACHE_READ(cinode))
480 		lease |= SMB2_LEASE_READ_CACHING;
481 	return lease;
482 }
483 
484 struct smb2_lease_break_work {
485 	struct work_struct lease_break;
486 	struct tcon_link *tlink;
487 	__u8 lease_key[16];
488 	__le32 lease_state;
489 };
490 
491 static void
cifs_ses_oplock_break(struct work_struct * work)492 cifs_ses_oplock_break(struct work_struct *work)
493 {
494 	struct smb2_lease_break_work *lw = container_of(work,
495 				struct smb2_lease_break_work, lease_break);
496 	int rc = 0;
497 
498 	rc = SMB2_lease_break(0, tlink_tcon(lw->tlink), lw->lease_key,
499 			      lw->lease_state);
500 
501 	cifs_dbg(FYI, "Lease release rc %d\n", rc);
502 	cifs_put_tlink(lw->tlink);
503 	kfree(lw);
504 }
505 
506 static void
smb2_queue_pending_open_break(struct tcon_link * tlink,__u8 * lease_key,__le32 new_lease_state)507 smb2_queue_pending_open_break(struct tcon_link *tlink, __u8 *lease_key,
508 			      __le32 new_lease_state)
509 {
510 	struct smb2_lease_break_work *lw;
511 
512 	lw = kmalloc(sizeof(struct smb2_lease_break_work), GFP_KERNEL);
513 	if (!lw) {
514 		cifs_put_tlink(tlink);
515 		return;
516 	}
517 
518 	INIT_WORK(&lw->lease_break, cifs_ses_oplock_break);
519 	lw->tlink = tlink;
520 	lw->lease_state = new_lease_state;
521 	memcpy(lw->lease_key, lease_key, SMB2_LEASE_KEY_SIZE);
522 	queue_work(cifsiod_wq, &lw->lease_break);
523 }
524 
525 static bool
smb2_tcon_has_lease(struct cifs_tcon * tcon,struct smb2_lease_break * rsp)526 smb2_tcon_has_lease(struct cifs_tcon *tcon, struct smb2_lease_break *rsp)
527 {
528 	__u8 lease_state;
529 	struct list_head *tmp;
530 	struct cifsFileInfo *cfile;
531 	struct cifsInodeInfo *cinode;
532 	int ack_req = le32_to_cpu(rsp->Flags &
533 				  SMB2_NOTIFY_BREAK_LEASE_FLAG_ACK_REQUIRED);
534 
535 	lease_state = le32_to_cpu(rsp->NewLeaseState);
536 
537 	list_for_each(tmp, &tcon->openFileList) {
538 		cfile = list_entry(tmp, struct cifsFileInfo, tlist);
539 		cinode = CIFS_I(d_inode(cfile->dentry));
540 
541 		if (memcmp(cinode->lease_key, rsp->LeaseKey,
542 							SMB2_LEASE_KEY_SIZE))
543 			continue;
544 
545 		cifs_dbg(FYI, "found in the open list\n");
546 		cifs_dbg(FYI, "lease key match, lease break 0x%x\n",
547 			 lease_state);
548 
549 		if (ack_req)
550 			cfile->oplock_break_cancelled = false;
551 		else
552 			cfile->oplock_break_cancelled = true;
553 
554 		set_bit(CIFS_INODE_PENDING_OPLOCK_BREAK, &cinode->flags);
555 
556 		cfile->oplock_epoch = le16_to_cpu(rsp->Epoch);
557 		cfile->oplock_level = lease_state;
558 
559 		cifs_queue_oplock_break(cfile);
560 		return true;
561 	}
562 
563 	return false;
564 }
565 
566 static struct cifs_pending_open *
smb2_tcon_find_pending_open_lease(struct cifs_tcon * tcon,struct smb2_lease_break * rsp)567 smb2_tcon_find_pending_open_lease(struct cifs_tcon *tcon,
568 				  struct smb2_lease_break *rsp)
569 {
570 	__u8 lease_state = le32_to_cpu(rsp->NewLeaseState);
571 	int ack_req = le32_to_cpu(rsp->Flags &
572 				  SMB2_NOTIFY_BREAK_LEASE_FLAG_ACK_REQUIRED);
573 	struct cifs_pending_open *open;
574 	struct cifs_pending_open *found = NULL;
575 
576 	list_for_each_entry(open, &tcon->pending_opens, olist) {
577 		if (memcmp(open->lease_key, rsp->LeaseKey,
578 			   SMB2_LEASE_KEY_SIZE))
579 			continue;
580 
581 		if (!found && ack_req) {
582 			found = open;
583 		}
584 
585 		cifs_dbg(FYI, "found in the pending open list\n");
586 		cifs_dbg(FYI, "lease key match, lease break 0x%x\n",
587 			 lease_state);
588 
589 		open->oplock = lease_state;
590 	}
591 
592 	return found;
593 }
594 
595 static bool
smb2_is_valid_lease_break(char * buffer)596 smb2_is_valid_lease_break(char *buffer)
597 {
598 	struct smb2_lease_break *rsp = (struct smb2_lease_break *)buffer;
599 	struct list_head *tmp, *tmp1, *tmp2;
600 	struct TCP_Server_Info *server;
601 	struct cifs_ses *ses;
602 	struct cifs_tcon *tcon;
603 	struct cifs_pending_open *open;
604 
605 	cifs_dbg(FYI, "Checking for lease break\n");
606 
607 	/* look up tcon based on tid & uid */
608 	spin_lock(&cifs_tcp_ses_lock);
609 	list_for_each(tmp, &cifs_tcp_ses_list) {
610 		server = list_entry(tmp, struct TCP_Server_Info, tcp_ses_list);
611 
612 		list_for_each(tmp1, &server->smb_ses_list) {
613 			ses = list_entry(tmp1, struct cifs_ses, smb_ses_list);
614 
615 			list_for_each(tmp2, &ses->tcon_list) {
616 				tcon = list_entry(tmp2, struct cifs_tcon,
617 						  tcon_list);
618 				spin_lock(&tcon->open_file_lock);
619 				cifs_stats_inc(
620 				    &tcon->stats.cifs_stats.num_oplock_brks);
621 				if (smb2_tcon_has_lease(tcon, rsp)) {
622 					spin_unlock(&tcon->open_file_lock);
623 					spin_unlock(&cifs_tcp_ses_lock);
624 					return true;
625 				}
626 				open = smb2_tcon_find_pending_open_lease(tcon,
627 									 rsp);
628 				if (open) {
629 					__u8 lease_key[SMB2_LEASE_KEY_SIZE];
630 					struct tcon_link *tlink;
631 
632 					tlink = cifs_get_tlink(open->tlink);
633 					memcpy(lease_key, open->lease_key,
634 					       SMB2_LEASE_KEY_SIZE);
635 					spin_unlock(&tcon->open_file_lock);
636 					spin_unlock(&cifs_tcp_ses_lock);
637 					smb2_queue_pending_open_break(tlink,
638 								      lease_key,
639 								      rsp->NewLeaseState);
640 					return true;
641 				}
642 				spin_unlock(&tcon->open_file_lock);
643 
644 				if (tcon->crfid.is_valid &&
645 				    !memcmp(rsp->LeaseKey,
646 					    tcon->crfid.fid->lease_key,
647 					    SMB2_LEASE_KEY_SIZE)) {
648 					INIT_WORK(&tcon->crfid.lease_break,
649 						  smb2_cached_lease_break);
650 					queue_work(cifsiod_wq,
651 						   &tcon->crfid.lease_break);
652 					spin_unlock(&cifs_tcp_ses_lock);
653 					return true;
654 				}
655 			}
656 		}
657 	}
658 	spin_unlock(&cifs_tcp_ses_lock);
659 	cifs_dbg(FYI, "Can not process lease break - no lease matched\n");
660 	return false;
661 }
662 
663 bool
smb2_is_valid_oplock_break(char * buffer,struct TCP_Server_Info * server)664 smb2_is_valid_oplock_break(char *buffer, struct TCP_Server_Info *server)
665 {
666 	struct smb2_oplock_break *rsp = (struct smb2_oplock_break *)buffer;
667 	struct list_head *tmp, *tmp1, *tmp2;
668 	struct cifs_ses *ses;
669 	struct cifs_tcon *tcon;
670 	struct cifsInodeInfo *cinode;
671 	struct cifsFileInfo *cfile;
672 
673 	cifs_dbg(FYI, "Checking for oplock break\n");
674 
675 	if (rsp->sync_hdr.Command != SMB2_OPLOCK_BREAK)
676 		return false;
677 
678 	if (rsp->StructureSize !=
679 				smb2_rsp_struct_sizes[SMB2_OPLOCK_BREAK_HE]) {
680 		if (le16_to_cpu(rsp->StructureSize) == 44)
681 			return smb2_is_valid_lease_break(buffer);
682 		else
683 			return false;
684 	}
685 
686 	cifs_dbg(FYI, "oplock level 0x%x\n", rsp->OplockLevel);
687 
688 	/* look up tcon based on tid & uid */
689 	spin_lock(&cifs_tcp_ses_lock);
690 	list_for_each(tmp, &server->smb_ses_list) {
691 		ses = list_entry(tmp, struct cifs_ses, smb_ses_list);
692 
693 		list_for_each(tmp1, &ses->tcon_list) {
694 			tcon = list_entry(tmp1, struct cifs_tcon, tcon_list);
695 
696 			spin_lock(&tcon->open_file_lock);
697 			list_for_each(tmp2, &tcon->openFileList) {
698 				cfile = list_entry(tmp2, struct cifsFileInfo,
699 						     tlist);
700 				if (rsp->PersistentFid !=
701 				    cfile->fid.persistent_fid ||
702 				    rsp->VolatileFid !=
703 				    cfile->fid.volatile_fid)
704 					continue;
705 
706 				cifs_dbg(FYI, "file id match, oplock break\n");
707 				cifs_stats_inc(
708 				    &tcon->stats.cifs_stats.num_oplock_brks);
709 				cinode = CIFS_I(d_inode(cfile->dentry));
710 				spin_lock(&cfile->file_info_lock);
711 				if (!CIFS_CACHE_WRITE(cinode) &&
712 				    rsp->OplockLevel == SMB2_OPLOCK_LEVEL_NONE)
713 					cfile->oplock_break_cancelled = true;
714 				else
715 					cfile->oplock_break_cancelled = false;
716 
717 				set_bit(CIFS_INODE_PENDING_OPLOCK_BREAK,
718 					&cinode->flags);
719 
720 				cfile->oplock_epoch = 0;
721 				cfile->oplock_level = rsp->OplockLevel;
722 
723 				spin_unlock(&cfile->file_info_lock);
724 
725 				cifs_queue_oplock_break(cfile);
726 
727 				spin_unlock(&tcon->open_file_lock);
728 				spin_unlock(&cifs_tcp_ses_lock);
729 				return true;
730 			}
731 			spin_unlock(&tcon->open_file_lock);
732 		}
733 	}
734 	spin_unlock(&cifs_tcp_ses_lock);
735 	cifs_dbg(FYI, "No file id matched, oplock break ignored\n");
736 	return true;
737 }
738 
739 void
smb2_cancelled_close_fid(struct work_struct * work)740 smb2_cancelled_close_fid(struct work_struct *work)
741 {
742 	struct close_cancelled_open *cancelled = container_of(work,
743 					struct close_cancelled_open, work);
744 
745 	cifs_dbg(VFS, "Close unmatched open\n");
746 
747 	SMB2_close(0, cancelled->tcon, cancelled->fid.persistent_fid,
748 		   cancelled->fid.volatile_fid);
749 	cifs_put_tcon(cancelled->tcon);
750 	kfree(cancelled);
751 }
752 
753 /* Caller should already has an extra reference to @tcon */
754 static int
__smb2_handle_cancelled_close(struct cifs_tcon * tcon,__u64 persistent_fid,__u64 volatile_fid)755 __smb2_handle_cancelled_close(struct cifs_tcon *tcon, __u64 persistent_fid,
756 			      __u64 volatile_fid)
757 {
758 	struct close_cancelled_open *cancelled;
759 
760 	cancelled = kzalloc(sizeof(*cancelled), GFP_ATOMIC);
761 	if (!cancelled)
762 		return -ENOMEM;
763 
764 	cancelled->fid.persistent_fid = persistent_fid;
765 	cancelled->fid.volatile_fid = volatile_fid;
766 	cancelled->tcon = tcon;
767 	INIT_WORK(&cancelled->work, smb2_cancelled_close_fid);
768 	WARN_ON(queue_work(cifsiod_wq, &cancelled->work) == false);
769 
770 	return 0;
771 }
772 
773 int
smb2_handle_cancelled_close(struct cifs_tcon * tcon,__u64 persistent_fid,__u64 volatile_fid)774 smb2_handle_cancelled_close(struct cifs_tcon *tcon, __u64 persistent_fid,
775 			    __u64 volatile_fid)
776 {
777 	int rc;
778 
779 	cifs_dbg(FYI, "%s: tc_count=%d\n", __func__, tcon->tc_count);
780 	spin_lock(&cifs_tcp_ses_lock);
781 	tcon->tc_count++;
782 	spin_unlock(&cifs_tcp_ses_lock);
783 
784 	rc = __smb2_handle_cancelled_close(tcon, persistent_fid, volatile_fid);
785 	if (rc)
786 		cifs_put_tcon(tcon);
787 
788 	return rc;
789 }
790 
791 int
smb2_handle_cancelled_mid(char * buffer,struct TCP_Server_Info * server)792 smb2_handle_cancelled_mid(char *buffer, struct TCP_Server_Info *server)
793 {
794 	struct smb2_sync_hdr *sync_hdr = (struct smb2_sync_hdr *)buffer;
795 	struct smb2_create_rsp *rsp = (struct smb2_create_rsp *)buffer;
796 	struct cifs_tcon *tcon;
797 	int rc;
798 
799 	if (sync_hdr->Command != SMB2_CREATE ||
800 	    sync_hdr->Status != STATUS_SUCCESS)
801 		return 0;
802 
803 	tcon = smb2_find_smb_tcon(server, sync_hdr->SessionId,
804 				  sync_hdr->TreeId);
805 	if (!tcon)
806 		return -ENOENT;
807 
808 	rc = __smb2_handle_cancelled_close(tcon, rsp->PersistentFileId,
809 					   rsp->VolatileFileId);
810 	if (rc)
811 		cifs_put_tcon(tcon);
812 
813 	return rc;
814 }
815 
816 /**
817  * smb311_update_preauth_hash - update @ses hash with the packet data in @iov
818  *
819  * Assumes @iov does not contain the rfc1002 length and iov[0] has the
820  * SMB2 header.
821  */
822 int
smb311_update_preauth_hash(struct cifs_ses * ses,struct kvec * iov,int nvec)823 smb311_update_preauth_hash(struct cifs_ses *ses, struct kvec *iov, int nvec)
824 {
825 	int i, rc;
826 	struct sdesc *d;
827 	struct smb2_sync_hdr *hdr;
828 
829 	if (ses->server->tcpStatus == CifsGood) {
830 		/* skip non smb311 connections */
831 		if (ses->server->dialect != SMB311_PROT_ID)
832 			return 0;
833 
834 		/* skip last sess setup response */
835 		hdr = (struct smb2_sync_hdr *)iov[0].iov_base;
836 		if (hdr->Flags & SMB2_FLAGS_SIGNED)
837 			return 0;
838 	}
839 
840 	rc = smb311_crypto_shash_allocate(ses->server);
841 	if (rc)
842 		return rc;
843 
844 	d = ses->server->secmech.sdescsha512;
845 	rc = crypto_shash_init(&d->shash);
846 	if (rc) {
847 		cifs_dbg(VFS, "%s: could not init sha512 shash\n", __func__);
848 		return rc;
849 	}
850 
851 	rc = crypto_shash_update(&d->shash, ses->preauth_sha_hash,
852 				 SMB2_PREAUTH_HASH_SIZE);
853 	if (rc) {
854 		cifs_dbg(VFS, "%s: could not update sha512 shash\n", __func__);
855 		return rc;
856 	}
857 
858 	for (i = 0; i < nvec; i++) {
859 		rc = crypto_shash_update(&d->shash,
860 					 iov[i].iov_base, iov[i].iov_len);
861 		if (rc) {
862 			cifs_dbg(VFS, "%s: could not update sha512 shash\n",
863 				 __func__);
864 			return rc;
865 		}
866 	}
867 
868 	rc = crypto_shash_final(&d->shash, ses->preauth_sha_hash);
869 	if (rc) {
870 		cifs_dbg(VFS, "%s: could not finalize sha512 shash\n",
871 			 __func__);
872 		return rc;
873 	}
874 
875 	return 0;
876 }
877