ksmbd: lazy v2 lease break on smb2_write()
[platform/kernel/linux-starfive.git] / fs / smb / server / oplock.c
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, &lt->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 }