1 // SPDX-License-Identifier: GPL-2.0-or-later 2 /* 3 * Copyright (C) 2016 Namjae Jeon <linkinjeon@kernel.org> 4 * Copyright (C) 2018 Samsung Electronics Co., Ltd. 5 */ 6 7 #include <linux/moduleparam.h> 8 9 #include "glob.h" 10 #include "oplock.h" 11 12 #include "smb_common.h" 13 #include "smbstatus.h" 14 #include "connection.h" 15 #include "mgmt/user_session.h" 16 #include "mgmt/share_config.h" 17 #include "mgmt/tree_connect.h" 18 19 static LIST_HEAD(lease_table_list); 20 static DEFINE_RWLOCK(lease_list_lock); 21 22 /** 23 * alloc_opinfo() - allocate a new opinfo object for oplock info 24 * @work: smb work 25 * @id: fid of open file 26 * @Tid: tree id of connection 27 * 28 * Return: allocated opinfo object on success, otherwise NULL 29 */ 30 static struct oplock_info *alloc_opinfo(struct ksmbd_work *work, 31 u64 id, __u16 Tid) 32 { 33 struct ksmbd_conn *conn = work->conn; 34 struct ksmbd_session *sess = work->sess; 35 struct oplock_info *opinfo; 36 37 opinfo = kzalloc(sizeof(struct oplock_info), GFP_KERNEL); 38 if (!opinfo) 39 return NULL; 40 41 opinfo->sess = sess; 42 opinfo->conn = conn; 43 opinfo->level = SMB2_OPLOCK_LEVEL_NONE; 44 opinfo->op_state = OPLOCK_STATE_NONE; 45 opinfo->pending_break = 0; 46 opinfo->fid = id; 47 opinfo->Tid = Tid; 48 INIT_LIST_HEAD(&opinfo->op_entry); 49 INIT_LIST_HEAD(&opinfo->interim_list); 50 init_waitqueue_head(&opinfo->oplock_q); 51 init_waitqueue_head(&opinfo->oplock_brk); 52 atomic_set(&opinfo->refcount, 1); 53 atomic_set(&opinfo->breaking_cnt, 0); 54 55 return opinfo; 56 } 57 58 static void lease_add_list(struct oplock_info *opinfo) 59 { 60 struct lease_table *lb = opinfo->o_lease->l_lb; 61 62 spin_lock(&lb->lb_lock); 63 list_add_rcu(&opinfo->lease_entry, &lb->lease_list); 64 spin_unlock(&lb->lb_lock); 65 } 66 67 static void lease_del_list(struct oplock_info *opinfo) 68 { 69 struct lease_table *lb = opinfo->o_lease->l_lb; 70 71 if (!lb) 72 return; 73 74 spin_lock(&lb->lb_lock); 75 if (list_empty(&opinfo->lease_entry)) { 76 spin_unlock(&lb->lb_lock); 77 return; 78 } 79 80 list_del_init(&opinfo->lease_entry); 81 opinfo->o_lease->l_lb = NULL; 82 spin_unlock(&lb->lb_lock); 83 } 84 85 static void lb_add(struct lease_table *lb) 86 { 87 write_lock(&lease_list_lock); 88 list_add(&lb->l_entry, &lease_table_list); 89 write_unlock(&lease_list_lock); 90 } 91 92 static int alloc_lease(struct oplock_info *opinfo, struct lease_ctx_info *lctx) 93 { 94 struct lease *lease; 95 96 lease = kmalloc(sizeof(struct lease), GFP_KERNEL); 97 if (!lease) 98 return -ENOMEM; 99 100 memcpy(lease->lease_key, lctx->lease_key, SMB2_LEASE_KEY_SIZE); 101 lease->state = lctx->req_state; 102 lease->new_state = 0; 103 lease->flags = lctx->flags; 104 lease->duration = lctx->duration; 105 lease->is_dir = lctx->is_dir; 106 memcpy(lease->parent_lease_key, lctx->parent_lease_key, SMB2_LEASE_KEY_SIZE); 107 lease->version = lctx->version; 108 lease->epoch = le16_to_cpu(lctx->epoch); 109 INIT_LIST_HEAD(&opinfo->lease_entry); 110 opinfo->o_lease = lease; 111 112 return 0; 113 } 114 115 static void free_lease(struct oplock_info *opinfo) 116 { 117 struct lease *lease; 118 119 lease = opinfo->o_lease; 120 kfree(lease); 121 } 122 123 static void free_opinfo(struct oplock_info *opinfo) 124 { 125 if (opinfo->is_lease) 126 free_lease(opinfo); 127 kfree(opinfo); 128 } 129 130 static inline void opinfo_free_rcu(struct rcu_head *rcu_head) 131 { 132 struct oplock_info *opinfo; 133 134 opinfo = container_of(rcu_head, struct oplock_info, rcu_head); 135 free_opinfo(opinfo); 136 } 137 138 struct oplock_info *opinfo_get(struct ksmbd_file *fp) 139 { 140 struct oplock_info *opinfo; 141 142 rcu_read_lock(); 143 opinfo = rcu_dereference(fp->f_opinfo); 144 if (opinfo && !atomic_inc_not_zero(&opinfo->refcount)) 145 opinfo = NULL; 146 rcu_read_unlock(); 147 148 return opinfo; 149 } 150 151 static struct oplock_info *opinfo_get_list(struct ksmbd_inode *ci) 152 { 153 struct oplock_info *opinfo; 154 155 if (list_empty(&ci->m_op_list)) 156 return NULL; 157 158 rcu_read_lock(); 159 opinfo = list_first_or_null_rcu(&ci->m_op_list, struct oplock_info, 160 op_entry); 161 if (opinfo) { 162 if (!atomic_inc_not_zero(&opinfo->refcount)) 163 opinfo = NULL; 164 else { 165 atomic_inc(&opinfo->conn->r_count); 166 if (ksmbd_conn_releasing(opinfo->conn)) { 167 atomic_dec(&opinfo->conn->r_count); 168 atomic_dec(&opinfo->refcount); 169 opinfo = NULL; 170 } 171 } 172 } 173 174 rcu_read_unlock(); 175 176 return opinfo; 177 } 178 179 static void opinfo_conn_put(struct oplock_info *opinfo) 180 { 181 struct ksmbd_conn *conn; 182 183 if (!opinfo) 184 return; 185 186 conn = opinfo->conn; 187 /* 188 * Checking waitqueue to dropping pending requests on 189 * disconnection. waitqueue_active is safe because it 190 * uses atomic operation for condition. 191 */ 192 if (!atomic_dec_return(&conn->r_count) && waitqueue_active(&conn->r_count_q)) 193 wake_up(&conn->r_count_q); 194 opinfo_put(opinfo); 195 } 196 197 void opinfo_put(struct oplock_info *opinfo) 198 { 199 if (!atomic_dec_and_test(&opinfo->refcount)) 200 return; 201 202 call_rcu(&opinfo->rcu_head, opinfo_free_rcu); 203 } 204 205 static void opinfo_add(struct oplock_info *opinfo) 206 { 207 struct ksmbd_inode *ci = opinfo->o_fp->f_ci; 208 209 write_lock(&ci->m_lock); 210 list_add_rcu(&opinfo->op_entry, &ci->m_op_list); 211 write_unlock(&ci->m_lock); 212 } 213 214 static void opinfo_del(struct oplock_info *opinfo) 215 { 216 struct ksmbd_inode *ci = opinfo->o_fp->f_ci; 217 218 if (opinfo->is_lease) { 219 write_lock(&lease_list_lock); 220 lease_del_list(opinfo); 221 write_unlock(&lease_list_lock); 222 } 223 write_lock(&ci->m_lock); 224 list_del_rcu(&opinfo->op_entry); 225 write_unlock(&ci->m_lock); 226 } 227 228 static unsigned long opinfo_count(struct ksmbd_file *fp) 229 { 230 if (ksmbd_stream_fd(fp)) 231 return atomic_read(&fp->f_ci->sop_count); 232 else 233 return atomic_read(&fp->f_ci->op_count); 234 } 235 236 static void opinfo_count_inc(struct ksmbd_file *fp) 237 { 238 if (ksmbd_stream_fd(fp)) 239 return atomic_inc(&fp->f_ci->sop_count); 240 else 241 return atomic_inc(&fp->f_ci->op_count); 242 } 243 244 static void opinfo_count_dec(struct ksmbd_file *fp) 245 { 246 if (ksmbd_stream_fd(fp)) 247 return atomic_dec(&fp->f_ci->sop_count); 248 else 249 return atomic_dec(&fp->f_ci->op_count); 250 } 251 252 /** 253 * opinfo_write_to_read() - convert a write oplock to read oplock 254 * @opinfo: current oplock info 255 * 256 * Return: 0 on success, otherwise -EINVAL 257 */ 258 int opinfo_write_to_read(struct oplock_info *opinfo) 259 { 260 struct lease *lease = opinfo->o_lease; 261 262 if (!(opinfo->level == SMB2_OPLOCK_LEVEL_BATCH || 263 opinfo->level == SMB2_OPLOCK_LEVEL_EXCLUSIVE)) { 264 pr_err("bad oplock(0x%x)\n", opinfo->level); 265 if (opinfo->is_lease) 266 pr_err("lease state(0x%x)\n", lease->state); 267 return -EINVAL; 268 } 269 opinfo->level = SMB2_OPLOCK_LEVEL_II; 270 271 if (opinfo->is_lease) 272 lease->state = lease->new_state; 273 return 0; 274 } 275 276 /** 277 * opinfo_read_handle_to_read() - convert a read/handle oplock to read oplock 278 * @opinfo: current oplock info 279 * 280 * Return: 0 on success, otherwise -EINVAL 281 */ 282 int opinfo_read_handle_to_read(struct oplock_info *opinfo) 283 { 284 struct lease *lease = opinfo->o_lease; 285 286 lease->state = lease->new_state; 287 opinfo->level = SMB2_OPLOCK_LEVEL_II; 288 return 0; 289 } 290 291 /** 292 * opinfo_write_to_none() - convert a write oplock to none 293 * @opinfo: current oplock info 294 * 295 * Return: 0 on success, otherwise -EINVAL 296 */ 297 int opinfo_write_to_none(struct oplock_info *opinfo) 298 { 299 struct lease *lease = opinfo->o_lease; 300 301 if (!(opinfo->level == SMB2_OPLOCK_LEVEL_BATCH || 302 opinfo->level == SMB2_OPLOCK_LEVEL_EXCLUSIVE)) { 303 pr_err("bad oplock(0x%x)\n", opinfo->level); 304 if (opinfo->is_lease) 305 pr_err("lease state(0x%x)\n", lease->state); 306 return -EINVAL; 307 } 308 opinfo->level = SMB2_OPLOCK_LEVEL_NONE; 309 if (opinfo->is_lease) 310 lease->state = lease->new_state; 311 return 0; 312 } 313 314 /** 315 * opinfo_read_to_none() - convert a write read to none 316 * @opinfo: current oplock info 317 * 318 * Return: 0 on success, otherwise -EINVAL 319 */ 320 int opinfo_read_to_none(struct oplock_info *opinfo) 321 { 322 struct lease *lease = opinfo->o_lease; 323 324 if (opinfo->level != SMB2_OPLOCK_LEVEL_II) { 325 pr_err("bad oplock(0x%x)\n", opinfo->level); 326 if (opinfo->is_lease) 327 pr_err("lease state(0x%x)\n", lease->state); 328 return -EINVAL; 329 } 330 opinfo->level = SMB2_OPLOCK_LEVEL_NONE; 331 if (opinfo->is_lease) 332 lease->state = lease->new_state; 333 return 0; 334 } 335 336 /** 337 * lease_read_to_write() - upgrade lease state from read to write 338 * @opinfo: current lease info 339 * 340 * Return: 0 on success, otherwise -EINVAL 341 */ 342 int lease_read_to_write(struct oplock_info *opinfo) 343 { 344 struct lease *lease = opinfo->o_lease; 345 346 if (!(lease->state & SMB2_LEASE_READ_CACHING_LE)) { 347 ksmbd_debug(OPLOCK, "bad lease state(0x%x)\n", lease->state); 348 return -EINVAL; 349 } 350 351 lease->new_state = SMB2_LEASE_NONE_LE; 352 lease->state |= SMB2_LEASE_WRITE_CACHING_LE; 353 if (lease->state & SMB2_LEASE_HANDLE_CACHING_LE) 354 opinfo->level = SMB2_OPLOCK_LEVEL_BATCH; 355 else 356 opinfo->level = SMB2_OPLOCK_LEVEL_EXCLUSIVE; 357 return 0; 358 } 359 360 /** 361 * lease_none_upgrade() - upgrade lease state from none 362 * @opinfo: current lease info 363 * @new_state: new lease state 364 * 365 * Return: 0 on success, otherwise -EINVAL 366 */ 367 static int lease_none_upgrade(struct oplock_info *opinfo, __le32 new_state) 368 { 369 struct lease *lease = opinfo->o_lease; 370 371 if (!(lease->state == SMB2_LEASE_NONE_LE)) { 372 ksmbd_debug(OPLOCK, "bad lease state(0x%x)\n", lease->state); 373 return -EINVAL; 374 } 375 376 lease->new_state = SMB2_LEASE_NONE_LE; 377 lease->state = new_state; 378 if (lease->state & SMB2_LEASE_HANDLE_CACHING_LE) 379 if (lease->state & SMB2_LEASE_WRITE_CACHING_LE) 380 opinfo->level = SMB2_OPLOCK_LEVEL_BATCH; 381 else 382 opinfo->level = SMB2_OPLOCK_LEVEL_II; 383 else if (lease->state & SMB2_LEASE_WRITE_CACHING_LE) 384 opinfo->level = SMB2_OPLOCK_LEVEL_EXCLUSIVE; 385 else if (lease->state & SMB2_LEASE_READ_CACHING_LE) 386 opinfo->level = SMB2_OPLOCK_LEVEL_II; 387 388 return 0; 389 } 390 391 /** 392 * close_id_del_oplock() - release oplock object at file close time 393 * @fp: ksmbd file pointer 394 */ 395 void close_id_del_oplock(struct ksmbd_file *fp) 396 { 397 struct oplock_info *opinfo; 398 399 if (fp->reserve_lease_break) 400 smb_lazy_parent_lease_break_close(fp); 401 402 opinfo = opinfo_get(fp); 403 if (!opinfo) 404 return; 405 406 opinfo_del(opinfo); 407 408 rcu_assign_pointer(fp->f_opinfo, NULL); 409 if (opinfo->op_state == OPLOCK_ACK_WAIT) { 410 opinfo->op_state = OPLOCK_CLOSING; 411 wake_up_interruptible_all(&opinfo->oplock_q); 412 if (opinfo->is_lease) { 413 atomic_set(&opinfo->breaking_cnt, 0); 414 wake_up_interruptible_all(&opinfo->oplock_brk); 415 } 416 } 417 418 opinfo_count_dec(fp); 419 atomic_dec(&opinfo->refcount); 420 opinfo_put(opinfo); 421 } 422 423 /** 424 * grant_write_oplock() - grant exclusive/batch oplock or write lease 425 * @opinfo_new: new oplock info object 426 * @req_oplock: request oplock 427 * @lctx: lease context information 428 * 429 * Return: 0 430 */ 431 static void grant_write_oplock(struct oplock_info *opinfo_new, int req_oplock, 432 struct lease_ctx_info *lctx) 433 { 434 struct lease *lease = opinfo_new->o_lease; 435 436 if (req_oplock == SMB2_OPLOCK_LEVEL_BATCH) 437 opinfo_new->level = SMB2_OPLOCK_LEVEL_BATCH; 438 else 439 opinfo_new->level = SMB2_OPLOCK_LEVEL_EXCLUSIVE; 440 441 if (lctx) { 442 lease->state = lctx->req_state; 443 memcpy(lease->lease_key, lctx->lease_key, SMB2_LEASE_KEY_SIZE); 444 } 445 } 446 447 /** 448 * grant_read_oplock() - grant level2 oplock or read lease 449 * @opinfo_new: new oplock info object 450 * @lctx: lease context information 451 * 452 * Return: 0 453 */ 454 static void grant_read_oplock(struct oplock_info *opinfo_new, 455 struct lease_ctx_info *lctx) 456 { 457 struct lease *lease = opinfo_new->o_lease; 458 459 opinfo_new->level = SMB2_OPLOCK_LEVEL_II; 460 461 if (lctx) { 462 lease->state = SMB2_LEASE_READ_CACHING_LE; 463 if (lctx->req_state & SMB2_LEASE_HANDLE_CACHING_LE) 464 lease->state |= SMB2_LEASE_HANDLE_CACHING_LE; 465 memcpy(lease->lease_key, lctx->lease_key, SMB2_LEASE_KEY_SIZE); 466 } 467 } 468 469 /** 470 * grant_none_oplock() - grant none oplock or none lease 471 * @opinfo_new: new oplock info object 472 * @lctx: lease context information 473 * 474 * Return: 0 475 */ 476 static void grant_none_oplock(struct oplock_info *opinfo_new, 477 struct lease_ctx_info *lctx) 478 { 479 struct lease *lease = opinfo_new->o_lease; 480 481 opinfo_new->level = SMB2_OPLOCK_LEVEL_NONE; 482 483 if (lctx) { 484 lease->state = 0; 485 memcpy(lease->lease_key, lctx->lease_key, SMB2_LEASE_KEY_SIZE); 486 } 487 } 488 489 static inline int compare_guid_key(struct oplock_info *opinfo, 490 const char *guid1, const char *key1) 491 { 492 const char *guid2, *key2; 493 494 guid2 = opinfo->conn->ClientGUID; 495 key2 = opinfo->o_lease->lease_key; 496 if (!memcmp(guid1, guid2, SMB2_CLIENT_GUID_SIZE) && 497 !memcmp(key1, key2, SMB2_LEASE_KEY_SIZE)) 498 return 1; 499 500 return 0; 501 } 502 503 /** 504 * same_client_has_lease() - check whether current lease request is 505 * from lease owner of file 506 * @ci: master file pointer 507 * @client_guid: Client GUID 508 * @lctx: lease context information 509 * 510 * Return: oplock(lease) object on success, otherwise NULL 511 */ 512 static struct oplock_info *same_client_has_lease(struct ksmbd_inode *ci, 513 char *client_guid, 514 struct lease_ctx_info *lctx) 515 { 516 int ret; 517 struct lease *lease; 518 struct oplock_info *opinfo; 519 struct oplock_info *m_opinfo = NULL; 520 521 if (!lctx) 522 return NULL; 523 524 /* 525 * Compare lease key and client_guid to know request from same owner 526 * of same client 527 */ 528 read_lock(&ci->m_lock); 529 list_for_each_entry(opinfo, &ci->m_op_list, op_entry) { 530 if (!opinfo->is_lease) 531 continue; 532 read_unlock(&ci->m_lock); 533 lease = opinfo->o_lease; 534 535 ret = compare_guid_key(opinfo, client_guid, lctx->lease_key); 536 if (ret) { 537 m_opinfo = opinfo; 538 /* skip upgrading lease about breaking lease */ 539 if (atomic_read(&opinfo->breaking_cnt)) { 540 read_lock(&ci->m_lock); 541 continue; 542 } 543 544 /* upgrading lease */ 545 if ((atomic_read(&ci->op_count) + 546 atomic_read(&ci->sop_count)) == 1) { 547 if (lease->state != SMB2_LEASE_NONE_LE && 548 lease->state == (lctx->req_state & lease->state)) { 549 lease->state |= lctx->req_state; 550 if (lctx->req_state & 551 SMB2_LEASE_WRITE_CACHING_LE) 552 lease_read_to_write(opinfo); 553 554 } 555 } else if ((atomic_read(&ci->op_count) + 556 atomic_read(&ci->sop_count)) > 1) { 557 if (lctx->req_state == 558 (SMB2_LEASE_READ_CACHING_LE | 559 SMB2_LEASE_HANDLE_CACHING_LE)) 560 lease->state = lctx->req_state; 561 } 562 563 if (lctx->req_state && lease->state == 564 SMB2_LEASE_NONE_LE) 565 lease_none_upgrade(opinfo, lctx->req_state); 566 } 567 read_lock(&ci->m_lock); 568 } 569 read_unlock(&ci->m_lock); 570 571 return m_opinfo; 572 } 573 574 static void wait_for_break_ack(struct oplock_info *opinfo) 575 { 576 int rc = 0; 577 578 rc = wait_event_interruptible_timeout(opinfo->oplock_q, 579 opinfo->op_state == OPLOCK_STATE_NONE || 580 opinfo->op_state == OPLOCK_CLOSING, 581 OPLOCK_WAIT_TIME); 582 583 /* is this a timeout ? */ 584 if (!rc) { 585 if (opinfo->is_lease) 586 opinfo->o_lease->state = SMB2_LEASE_NONE_LE; 587 opinfo->level = SMB2_OPLOCK_LEVEL_NONE; 588 opinfo->op_state = OPLOCK_STATE_NONE; 589 } 590 } 591 592 static void wake_up_oplock_break(struct oplock_info *opinfo) 593 { 594 clear_bit_unlock(0, &opinfo->pending_break); 595 /* memory barrier is needed for wake_up_bit() */ 596 smp_mb__after_atomic(); 597 wake_up_bit(&opinfo->pending_break, 0); 598 } 599 600 static int oplock_break_pending(struct oplock_info *opinfo, int req_op_level) 601 { 602 while (test_and_set_bit(0, &opinfo->pending_break)) { 603 wait_on_bit(&opinfo->pending_break, 0, TASK_UNINTERRUPTIBLE); 604 605 /* Not immediately break to none. */ 606 opinfo->open_trunc = 0; 607 608 if (opinfo->op_state == OPLOCK_CLOSING) 609 return -ENOENT; 610 else if (!opinfo->is_lease && opinfo->level <= req_op_level) 611 return 1; 612 } 613 614 if (!opinfo->is_lease && opinfo->level <= req_op_level) { 615 wake_up_oplock_break(opinfo); 616 return 1; 617 } 618 return 0; 619 } 620 621 /** 622 * __smb2_oplock_break_noti() - send smb2 oplock break cmd from conn 623 * to client 624 * @wk: smb work object 625 * 626 * There are two ways this function can be called. 1- while file open we break 627 * from exclusive/batch lock to levelII oplock and 2- while file write/truncate 628 * we break from levelII oplock no oplock. 629 * work->request_buf contains oplock_info. 630 */ 631 static void __smb2_oplock_break_noti(struct work_struct *wk) 632 { 633 struct smb2_oplock_break *rsp = NULL; 634 struct ksmbd_work *work = container_of(wk, struct ksmbd_work, work); 635 struct oplock_break_info *br_info = work->request_buf; 636 struct smb2_hdr *rsp_hdr; 637 struct ksmbd_file *fp; 638 639 fp = ksmbd_lookup_durable_fd(br_info->fid); 640 if (!fp) 641 goto out; 642 643 if (allocate_interim_rsp_buf(work)) { 644 pr_err("smb2_allocate_rsp_buf failed! "); 645 ksmbd_fd_put(work, fp); 646 goto out; 647 } 648 649 rsp_hdr = smb2_get_msg(work->response_buf); 650 memset(rsp_hdr, 0, sizeof(struct smb2_hdr) + 2); 651 rsp_hdr->ProtocolId = SMB2_PROTO_NUMBER; 652 rsp_hdr->StructureSize = SMB2_HEADER_STRUCTURE_SIZE; 653 rsp_hdr->CreditRequest = cpu_to_le16(0); 654 rsp_hdr->Command = SMB2_OPLOCK_BREAK; 655 rsp_hdr->Flags = (SMB2_FLAGS_SERVER_TO_REDIR); 656 rsp_hdr->NextCommand = 0; 657 rsp_hdr->MessageId = cpu_to_le64(-1); 658 rsp_hdr->Id.SyncId.ProcessId = 0; 659 rsp_hdr->Id.SyncId.TreeId = 0; 660 rsp_hdr->SessionId = 0; 661 memset(rsp_hdr->Signature, 0, 16); 662 663 rsp = smb2_get_msg(work->response_buf); 664 665 rsp->StructureSize = cpu_to_le16(24); 666 if (!br_info->open_trunc && 667 (br_info->level == SMB2_OPLOCK_LEVEL_BATCH || 668 br_info->level == SMB2_OPLOCK_LEVEL_EXCLUSIVE)) 669 rsp->OplockLevel = SMB2_OPLOCK_LEVEL_II; 670 else 671 rsp->OplockLevel = SMB2_OPLOCK_LEVEL_NONE; 672 rsp->Reserved = 0; 673 rsp->Reserved2 = 0; 674 rsp->PersistentFid = fp->persistent_id; 675 rsp->VolatileFid = fp->volatile_id; 676 677 ksmbd_fd_put(work, fp); 678 if (ksmbd_iov_pin_rsp(work, (void *)rsp, 679 sizeof(struct smb2_oplock_break))) 680 goto out; 681 682 ksmbd_debug(OPLOCK, 683 "sending oplock break v_id %llu p_id = %llu lock level = %d\n", 684 rsp->VolatileFid, rsp->PersistentFid, rsp->OplockLevel); 685 686 ksmbd_conn_write(work); 687 688 out: 689 ksmbd_free_work_struct(work); 690 } 691 692 /** 693 * smb2_oplock_break_noti() - send smb2 exclusive/batch to level2 oplock 694 * break command from server to client 695 * @opinfo: oplock info object 696 * 697 * Return: 0 on success, otherwise error 698 */ 699 static int smb2_oplock_break_noti(struct oplock_info *opinfo) 700 { 701 struct ksmbd_conn *conn = opinfo->conn; 702 struct oplock_break_info *br_info; 703 int ret = 0; 704 struct ksmbd_work *work = ksmbd_alloc_work_struct(); 705 706 if (!work) 707 return -ENOMEM; 708 709 br_info = kmalloc(sizeof(struct oplock_break_info), GFP_KERNEL); 710 if (!br_info) { 711 ksmbd_free_work_struct(work); 712 return -ENOMEM; 713 } 714 715 br_info->level = opinfo->level; 716 br_info->fid = opinfo->fid; 717 br_info->open_trunc = opinfo->open_trunc; 718 719 work->request_buf = (char *)br_info; 720 work->conn = conn; 721 work->sess = opinfo->sess; 722 723 if (opinfo->op_state == OPLOCK_ACK_WAIT) { 724 INIT_WORK(&work->work, __smb2_oplock_break_noti); 725 ksmbd_queue_work(work); 726 727 wait_for_break_ack(opinfo); 728 } else { 729 __smb2_oplock_break_noti(&work->work); 730 if (opinfo->level == SMB2_OPLOCK_LEVEL_II) 731 opinfo->level = SMB2_OPLOCK_LEVEL_NONE; 732 } 733 return ret; 734 } 735 736 /** 737 * __smb2_lease_break_noti() - send lease break command from server 738 * to client 739 * @wk: smb work object 740 */ 741 static void __smb2_lease_break_noti(struct work_struct *wk) 742 { 743 struct smb2_lease_break *rsp = NULL; 744 struct ksmbd_work *work = container_of(wk, struct ksmbd_work, work); 745 struct lease_break_info *br_info = work->request_buf; 746 struct smb2_hdr *rsp_hdr; 747 748 if (allocate_interim_rsp_buf(work)) { 749 ksmbd_debug(OPLOCK, "smb2_allocate_rsp_buf failed! "); 750 goto out; 751 } 752 753 rsp_hdr = smb2_get_msg(work->response_buf); 754 memset(rsp_hdr, 0, sizeof(struct smb2_hdr) + 2); 755 rsp_hdr->ProtocolId = SMB2_PROTO_NUMBER; 756 rsp_hdr->StructureSize = SMB2_HEADER_STRUCTURE_SIZE; 757 rsp_hdr->CreditRequest = cpu_to_le16(0); 758 rsp_hdr->Command = SMB2_OPLOCK_BREAK; 759 rsp_hdr->Flags = (SMB2_FLAGS_SERVER_TO_REDIR); 760 rsp_hdr->NextCommand = 0; 761 rsp_hdr->MessageId = cpu_to_le64(-1); 762 rsp_hdr->Id.SyncId.ProcessId = 0; 763 rsp_hdr->Id.SyncId.TreeId = 0; 764 rsp_hdr->SessionId = 0; 765 memset(rsp_hdr->Signature, 0, 16); 766 767 rsp = smb2_get_msg(work->response_buf); 768 rsp->StructureSize = cpu_to_le16(44); 769 rsp->Epoch = br_info->epoch; 770 rsp->Flags = 0; 771 772 if (br_info->curr_state & (SMB2_LEASE_WRITE_CACHING_LE | 773 SMB2_LEASE_HANDLE_CACHING_LE)) 774 rsp->Flags = SMB2_NOTIFY_BREAK_LEASE_FLAG_ACK_REQUIRED; 775 776 memcpy(rsp->LeaseKey, br_info->lease_key, SMB2_LEASE_KEY_SIZE); 777 rsp->CurrentLeaseState = br_info->curr_state; 778 rsp->NewLeaseState = br_info->new_state; 779 rsp->BreakReason = 0; 780 rsp->AccessMaskHint = 0; 781 rsp->ShareMaskHint = 0; 782 783 if (ksmbd_iov_pin_rsp(work, (void *)rsp, 784 sizeof(struct smb2_lease_break))) 785 goto out; 786 787 ksmbd_conn_write(work); 788 789 out: 790 ksmbd_free_work_struct(work); 791 } 792 793 /** 794 * smb2_lease_break_noti() - break lease when a new client request 795 * write lease 796 * @opinfo: conains lease state information 797 * 798 * Return: 0 on success, otherwise error 799 */ 800 static int smb2_lease_break_noti(struct oplock_info *opinfo) 801 { 802 struct ksmbd_conn *conn = opinfo->conn; 803 struct list_head *tmp, *t; 804 struct ksmbd_work *work; 805 struct lease_break_info *br_info; 806 struct lease *lease = opinfo->o_lease; 807 808 work = ksmbd_alloc_work_struct(); 809 if (!work) 810 return -ENOMEM; 811 812 br_info = kmalloc(sizeof(struct lease_break_info), GFP_KERNEL); 813 if (!br_info) { 814 ksmbd_free_work_struct(work); 815 return -ENOMEM; 816 } 817 818 br_info->curr_state = lease->state; 819 br_info->new_state = lease->new_state; 820 if (lease->version == 2) 821 br_info->epoch = cpu_to_le16(++lease->epoch); 822 else 823 br_info->epoch = 0; 824 memcpy(br_info->lease_key, lease->lease_key, SMB2_LEASE_KEY_SIZE); 825 826 work->request_buf = (char *)br_info; 827 work->conn = conn; 828 work->sess = opinfo->sess; 829 830 if (opinfo->op_state == OPLOCK_ACK_WAIT) { 831 list_for_each_safe(tmp, t, &opinfo->interim_list) { 832 struct ksmbd_work *in_work; 833 834 in_work = list_entry(tmp, struct ksmbd_work, 835 interim_entry); 836 setup_async_work(in_work, NULL, NULL); 837 smb2_send_interim_resp(in_work, STATUS_PENDING); 838 list_del_init(&in_work->interim_entry); 839 release_async_work(in_work); 840 } 841 INIT_WORK(&work->work, __smb2_lease_break_noti); 842 ksmbd_queue_work(work); 843 wait_for_break_ack(opinfo); 844 } else { 845 __smb2_lease_break_noti(&work->work); 846 if (opinfo->o_lease->new_state == SMB2_LEASE_NONE_LE) { 847 opinfo->level = SMB2_OPLOCK_LEVEL_NONE; 848 opinfo->o_lease->state = SMB2_LEASE_NONE_LE; 849 } 850 } 851 return 0; 852 } 853 854 static void wait_lease_breaking(struct oplock_info *opinfo) 855 { 856 if (!opinfo->is_lease) 857 return; 858 859 wake_up_interruptible_all(&opinfo->oplock_brk); 860 if (atomic_read(&opinfo->breaking_cnt)) { 861 int ret = 0; 862 863 ret = wait_event_interruptible_timeout(opinfo->oplock_brk, 864 atomic_read(&opinfo->breaking_cnt) == 0, 865 HZ); 866 if (!ret) 867 atomic_set(&opinfo->breaking_cnt, 0); 868 } 869 } 870 871 static int oplock_break(struct oplock_info *brk_opinfo, int req_op_level) 872 { 873 int err = 0; 874 875 /* Need to break exclusive/batch oplock, write lease or overwrite_if */ 876 ksmbd_debug(OPLOCK, 877 "request to send oplock(level : 0x%x) break notification\n", 878 brk_opinfo->level); 879 880 if (brk_opinfo->is_lease) { 881 struct lease *lease = brk_opinfo->o_lease; 882 883 atomic_inc(&brk_opinfo->breaking_cnt); 884 885 err = oplock_break_pending(brk_opinfo, req_op_level); 886 if (err) 887 return err < 0 ? err : 0; 888 889 if (brk_opinfo->open_trunc) { 890 /* 891 * Create overwrite break trigger the lease break to 892 * none. 893 */ 894 lease->new_state = SMB2_LEASE_NONE_LE; 895 } else { 896 if (lease->state & SMB2_LEASE_WRITE_CACHING_LE) { 897 if (lease->state & SMB2_LEASE_HANDLE_CACHING_LE) 898 lease->new_state = 899 SMB2_LEASE_READ_CACHING_LE | 900 SMB2_LEASE_HANDLE_CACHING_LE; 901 else 902 lease->new_state = 903 SMB2_LEASE_READ_CACHING_LE; 904 } else { 905 if (lease->state & SMB2_LEASE_HANDLE_CACHING_LE && 906 !lease->is_dir) 907 lease->new_state = 908 SMB2_LEASE_READ_CACHING_LE; 909 else 910 lease->new_state = SMB2_LEASE_NONE_LE; 911 } 912 } 913 914 if (lease->state & (SMB2_LEASE_WRITE_CACHING_LE | 915 SMB2_LEASE_HANDLE_CACHING_LE)) 916 brk_opinfo->op_state = OPLOCK_ACK_WAIT; 917 else 918 atomic_dec(&brk_opinfo->breaking_cnt); 919 } else { 920 err = oplock_break_pending(brk_opinfo, req_op_level); 921 if (err) 922 return err < 0 ? err : 0; 923 924 if (brk_opinfo->level == SMB2_OPLOCK_LEVEL_BATCH || 925 brk_opinfo->level == SMB2_OPLOCK_LEVEL_EXCLUSIVE) 926 brk_opinfo->op_state = OPLOCK_ACK_WAIT; 927 } 928 929 if (brk_opinfo->is_lease) 930 err = smb2_lease_break_noti(brk_opinfo); 931 else 932 err = smb2_oplock_break_noti(brk_opinfo); 933 934 ksmbd_debug(OPLOCK, "oplock granted = %d\n", brk_opinfo->level); 935 if (brk_opinfo->op_state == OPLOCK_CLOSING) 936 err = -ENOENT; 937 wake_up_oplock_break(brk_opinfo); 938 939 wait_lease_breaking(brk_opinfo); 940 941 return err; 942 } 943 944 void destroy_lease_table(struct ksmbd_conn *conn) 945 { 946 struct lease_table *lb, *lbtmp; 947 struct oplock_info *opinfo; 948 949 write_lock(&lease_list_lock); 950 if (list_empty(&lease_table_list)) { 951 write_unlock(&lease_list_lock); 952 return; 953 } 954 955 list_for_each_entry_safe(lb, lbtmp, &lease_table_list, l_entry) { 956 if (conn && memcmp(lb->client_guid, conn->ClientGUID, 957 SMB2_CLIENT_GUID_SIZE)) 958 continue; 959 again: 960 rcu_read_lock(); 961 list_for_each_entry_rcu(opinfo, &lb->lease_list, 962 lease_entry) { 963 rcu_read_unlock(); 964 lease_del_list(opinfo); 965 goto again; 966 } 967 rcu_read_unlock(); 968 list_del(&lb->l_entry); 969 kfree(lb); 970 } 971 write_unlock(&lease_list_lock); 972 } 973 974 int find_same_lease_key(struct ksmbd_session *sess, struct ksmbd_inode *ci, 975 struct lease_ctx_info *lctx) 976 { 977 struct oplock_info *opinfo; 978 int err = 0; 979 struct lease_table *lb; 980 981 if (!lctx) 982 return err; 983 984 read_lock(&lease_list_lock); 985 if (list_empty(&lease_table_list)) { 986 read_unlock(&lease_list_lock); 987 return 0; 988 } 989 990 list_for_each_entry(lb, &lease_table_list, l_entry) { 991 if (!memcmp(lb->client_guid, sess->ClientGUID, 992 SMB2_CLIENT_GUID_SIZE)) 993 goto found; 994 } 995 read_unlock(&lease_list_lock); 996 997 return 0; 998 999 found: 1000 rcu_read_lock(); 1001 list_for_each_entry_rcu(opinfo, &lb->lease_list, lease_entry) { 1002 if (!atomic_inc_not_zero(&opinfo->refcount)) 1003 continue; 1004 rcu_read_unlock(); 1005 if (opinfo->o_fp->f_ci == ci) 1006 goto op_next; 1007 err = compare_guid_key(opinfo, sess->ClientGUID, 1008 lctx->lease_key); 1009 if (err) { 1010 err = -EINVAL; 1011 ksmbd_debug(OPLOCK, 1012 "found same lease key is already used in other files\n"); 1013 opinfo_put(opinfo); 1014 goto out; 1015 } 1016 op_next: 1017 opinfo_put(opinfo); 1018 rcu_read_lock(); 1019 } 1020 rcu_read_unlock(); 1021 1022 out: 1023 read_unlock(&lease_list_lock); 1024 return err; 1025 } 1026 1027 static void copy_lease(struct oplock_info *op1, struct oplock_info *op2) 1028 { 1029 struct lease *lease1 = op1->o_lease; 1030 struct lease *lease2 = op2->o_lease; 1031 1032 op2->level = op1->level; 1033 lease2->state = lease1->state; 1034 memcpy(lease2->lease_key, lease1->lease_key, 1035 SMB2_LEASE_KEY_SIZE); 1036 lease2->duration = lease1->duration; 1037 lease2->flags = lease1->flags; 1038 lease2->epoch = lease1->epoch++; 1039 } 1040 1041 static int add_lease_global_list(struct oplock_info *opinfo) 1042 { 1043 struct lease_table *lb; 1044 1045 read_lock(&lease_list_lock); 1046 list_for_each_entry(lb, &lease_table_list, l_entry) { 1047 if (!memcmp(lb->client_guid, opinfo->conn->ClientGUID, 1048 SMB2_CLIENT_GUID_SIZE)) { 1049 opinfo->o_lease->l_lb = lb; 1050 lease_add_list(opinfo); 1051 read_unlock(&lease_list_lock); 1052 return 0; 1053 } 1054 } 1055 read_unlock(&lease_list_lock); 1056 1057 lb = kmalloc(sizeof(struct lease_table), GFP_KERNEL); 1058 if (!lb) 1059 return -ENOMEM; 1060 1061 memcpy(lb->client_guid, opinfo->conn->ClientGUID, 1062 SMB2_CLIENT_GUID_SIZE); 1063 INIT_LIST_HEAD(&lb->lease_list); 1064 spin_lock_init(&lb->lb_lock); 1065 opinfo->o_lease->l_lb = lb; 1066 lease_add_list(opinfo); 1067 lb_add(lb); 1068 return 0; 1069 } 1070 1071 static void set_oplock_level(struct oplock_info *opinfo, int level, 1072 struct lease_ctx_info *lctx) 1073 { 1074 switch (level) { 1075 case SMB2_OPLOCK_LEVEL_BATCH: 1076 case SMB2_OPLOCK_LEVEL_EXCLUSIVE: 1077 grant_write_oplock(opinfo, level, lctx); 1078 break; 1079 case SMB2_OPLOCK_LEVEL_II: 1080 grant_read_oplock(opinfo, lctx); 1081 break; 1082 default: 1083 grant_none_oplock(opinfo, lctx); 1084 break; 1085 } 1086 } 1087 1088 void smb_send_parent_lease_break_noti(struct ksmbd_file *fp, 1089 struct lease_ctx_info *lctx) 1090 { 1091 struct oplock_info *opinfo; 1092 struct ksmbd_inode *p_ci = NULL; 1093 1094 if (lctx->version != 2) 1095 return; 1096 1097 p_ci = ksmbd_inode_lookup_lock(fp->filp->f_path.dentry->d_parent); 1098 if (!p_ci) 1099 return; 1100 1101 read_lock(&p_ci->m_lock); 1102 list_for_each_entry(opinfo, &p_ci->m_op_list, op_entry) { 1103 if (!opinfo->is_lease) 1104 continue; 1105 1106 if (opinfo->o_lease->state != SMB2_OPLOCK_LEVEL_NONE && 1107 (!(lctx->flags & SMB2_LEASE_FLAG_PARENT_LEASE_KEY_SET_LE) || 1108 !compare_guid_key(opinfo, fp->conn->ClientGUID, 1109 lctx->parent_lease_key))) { 1110 if (!atomic_inc_not_zero(&opinfo->refcount)) 1111 continue; 1112 1113 atomic_inc(&opinfo->conn->r_count); 1114 if (ksmbd_conn_releasing(opinfo->conn)) { 1115 atomic_dec(&opinfo->conn->r_count); 1116 continue; 1117 } 1118 1119 read_unlock(&p_ci->m_lock); 1120 oplock_break(opinfo, SMB2_OPLOCK_LEVEL_NONE); 1121 opinfo_conn_put(opinfo); 1122 read_lock(&p_ci->m_lock); 1123 } 1124 } 1125 read_unlock(&p_ci->m_lock); 1126 1127 ksmbd_inode_put(p_ci); 1128 } 1129 1130 void smb_lazy_parent_lease_break_close(struct ksmbd_file *fp) 1131 { 1132 struct oplock_info *opinfo; 1133 struct ksmbd_inode *p_ci = NULL; 1134 1135 rcu_read_lock(); 1136 opinfo = rcu_dereference(fp->f_opinfo); 1137 rcu_read_unlock(); 1138 1139 if (!opinfo->is_lease || opinfo->o_lease->version != 2) 1140 return; 1141 1142 p_ci = ksmbd_inode_lookup_lock(fp->filp->f_path.dentry->d_parent); 1143 if (!p_ci) 1144 return; 1145 1146 read_lock(&p_ci->m_lock); 1147 list_for_each_entry(opinfo, &p_ci->m_op_list, op_entry) { 1148 if (!opinfo->is_lease) 1149 continue; 1150 1151 if (opinfo->o_lease->state != SMB2_OPLOCK_LEVEL_NONE) { 1152 if (!atomic_inc_not_zero(&opinfo->refcount)) 1153 continue; 1154 1155 atomic_inc(&opinfo->conn->r_count); 1156 if (ksmbd_conn_releasing(opinfo->conn)) { 1157 atomic_dec(&opinfo->conn->r_count); 1158 continue; 1159 } 1160 read_unlock(&p_ci->m_lock); 1161 oplock_break(opinfo, SMB2_OPLOCK_LEVEL_NONE); 1162 opinfo_conn_put(opinfo); 1163 read_lock(&p_ci->m_lock); 1164 } 1165 } 1166 read_unlock(&p_ci->m_lock); 1167 1168 ksmbd_inode_put(p_ci); 1169 } 1170 1171 /** 1172 * smb_grant_oplock() - handle oplock/lease request on file open 1173 * @work: smb work 1174 * @req_op_level: oplock level 1175 * @pid: id of open file 1176 * @fp: ksmbd file pointer 1177 * @tid: Tree id of connection 1178 * @lctx: lease context information on file open 1179 * @share_ret: share mode 1180 * 1181 * Return: 0 on success, otherwise error 1182 */ 1183 int smb_grant_oplock(struct ksmbd_work *work, int req_op_level, u64 pid, 1184 struct ksmbd_file *fp, __u16 tid, 1185 struct lease_ctx_info *lctx, int share_ret) 1186 { 1187 struct ksmbd_session *sess = work->sess; 1188 int err = 0; 1189 struct oplock_info *opinfo = NULL, *prev_opinfo = NULL; 1190 struct ksmbd_inode *ci = fp->f_ci; 1191 bool prev_op_has_lease; 1192 __le32 prev_op_state = 0; 1193 1194 opinfo = alloc_opinfo(work, pid, tid); 1195 if (!opinfo) 1196 return -ENOMEM; 1197 1198 if (lctx) { 1199 err = alloc_lease(opinfo, lctx); 1200 if (err) 1201 goto err_out; 1202 opinfo->is_lease = 1; 1203 } 1204 1205 /* ci does not have any oplock */ 1206 if (!opinfo_count(fp)) 1207 goto set_lev; 1208 1209 /* grant none-oplock if second open is trunc */ 1210 if (fp->attrib_only && fp->cdoption != FILE_OVERWRITE_IF_LE && 1211 fp->cdoption != FILE_OVERWRITE_LE && 1212 fp->cdoption != FILE_SUPERSEDE_LE) { 1213 req_op_level = SMB2_OPLOCK_LEVEL_NONE; 1214 goto set_lev; 1215 } 1216 1217 if (lctx) { 1218 struct oplock_info *m_opinfo; 1219 1220 /* is lease already granted ? */ 1221 m_opinfo = same_client_has_lease(ci, sess->ClientGUID, 1222 lctx); 1223 if (m_opinfo) { 1224 copy_lease(m_opinfo, opinfo); 1225 if (atomic_read(&m_opinfo->breaking_cnt)) 1226 opinfo->o_lease->flags = 1227 SMB2_LEASE_FLAG_BREAK_IN_PROGRESS_LE; 1228 goto out; 1229 } 1230 } 1231 prev_opinfo = opinfo_get_list(ci); 1232 if (!prev_opinfo || 1233 (prev_opinfo->level == SMB2_OPLOCK_LEVEL_NONE && lctx)) { 1234 opinfo_conn_put(prev_opinfo); 1235 goto set_lev; 1236 } 1237 prev_op_has_lease = prev_opinfo->is_lease; 1238 if (prev_op_has_lease) 1239 prev_op_state = prev_opinfo->o_lease->state; 1240 1241 if (share_ret < 0 && 1242 prev_opinfo->level == SMB2_OPLOCK_LEVEL_EXCLUSIVE) { 1243 err = share_ret; 1244 opinfo_conn_put(prev_opinfo); 1245 goto err_out; 1246 } 1247 1248 if (prev_opinfo->level != SMB2_OPLOCK_LEVEL_BATCH && 1249 prev_opinfo->level != SMB2_OPLOCK_LEVEL_EXCLUSIVE) { 1250 opinfo_conn_put(prev_opinfo); 1251 goto op_break_not_needed; 1252 } 1253 1254 list_add(&work->interim_entry, &prev_opinfo->interim_list); 1255 err = oplock_break(prev_opinfo, SMB2_OPLOCK_LEVEL_II); 1256 opinfo_conn_put(prev_opinfo); 1257 if (err == -ENOENT) 1258 goto set_lev; 1259 /* Check all oplock was freed by close */ 1260 else if (err < 0) 1261 goto err_out; 1262 1263 op_break_not_needed: 1264 if (share_ret < 0) { 1265 err = share_ret; 1266 goto err_out; 1267 } 1268 1269 if (req_op_level != SMB2_OPLOCK_LEVEL_NONE) 1270 req_op_level = SMB2_OPLOCK_LEVEL_II; 1271 1272 /* grant fixed oplock on stacked locking between lease and oplock */ 1273 if (prev_op_has_lease && !lctx) 1274 if (prev_op_state & SMB2_LEASE_HANDLE_CACHING_LE) 1275 req_op_level = SMB2_OPLOCK_LEVEL_NONE; 1276 1277 if (!prev_op_has_lease && lctx) { 1278 req_op_level = SMB2_OPLOCK_LEVEL_II; 1279 lctx->req_state = SMB2_LEASE_READ_CACHING_LE; 1280 } 1281 1282 set_lev: 1283 set_oplock_level(opinfo, req_op_level, lctx); 1284 1285 out: 1286 rcu_assign_pointer(fp->f_opinfo, opinfo); 1287 opinfo->o_fp = fp; 1288 1289 opinfo_count_inc(fp); 1290 opinfo_add(opinfo); 1291 if (opinfo->is_lease) { 1292 err = add_lease_global_list(opinfo); 1293 if (err) 1294 goto err_out; 1295 } 1296 1297 return 0; 1298 err_out: 1299 free_opinfo(opinfo); 1300 return err; 1301 } 1302 1303 /** 1304 * smb_break_all_write_oplock() - break batch/exclusive oplock to level2 1305 * @work: smb work 1306 * @fp: ksmbd file pointer 1307 * @is_trunc: truncate on open 1308 */ 1309 static void smb_break_all_write_oplock(struct ksmbd_work *work, 1310 struct ksmbd_file *fp, int is_trunc) 1311 { 1312 struct oplock_info *brk_opinfo; 1313 1314 brk_opinfo = opinfo_get_list(fp->f_ci); 1315 if (!brk_opinfo) 1316 return; 1317 if (brk_opinfo->level != SMB2_OPLOCK_LEVEL_BATCH && 1318 brk_opinfo->level != SMB2_OPLOCK_LEVEL_EXCLUSIVE) { 1319 opinfo_conn_put(brk_opinfo); 1320 return; 1321 } 1322 1323 brk_opinfo->open_trunc = is_trunc; 1324 list_add(&work->interim_entry, &brk_opinfo->interim_list); 1325 oplock_break(brk_opinfo, SMB2_OPLOCK_LEVEL_II); 1326 opinfo_conn_put(brk_opinfo); 1327 } 1328 1329 /** 1330 * smb_break_all_levII_oplock() - send level2 oplock or read lease break command 1331 * from server to client 1332 * @work: smb work 1333 * @fp: ksmbd file pointer 1334 * @is_trunc: truncate on open 1335 */ 1336 void smb_break_all_levII_oplock(struct ksmbd_work *work, struct ksmbd_file *fp, 1337 int is_trunc) 1338 { 1339 struct oplock_info *op, *brk_op; 1340 struct ksmbd_inode *ci; 1341 struct ksmbd_conn *conn = work->conn; 1342 1343 if (!test_share_config_flag(work->tcon->share_conf, 1344 KSMBD_SHARE_FLAG_OPLOCKS)) 1345 return; 1346 1347 ci = fp->f_ci; 1348 op = opinfo_get(fp); 1349 1350 rcu_read_lock(); 1351 list_for_each_entry_rcu(brk_op, &ci->m_op_list, op_entry) { 1352 if (!atomic_inc_not_zero(&brk_op->refcount)) 1353 continue; 1354 1355 atomic_inc(&brk_op->conn->r_count); 1356 if (ksmbd_conn_releasing(brk_op->conn)) { 1357 atomic_dec(&brk_op->conn->r_count); 1358 continue; 1359 } 1360 1361 rcu_read_unlock(); 1362 if (brk_op->is_lease && (brk_op->o_lease->state & 1363 (~(SMB2_LEASE_READ_CACHING_LE | 1364 SMB2_LEASE_HANDLE_CACHING_LE)))) { 1365 ksmbd_debug(OPLOCK, "unexpected lease state(0x%x)\n", 1366 brk_op->o_lease->state); 1367 goto next; 1368 } else if (brk_op->level != 1369 SMB2_OPLOCK_LEVEL_II) { 1370 ksmbd_debug(OPLOCK, "unexpected oplock(0x%x)\n", 1371 brk_op->level); 1372 goto next; 1373 } 1374 1375 /* Skip oplock being break to none */ 1376 if (brk_op->is_lease && 1377 brk_op->o_lease->new_state == SMB2_LEASE_NONE_LE && 1378 atomic_read(&brk_op->breaking_cnt)) 1379 goto next; 1380 1381 if (op && op->is_lease && brk_op->is_lease && 1382 !memcmp(conn->ClientGUID, brk_op->conn->ClientGUID, 1383 SMB2_CLIENT_GUID_SIZE) && 1384 !memcmp(op->o_lease->lease_key, brk_op->o_lease->lease_key, 1385 SMB2_LEASE_KEY_SIZE)) 1386 goto next; 1387 brk_op->open_trunc = is_trunc; 1388 oplock_break(brk_op, SMB2_OPLOCK_LEVEL_NONE); 1389 next: 1390 opinfo_conn_put(brk_op); 1391 rcu_read_lock(); 1392 } 1393 rcu_read_unlock(); 1394 1395 if (op) 1396 opinfo_put(op); 1397 } 1398 1399 /** 1400 * smb_break_all_oplock() - break both batch/exclusive and level2 oplock 1401 * @work: smb work 1402 * @fp: ksmbd file pointer 1403 */ 1404 void smb_break_all_oplock(struct ksmbd_work *work, struct ksmbd_file *fp) 1405 { 1406 if (!test_share_config_flag(work->tcon->share_conf, 1407 KSMBD_SHARE_FLAG_OPLOCKS)) 1408 return; 1409 1410 smb_break_all_write_oplock(work, fp, 1); 1411 smb_break_all_levII_oplock(work, fp, 1); 1412 } 1413 1414 /** 1415 * smb2_map_lease_to_oplock() - map lease state to corresponding oplock type 1416 * @lease_state: lease type 1417 * 1418 * Return: 0 if no mapping, otherwise corresponding oplock type 1419 */ 1420 __u8 smb2_map_lease_to_oplock(__le32 lease_state) 1421 { 1422 if (lease_state == (SMB2_LEASE_HANDLE_CACHING_LE | 1423 SMB2_LEASE_READ_CACHING_LE | 1424 SMB2_LEASE_WRITE_CACHING_LE)) { 1425 return SMB2_OPLOCK_LEVEL_BATCH; 1426 } else if (lease_state != SMB2_LEASE_WRITE_CACHING_LE && 1427 lease_state & SMB2_LEASE_WRITE_CACHING_LE) { 1428 if (!(lease_state & SMB2_LEASE_HANDLE_CACHING_LE)) 1429 return SMB2_OPLOCK_LEVEL_EXCLUSIVE; 1430 } else if (lease_state & SMB2_LEASE_READ_CACHING_LE) { 1431 return SMB2_OPLOCK_LEVEL_II; 1432 } 1433 return 0; 1434 } 1435 1436 /** 1437 * create_lease_buf() - create lease context for open cmd response 1438 * @rbuf: buffer to create lease context response 1439 * @lease: buffer to stored parsed lease state information 1440 */ 1441 void create_lease_buf(u8 *rbuf, struct lease *lease) 1442 { 1443 if (lease->version == 2) { 1444 struct create_lease_v2 *buf = (struct create_lease_v2 *)rbuf; 1445 1446 memset(buf, 0, sizeof(struct create_lease_v2)); 1447 memcpy(buf->lcontext.LeaseKey, lease->lease_key, 1448 SMB2_LEASE_KEY_SIZE); 1449 buf->lcontext.LeaseFlags = lease->flags; 1450 buf->lcontext.Epoch = cpu_to_le16(++lease->epoch); 1451 buf->lcontext.LeaseState = lease->state; 1452 memcpy(buf->lcontext.ParentLeaseKey, lease->parent_lease_key, 1453 SMB2_LEASE_KEY_SIZE); 1454 buf->ccontext.DataOffset = cpu_to_le16(offsetof 1455 (struct create_lease_v2, lcontext)); 1456 buf->ccontext.DataLength = cpu_to_le32(sizeof(struct lease_context_v2)); 1457 buf->ccontext.NameOffset = cpu_to_le16(offsetof 1458 (struct create_lease_v2, Name)); 1459 buf->ccontext.NameLength = cpu_to_le16(4); 1460 buf->Name[0] = 'R'; 1461 buf->Name[1] = 'q'; 1462 buf->Name[2] = 'L'; 1463 buf->Name[3] = 's'; 1464 } else { 1465 struct create_lease *buf = (struct create_lease *)rbuf; 1466 1467 memset(buf, 0, sizeof(struct create_lease)); 1468 memcpy(buf->lcontext.LeaseKey, lease->lease_key, SMB2_LEASE_KEY_SIZE); 1469 buf->lcontext.LeaseFlags = lease->flags; 1470 buf->lcontext.LeaseState = lease->state; 1471 buf->ccontext.DataOffset = cpu_to_le16(offsetof 1472 (struct create_lease, lcontext)); 1473 buf->ccontext.DataLength = cpu_to_le32(sizeof(struct lease_context)); 1474 buf->ccontext.NameOffset = cpu_to_le16(offsetof 1475 (struct create_lease, Name)); 1476 buf->ccontext.NameLength = cpu_to_le16(4); 1477 buf->Name[0] = 'R'; 1478 buf->Name[1] = 'q'; 1479 buf->Name[2] = 'L'; 1480 buf->Name[3] = 's'; 1481 } 1482 } 1483 1484 /** 1485 * parse_lease_state() - parse lease context containted in file open request 1486 * @open_req: buffer containing smb2 file open(create) request 1487 * @is_dir: whether leasing file is directory 1488 * 1489 * Return: oplock state, -ENOENT if create lease context not found 1490 */ 1491 struct lease_ctx_info *parse_lease_state(void *open_req, bool is_dir) 1492 { 1493 struct create_context *cc; 1494 struct smb2_create_req *req = (struct smb2_create_req *)open_req; 1495 struct lease_ctx_info *lreq; 1496 1497 cc = smb2_find_context_vals(req, SMB2_CREATE_REQUEST_LEASE, 4); 1498 if (IS_ERR_OR_NULL(cc)) 1499 return NULL; 1500 1501 lreq = kzalloc(sizeof(struct lease_ctx_info), GFP_KERNEL); 1502 if (!lreq) 1503 return NULL; 1504 1505 if (sizeof(struct lease_context_v2) == le32_to_cpu(cc->DataLength)) { 1506 struct create_lease_v2 *lc = (struct create_lease_v2 *)cc; 1507 1508 memcpy(lreq->lease_key, lc->lcontext.LeaseKey, SMB2_LEASE_KEY_SIZE); 1509 if (is_dir) { 1510 lreq->req_state = lc->lcontext.LeaseState & 1511 ~SMB2_LEASE_WRITE_CACHING_LE; 1512 lreq->is_dir = true; 1513 } else 1514 lreq->req_state = lc->lcontext.LeaseState; 1515 lreq->flags = lc->lcontext.LeaseFlags; 1516 lreq->epoch = lc->lcontext.Epoch; 1517 lreq->duration = lc->lcontext.LeaseDuration; 1518 memcpy(lreq->parent_lease_key, lc->lcontext.ParentLeaseKey, 1519 SMB2_LEASE_KEY_SIZE); 1520 lreq->version = 2; 1521 } else { 1522 struct create_lease *lc = (struct create_lease *)cc; 1523 1524 memcpy(lreq->lease_key, lc->lcontext.LeaseKey, SMB2_LEASE_KEY_SIZE); 1525 lreq->req_state = lc->lcontext.LeaseState; 1526 lreq->flags = lc->lcontext.LeaseFlags; 1527 lreq->duration = lc->lcontext.LeaseDuration; 1528 lreq->version = 1; 1529 } 1530 return lreq; 1531 } 1532 1533 /** 1534 * smb2_find_context_vals() - find a particular context info in open request 1535 * @open_req: buffer containing smb2 file open(create) request 1536 * @tag: context name to search for 1537 * @tag_len: the length of tag 1538 * 1539 * Return: pointer to requested context, NULL if @str context not found 1540 * or error pointer if name length is invalid. 1541 */ 1542 struct create_context *smb2_find_context_vals(void *open_req, const char *tag, int tag_len) 1543 { 1544 struct create_context *cc; 1545 unsigned int next = 0; 1546 char *name; 1547 struct smb2_create_req *req = (struct smb2_create_req *)open_req; 1548 unsigned int remain_len, name_off, name_len, value_off, value_len, 1549 cc_len; 1550 1551 /* 1552 * CreateContextsOffset and CreateContextsLength are guaranteed to 1553 * be valid because of ksmbd_smb2_check_message(). 1554 */ 1555 cc = (struct create_context *)((char *)req + 1556 le32_to_cpu(req->CreateContextsOffset)); 1557 remain_len = le32_to_cpu(req->CreateContextsLength); 1558 do { 1559 cc = (struct create_context *)((char *)cc + next); 1560 if (remain_len < offsetof(struct create_context, Buffer)) 1561 return ERR_PTR(-EINVAL); 1562 1563 next = le32_to_cpu(cc->Next); 1564 name_off = le16_to_cpu(cc->NameOffset); 1565 name_len = le16_to_cpu(cc->NameLength); 1566 value_off = le16_to_cpu(cc->DataOffset); 1567 value_len = le32_to_cpu(cc->DataLength); 1568 cc_len = next ? next : remain_len; 1569 1570 if ((next & 0x7) != 0 || 1571 next > remain_len || 1572 name_off != offsetof(struct create_context, Buffer) || 1573 name_len < 4 || 1574 name_off + name_len > cc_len || 1575 (value_off & 0x7) != 0 || 1576 (value_len && value_off < name_off + (name_len < 8 ? 8 : name_len)) || 1577 ((u64)value_off + value_len > cc_len)) 1578 return ERR_PTR(-EINVAL); 1579 1580 name = (char *)cc + name_off; 1581 if (name_len == tag_len && !memcmp(name, tag, name_len)) 1582 return cc; 1583 1584 remain_len -= next; 1585 } while (next != 0); 1586 1587 return NULL; 1588 } 1589 1590 /** 1591 * create_durable_rsp_buf() - create durable handle context 1592 * @cc: buffer to create durable context response 1593 */ 1594 void create_durable_rsp_buf(char *cc) 1595 { 1596 struct create_durable_rsp *buf; 1597 1598 buf = (struct create_durable_rsp *)cc; 1599 memset(buf, 0, sizeof(struct create_durable_rsp)); 1600 buf->ccontext.DataOffset = cpu_to_le16(offsetof 1601 (struct create_durable_rsp, Data)); 1602 buf->ccontext.DataLength = cpu_to_le32(8); 1603 buf->ccontext.NameOffset = cpu_to_le16(offsetof 1604 (struct create_durable_rsp, Name)); 1605 buf->ccontext.NameLength = cpu_to_le16(4); 1606 /* SMB2_CREATE_DURABLE_HANDLE_RESPONSE is "DHnQ" */ 1607 buf->Name[0] = 'D'; 1608 buf->Name[1] = 'H'; 1609 buf->Name[2] = 'n'; 1610 buf->Name[3] = 'Q'; 1611 } 1612 1613 /** 1614 * create_durable_v2_rsp_buf() - create durable handle v2 context 1615 * @cc: buffer to create durable context response 1616 * @fp: ksmbd file pointer 1617 */ 1618 void create_durable_v2_rsp_buf(char *cc, struct ksmbd_file *fp) 1619 { 1620 struct create_durable_v2_rsp *buf; 1621 1622 buf = (struct create_durable_v2_rsp *)cc; 1623 memset(buf, 0, sizeof(struct create_durable_rsp)); 1624 buf->ccontext.DataOffset = cpu_to_le16(offsetof 1625 (struct create_durable_rsp, Data)); 1626 buf->ccontext.DataLength = cpu_to_le32(8); 1627 buf->ccontext.NameOffset = cpu_to_le16(offsetof 1628 (struct create_durable_rsp, Name)); 1629 buf->ccontext.NameLength = cpu_to_le16(4); 1630 /* SMB2_CREATE_DURABLE_HANDLE_RESPONSE_V2 is "DH2Q" */ 1631 buf->Name[0] = 'D'; 1632 buf->Name[1] = 'H'; 1633 buf->Name[2] = '2'; 1634 buf->Name[3] = 'Q'; 1635 1636 buf->Timeout = cpu_to_le32(fp->durable_timeout); 1637 } 1638 1639 /** 1640 * create_mxac_rsp_buf() - create query maximal access context 1641 * @cc: buffer to create maximal access context response 1642 * @maximal_access: maximal access 1643 */ 1644 void create_mxac_rsp_buf(char *cc, int maximal_access) 1645 { 1646 struct create_mxac_rsp *buf; 1647 1648 buf = (struct create_mxac_rsp *)cc; 1649 memset(buf, 0, sizeof(struct create_mxac_rsp)); 1650 buf->ccontext.DataOffset = cpu_to_le16(offsetof 1651 (struct create_mxac_rsp, QueryStatus)); 1652 buf->ccontext.DataLength = cpu_to_le32(8); 1653 buf->ccontext.NameOffset = cpu_to_le16(offsetof 1654 (struct create_mxac_rsp, Name)); 1655 buf->ccontext.NameLength = cpu_to_le16(4); 1656 /* SMB2_CREATE_QUERY_MAXIMAL_ACCESS_RESPONSE is "MxAc" */ 1657 buf->Name[0] = 'M'; 1658 buf->Name[1] = 'x'; 1659 buf->Name[2] = 'A'; 1660 buf->Name[3] = 'c'; 1661 1662 buf->QueryStatus = STATUS_SUCCESS; 1663 buf->MaximalAccess = cpu_to_le32(maximal_access); 1664 } 1665 1666 void create_disk_id_rsp_buf(char *cc, __u64 file_id, __u64 vol_id) 1667 { 1668 struct create_disk_id_rsp *buf; 1669 1670 buf = (struct create_disk_id_rsp *)cc; 1671 memset(buf, 0, sizeof(struct create_disk_id_rsp)); 1672 buf->ccontext.DataOffset = cpu_to_le16(offsetof 1673 (struct create_disk_id_rsp, DiskFileId)); 1674 buf->ccontext.DataLength = cpu_to_le32(32); 1675 buf->ccontext.NameOffset = cpu_to_le16(offsetof 1676 (struct create_mxac_rsp, Name)); 1677 buf->ccontext.NameLength = cpu_to_le16(4); 1678 /* SMB2_CREATE_QUERY_ON_DISK_ID_RESPONSE is "QFid" */ 1679 buf->Name[0] = 'Q'; 1680 buf->Name[1] = 'F'; 1681 buf->Name[2] = 'i'; 1682 buf->Name[3] = 'd'; 1683 1684 buf->DiskFileId = cpu_to_le64(file_id); 1685 buf->VolumeId = cpu_to_le64(vol_id); 1686 } 1687 1688 /** 1689 * create_posix_rsp_buf() - create posix extension context 1690 * @cc: buffer to create posix on posix response 1691 * @fp: ksmbd file pointer 1692 */ 1693 void create_posix_rsp_buf(char *cc, struct ksmbd_file *fp) 1694 { 1695 struct create_posix_rsp *buf; 1696 struct inode *inode = file_inode(fp->filp); 1697 struct mnt_idmap *idmap = file_mnt_idmap(fp->filp); 1698 vfsuid_t vfsuid = i_uid_into_vfsuid(idmap, inode); 1699 vfsgid_t vfsgid = i_gid_into_vfsgid(idmap, inode); 1700 1701 buf = (struct create_posix_rsp *)cc; 1702 memset(buf, 0, sizeof(struct create_posix_rsp)); 1703 buf->ccontext.DataOffset = cpu_to_le16(offsetof 1704 (struct create_posix_rsp, nlink)); 1705 /* 1706 * DataLength = nlink(4) + reparse_tag(4) + mode(4) + 1707 * domain sid(28) + unix group sid(16). 1708 */ 1709 buf->ccontext.DataLength = cpu_to_le32(56); 1710 buf->ccontext.NameOffset = cpu_to_le16(offsetof 1711 (struct create_posix_rsp, Name)); 1712 buf->ccontext.NameLength = cpu_to_le16(POSIX_CTXT_DATA_LEN); 1713 /* SMB2_CREATE_TAG_POSIX is "0x93AD25509CB411E7B42383DE968BCD7C" */ 1714 buf->Name[0] = 0x93; 1715 buf->Name[1] = 0xAD; 1716 buf->Name[2] = 0x25; 1717 buf->Name[3] = 0x50; 1718 buf->Name[4] = 0x9C; 1719 buf->Name[5] = 0xB4; 1720 buf->Name[6] = 0x11; 1721 buf->Name[7] = 0xE7; 1722 buf->Name[8] = 0xB4; 1723 buf->Name[9] = 0x23; 1724 buf->Name[10] = 0x83; 1725 buf->Name[11] = 0xDE; 1726 buf->Name[12] = 0x96; 1727 buf->Name[13] = 0x8B; 1728 buf->Name[14] = 0xCD; 1729 buf->Name[15] = 0x7C; 1730 1731 buf->nlink = cpu_to_le32(inode->i_nlink); 1732 buf->reparse_tag = cpu_to_le32(fp->volatile_id); 1733 buf->mode = cpu_to_le32(inode->i_mode & 0777); 1734 /* 1735 * SidBuffer(44) contain two sids(Domain sid(28), UNIX group sid(16)). 1736 * Domain sid(28) = revision(1) + num_subauth(1) + authority(6) + 1737 * sub_auth(4 * 4(num_subauth)) + RID(4). 1738 * UNIX group id(16) = revision(1) + num_subauth(1) + authority(6) + 1739 * sub_auth(4 * 1(num_subauth)) + RID(4). 1740 */ 1741 id_to_sid(from_kuid_munged(&init_user_ns, vfsuid_into_kuid(vfsuid)), 1742 SIDOWNER, (struct smb_sid *)&buf->SidBuffer[0]); 1743 id_to_sid(from_kgid_munged(&init_user_ns, vfsgid_into_kgid(vfsgid)), 1744 SIDUNIX_GROUP, (struct smb_sid *)&buf->SidBuffer[28]); 1745 } 1746 1747 /* 1748 * Find lease object(opinfo) for given lease key/fid from lease 1749 * break/file close path. 1750 */ 1751 /** 1752 * lookup_lease_in_table() - find a matching lease info object 1753 * @conn: connection instance 1754 * @lease_key: lease key to be searched for 1755 * 1756 * Return: opinfo if found matching opinfo, otherwise NULL 1757 */ 1758 struct oplock_info *lookup_lease_in_table(struct ksmbd_conn *conn, 1759 char *lease_key) 1760 { 1761 struct oplock_info *opinfo = NULL, *ret_op = NULL; 1762 struct lease_table *lt; 1763 int ret; 1764 1765 read_lock(&lease_list_lock); 1766 list_for_each_entry(lt, &lease_table_list, l_entry) { 1767 if (!memcmp(lt->client_guid, conn->ClientGUID, 1768 SMB2_CLIENT_GUID_SIZE)) 1769 goto found; 1770 } 1771 1772 read_unlock(&lease_list_lock); 1773 return NULL; 1774 1775 found: 1776 rcu_read_lock(); 1777 list_for_each_entry_rcu(opinfo, <->lease_list, lease_entry) { 1778 if (!atomic_inc_not_zero(&opinfo->refcount)) 1779 continue; 1780 rcu_read_unlock(); 1781 if (!opinfo->op_state || opinfo->op_state == OPLOCK_CLOSING) 1782 goto op_next; 1783 if (!(opinfo->o_lease->state & 1784 (SMB2_LEASE_HANDLE_CACHING_LE | 1785 SMB2_LEASE_WRITE_CACHING_LE))) 1786 goto op_next; 1787 ret = compare_guid_key(opinfo, conn->ClientGUID, 1788 lease_key); 1789 if (ret) { 1790 ksmbd_debug(OPLOCK, "found opinfo\n"); 1791 ret_op = opinfo; 1792 goto out; 1793 } 1794 op_next: 1795 opinfo_put(opinfo); 1796 rcu_read_lock(); 1797 } 1798 rcu_read_unlock(); 1799 1800 out: 1801 read_unlock(&lease_list_lock); 1802 return ret_op; 1803 } 1804