Whamcloud - gitweb
LU-9855 obd: use ldo_process_config for mdc and osc layer
[fs/lustre-release.git] / lustre / mdc / mdc_dev.c
1 /*
2  * GPL HEADER START
3  *
4  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
5  *
6  * This program is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License version 2 only,
8  * as published by the Free Software Foundation.
9  *
10  * This program is distributed in the hope that it will be useful, but
11  * WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13  * General Public License version 2 for more details (a copy is included
14  * in the LICENSE file that accompanied this code).
15  *
16  * You should have received a copy of the GNU General Public License
17  * version 2 along with this program; If not, see
18  * http://www.gnu.org/licenses/gpl-2.0.html
19  *
20  * GPL HEADER END
21  */
22 /*
23  * Copyright (c) 2017, Intel Corporation.
24  */
25 /*
26  * This file is part of Lustre, http://www.lustre.org/
27  *
28  * Implementation of cl_device, cl_req for MDC layer.
29  *
30  * Author: Mikhail Pershin <mike.pershin@intel.com>
31  */
32
33 #define DEBUG_SUBSYSTEM S_MDC
34
35 #include <obd_class.h>
36 #include <lustre_osc.h>
37 #include <uapi/linux/lustre/lustre_param.h>
38
39 #include "mdc_internal.h"
40
41 static void mdc_lock_build_policy(const struct lu_env *env,
42                                   union ldlm_policy_data *policy)
43 {
44         memset(policy, 0, sizeof *policy);
45         policy->l_inodebits.bits = MDS_INODELOCK_DOM;
46 }
47
48 int mdc_ldlm_glimpse_ast(struct ldlm_lock *dlmlock, void *data)
49 {
50         return osc_ldlm_glimpse_ast(dlmlock, data);
51 }
52
53 static void mdc_lock_build_einfo(const struct lu_env *env,
54                                  const struct cl_lock *lock,
55                                  struct osc_object *osc,
56                                  struct ldlm_enqueue_info *einfo)
57 {
58         einfo->ei_type = LDLM_IBITS;
59         einfo->ei_mode = osc_cl_lock2ldlm(lock->cll_descr.cld_mode);
60         einfo->ei_cb_bl = mdc_ldlm_blocking_ast;
61         einfo->ei_cb_cp = ldlm_completion_ast;
62         einfo->ei_cb_gl = mdc_ldlm_glimpse_ast;
63         einfo->ei_cbdata = osc; /* value to be put into ->l_ast_data */
64 }
65
66 static void mdc_lock_lvb_update(const struct lu_env *env,
67                                 struct osc_object *osc,
68                                 struct ldlm_lock *dlmlock,
69                                 struct ost_lvb *lvb);
70
71 static int mdc_set_dom_lock_data(const struct lu_env *env,
72                                  struct ldlm_lock *lock, void *data)
73 {
74         struct osc_object *obj = data;
75         int set = 0;
76
77         LASSERT(lock != NULL);
78         LASSERT(lock->l_glimpse_ast == mdc_ldlm_glimpse_ast);
79
80         lock_res_and_lock(lock);
81         if (lock->l_ast_data == NULL) {
82                 lock->l_ast_data = data;
83                 mdc_lock_lvb_update(env, obj, lock, NULL);
84         }
85
86         if (lock->l_ast_data == data)
87                 set = 1;
88
89         unlock_res_and_lock(lock);
90
91         return set;
92 }
93
94 int mdc_dom_lock_match(const struct lu_env *env, struct obd_export *exp,
95                        struct ldlm_res_id *res_id,
96                        enum ldlm_type type, union ldlm_policy_data *policy,
97                        enum ldlm_mode mode, __u64 *flags, void *data,
98                        struct lustre_handle *lockh, int unref)
99 {
100         struct obd_device *obd = exp->exp_obd;
101         __u64 lflags = *flags;
102         enum ldlm_mode rc;
103
104         ENTRY;
105
106         rc = ldlm_lock_match(obd->obd_namespace, lflags,
107                              res_id, type, policy, mode, lockh, unref);
108         if (rc == 0 || lflags & LDLM_FL_TEST_LOCK)
109                 RETURN(rc);
110
111         if (data != NULL) {
112                 struct ldlm_lock *lock = ldlm_handle2lock(lockh);
113
114                 LASSERT(lock != NULL);
115                 if (!mdc_set_dom_lock_data(env, lock, data)) {
116                         ldlm_lock_decref(lockh, rc);
117                         rc = 0;
118                 }
119                 LDLM_LOCK_PUT(lock);
120         }
121         RETURN(rc);
122 }
123
124 /**
125  * Finds an existing lock covering a page with given index.
126  * Copy of osc_obj_dlmlock_at_pgoff() but for DoM IBITS lock.
127  */
128 struct ldlm_lock *mdc_dlmlock_at_pgoff(const struct lu_env *env,
129                                        struct osc_object *obj, pgoff_t index,
130                                        enum osc_dap_flags dap_flags)
131 {
132         struct osc_thread_info *info = osc_env_info(env);
133         struct ldlm_res_id *resname = &info->oti_resname;
134         union ldlm_policy_data *policy = &info->oti_policy;
135         struct lustre_handle lockh;
136         struct ldlm_lock *lock = NULL;
137         enum ldlm_mode mode;
138         __u64 flags;
139
140         ENTRY;
141
142         fid_build_reg_res_name(lu_object_fid(osc2lu(obj)), resname);
143         mdc_lock_build_policy(env, policy);
144
145         flags = LDLM_FL_BLOCK_GRANTED | LDLM_FL_CBPENDING;
146         if (dap_flags & OSC_DAP_FL_TEST_LOCK)
147                 flags |= LDLM_FL_TEST_LOCK;
148
149 again:
150         /* Next, search for already existing extent locks that will cover us */
151         /* If we're trying to read, we also search for an existing PW lock.  The
152          * VFS and page cache already protect us locally, so lots of readers/
153          * writers can share a single PW lock. */
154         mode = mdc_dom_lock_match(env, osc_export(obj), resname, LDLM_IBITS,
155                                   policy, LCK_PR | LCK_PW | LCK_GROUP, &flags,
156                                   obj, &lockh,
157                                   dap_flags & OSC_DAP_FL_CANCELING);
158         if (mode != 0) {
159                 lock = ldlm_handle2lock(&lockh);
160                 /* RACE: the lock is cancelled so let's try again */
161                 if (unlikely(lock == NULL))
162                         goto again;
163         }
164
165         RETURN(lock);
166 }
167
168 /**
169  * Check if page @page is covered by an extra lock or discard it.
170  */
171 static int mdc_check_and_discard_cb(const struct lu_env *env, struct cl_io *io,
172                                     struct osc_page *ops, void *cbdata)
173 {
174         struct osc_thread_info *info = osc_env_info(env);
175         struct osc_object *osc = cbdata;
176         pgoff_t index;
177
178         index = osc_index(ops);
179         if (index >= info->oti_fn_index) {
180                 struct ldlm_lock *tmp;
181                 struct cl_page *page = ops->ops_cl.cpl_page;
182
183                 /* refresh non-overlapped index */
184                 tmp = mdc_dlmlock_at_pgoff(env, osc, index,
185                                            OSC_DAP_FL_TEST_LOCK);
186                 if (tmp != NULL) {
187                         info->oti_fn_index = CL_PAGE_EOF;
188                         LDLM_LOCK_PUT(tmp);
189                 } else if (cl_page_own(env, io, page) == 0) {
190                         /* discard the page */
191                         cl_page_discard(env, io, page);
192                         cl_page_disown(env, io, page);
193                 } else {
194                         LASSERT(page->cp_state == CPS_FREEING);
195                 }
196         }
197
198         info->oti_next_index = index + 1;
199         return CLP_GANG_OKAY;
200 }
201
202 /**
203  * Discard pages protected by the given lock. This function traverses radix
204  * tree to find all covering pages and discard them. If a page is being covered
205  * by other locks, it should remain in cache.
206  *
207  * If error happens on any step, the process continues anyway (the reasoning
208  * behind this being that lock cancellation cannot be delayed indefinitely).
209  */
210 static int mdc_lock_discard_pages(const struct lu_env *env,
211                                   struct osc_object *osc,
212                                   pgoff_t start, pgoff_t end,
213                                   bool discard)
214 {
215         struct osc_thread_info *info = osc_env_info(env);
216         struct cl_io *io = &info->oti_io;
217         osc_page_gang_cbt cb;
218         int res;
219         int result;
220
221         ENTRY;
222
223         io->ci_obj = cl_object_top(osc2cl(osc));
224         io->ci_ignore_layout = 1;
225         result = cl_io_init(env, io, CIT_MISC, io->ci_obj);
226         if (result != 0)
227                 GOTO(out, result);
228
229         cb = discard ? osc_discard_cb : mdc_check_and_discard_cb;
230         info->oti_fn_index = info->oti_next_index = start;
231         do {
232                 res = osc_page_gang_lookup(env, io, osc, info->oti_next_index,
233                                            end, cb, (void *)osc);
234                 if (info->oti_next_index > end)
235                         break;
236
237                 if (res == CLP_GANG_RESCHED)
238                         cond_resched();
239         } while (res != CLP_GANG_OKAY);
240 out:
241         cl_io_fini(env, io);
242         RETURN(result);
243 }
244
245 static int mdc_lock_flush(const struct lu_env *env, struct osc_object *obj,
246                           pgoff_t start, pgoff_t end, enum cl_lock_mode mode,
247                           bool discard)
248 {
249         int result = 0;
250         int rc;
251
252         ENTRY;
253
254         if (mode == CLM_WRITE) {
255                 result = osc_cache_writeback_range(env, obj, start, end, 1,
256                                                    discard);
257                 CDEBUG(D_CACHE, "object %p: [%lu -> %lu] %d pages were %s.\n",
258                        obj, start, end, result,
259                        discard ? "discarded" : "written back");
260                 if (result > 0)
261                         result = 0;
262         }
263
264         rc = mdc_lock_discard_pages(env, obj, start, end, discard);
265         if (result == 0 && rc < 0)
266                 result = rc;
267
268         RETURN(result);
269 }
270
271 void mdc_lock_lockless_cancel(const struct lu_env *env,
272                               const struct cl_lock_slice *slice)
273 {
274         struct osc_lock *ols = cl2osc_lock(slice);
275         struct osc_object *osc = cl2osc(slice->cls_obj);
276         struct cl_lock_descr *descr = &slice->cls_lock->cll_descr;
277         int rc;
278
279         LASSERT(ols->ols_dlmlock == NULL);
280         rc = mdc_lock_flush(env, osc, descr->cld_start, descr->cld_end,
281                             descr->cld_mode, 0);
282         if (rc != 0)
283                 CERROR("Pages for lockless lock %p were not purged(%d)\n",
284                        ols, rc);
285
286         osc_lock_wake_waiters(env, osc, ols);
287 }
288
289 /**
290  * Helper for osc_dlm_blocking_ast() handling discrepancies between cl_lock
291  * and ldlm_lock caches.
292  */
293 static int mdc_dlm_blocking_ast0(const struct lu_env *env,
294                                  struct ldlm_lock *dlmlock,
295                                  void *data, int flag)
296 {
297         struct cl_object *obj = NULL;
298         int result = 0;
299         bool discard;
300         enum cl_lock_mode mode = CLM_READ;
301
302         ENTRY;
303
304         LASSERT(flag == LDLM_CB_CANCELING);
305         LASSERT(dlmlock != NULL);
306
307         lock_res_and_lock(dlmlock);
308         if (dlmlock->l_granted_mode != dlmlock->l_req_mode) {
309                 dlmlock->l_ast_data = NULL;
310                 unlock_res_and_lock(dlmlock);
311                 RETURN(0);
312         }
313
314         discard = ldlm_is_discard_data(dlmlock);
315         if (dlmlock->l_granted_mode & (LCK_PW | LCK_GROUP))
316                 mode = CLM_WRITE;
317
318         if (dlmlock->l_ast_data != NULL) {
319                 obj = osc2cl(dlmlock->l_ast_data);
320                 dlmlock->l_ast_data = NULL;
321                 cl_object_get(obj);
322         }
323         ldlm_set_kms_ignore(dlmlock);
324         unlock_res_and_lock(dlmlock);
325
326         /* if l_ast_data is NULL, the dlmlock was enqueued by AGL or
327          * the object has been destroyed. */
328         if (obj != NULL) {
329                 struct cl_attr *attr = &osc_env_info(env)->oti_attr;
330
331                 /* Destroy pages covered by the extent of the DLM lock */
332                 result = mdc_lock_flush(env, cl2osc(obj), cl_index(obj, 0),
333                                         CL_PAGE_EOF, mode, discard);
334                 /* Losing a lock, set KMS to 0.
335                  * NB: assumed that DOM lock covers whole data on MDT.
336                  */
337                 /* losing a lock, update kms */
338                 lock_res_and_lock(dlmlock);
339                 cl_object_attr_lock(obj);
340                 attr->cat_kms = 0;
341                 cl_object_attr_update(env, obj, attr, CAT_KMS);
342                 cl_object_attr_unlock(obj);
343                 unlock_res_and_lock(dlmlock);
344                 cl_object_put(env, obj);
345         }
346         RETURN(result);
347 }
348
349 int mdc_ldlm_blocking_ast(struct ldlm_lock *dlmlock,
350                           struct ldlm_lock_desc *new, void *data, int flag)
351 {
352         int rc = 0;
353
354         ENTRY;
355
356         switch (flag) {
357         case LDLM_CB_BLOCKING: {
358                 struct lustre_handle lockh;
359
360                 ldlm_lock2handle(dlmlock, &lockh);
361                 rc = ldlm_cli_cancel(&lockh, LCF_ASYNC);
362                 if (rc == -ENODATA)
363                         rc = 0;
364                 break;
365         }
366         case LDLM_CB_CANCELING: {
367                 struct lu_env *env;
368                 __u16 refcheck;
369
370                 /*
371                  * This can be called in the context of outer IO, e.g.,
372                  *
373                  *    osc_enqueue_base()->...
374                  *      ->ldlm_prep_elc_req()->...
375                  *        ->ldlm_cancel_callback()->...
376                  *          ->osc_ldlm_blocking_ast()
377                  *
378                  * new environment has to be created to not corrupt outer
379                  * context.
380                  */
381                 env = cl_env_get(&refcheck);
382                 if (IS_ERR(env)) {
383                         rc = PTR_ERR(env);
384                         break;
385                 }
386
387                 rc = mdc_dlm_blocking_ast0(env, dlmlock, data, flag);
388                 cl_env_put(env, &refcheck);
389                 break;
390         }
391         default:
392                 LBUG();
393         }
394         RETURN(rc);
395 }
396
397 /**
398  * Updates object attributes from a lock value block (lvb) received together
399  * with the DLM lock reply from the server.
400  * This can be optimized to not update attributes when lock is a result of a
401  * local match.
402  *
403  * Called under lock and resource spin-locks.
404  */
405 void mdc_lock_lvb_update(const struct lu_env *env, struct osc_object *osc,
406                          struct ldlm_lock *dlmlock, struct ost_lvb *lvb)
407 {
408         struct cl_object *obj = osc2cl(osc);
409         struct lov_oinfo *oinfo = osc->oo_oinfo;
410         struct cl_attr *attr = &osc_env_info(env)->oti_attr;
411         unsigned valid = CAT_BLOCKS | CAT_ATIME | CAT_CTIME | CAT_MTIME |
412                          CAT_SIZE;
413
414         ENTRY;
415
416         if (lvb == NULL) {
417                 LASSERT(dlmlock != NULL);
418                 lvb = &dlmlock->l_ost_lvb;
419         }
420         cl_lvb2attr(attr, lvb);
421
422         cl_object_attr_lock(obj);
423         if (dlmlock != NULL) {
424                 __u64 size;
425
426                 check_res_locked(dlmlock->l_resource);
427                 size = lvb->lvb_size;
428
429                 if (size >= oinfo->loi_kms) {
430                         LDLM_DEBUG(dlmlock, "lock acquired, setting rss=%llu,"
431                                    " kms=%llu", lvb->lvb_size, size);
432                         valid |= CAT_KMS;
433                         attr->cat_kms = size;
434                 } else {
435                         LDLM_DEBUG(dlmlock, "lock acquired, setting rss=%llu,"
436                                    " leaving kms=%llu",
437                                    lvb->lvb_size, oinfo->loi_kms);
438                 }
439         }
440         cl_object_attr_update(env, obj, attr, valid);
441         cl_object_attr_unlock(obj);
442         EXIT;
443 }
444
445 static void mdc_lock_granted(const struct lu_env *env, struct osc_lock *oscl,
446                              struct lustre_handle *lockh, bool lvb_update)
447 {
448         struct ldlm_lock *dlmlock;
449
450         ENTRY;
451
452         dlmlock = ldlm_handle2lock_long(lockh, 0);
453         LASSERT(dlmlock != NULL);
454
455         /* lock reference taken by ldlm_handle2lock_long() is
456          * owned by osc_lock and released in osc_lock_detach()
457          */
458         lu_ref_add(&dlmlock->l_reference, "osc_lock", oscl);
459         oscl->ols_has_ref = 1;
460
461         LASSERT(oscl->ols_dlmlock == NULL);
462         oscl->ols_dlmlock = dlmlock;
463
464         /* This may be a matched lock for glimpse request, do not hold
465          * lock reference in that case. */
466         if (!oscl->ols_glimpse) {
467                 /* hold a refc for non glimpse lock which will
468                  * be released in osc_lock_cancel() */
469                 lustre_handle_copy(&oscl->ols_handle, lockh);
470                 ldlm_lock_addref(lockh, oscl->ols_einfo.ei_mode);
471                 oscl->ols_hold = 1;
472         }
473
474         /* Lock must have been granted. */
475         lock_res_and_lock(dlmlock);
476         if (dlmlock->l_granted_mode == dlmlock->l_req_mode) {
477                 struct cl_lock_descr *descr = &oscl->ols_cl.cls_lock->cll_descr;
478
479                 /* extend the lock extent, otherwise it will have problem when
480                  * we decide whether to grant a lockless lock. */
481                 descr->cld_mode = osc_ldlm2cl_lock(dlmlock->l_granted_mode);
482                 descr->cld_start = cl_index(descr->cld_obj, 0);
483                 descr->cld_end = CL_PAGE_EOF;
484
485                 /* no lvb update for matched lock */
486                 if (lvb_update) {
487                         LASSERT(oscl->ols_flags & LDLM_FL_LVB_READY);
488                         mdc_lock_lvb_update(env, cl2osc(oscl->ols_cl.cls_obj),
489                                             dlmlock, NULL);
490                 }
491         }
492         unlock_res_and_lock(dlmlock);
493
494         LASSERT(oscl->ols_state != OLS_GRANTED);
495         oscl->ols_state = OLS_GRANTED;
496         EXIT;
497 }
498
499 /**
500  * Lock upcall function that is executed either when a reply to ENQUEUE rpc is
501  * received from a server, or after osc_enqueue_base() matched a local DLM
502  * lock.
503  */
504 static int mdc_lock_upcall(void *cookie, struct lustre_handle *lockh,
505                            int errcode)
506 {
507         struct osc_lock *oscl = cookie;
508         struct cl_lock_slice *slice = &oscl->ols_cl;
509         struct lu_env *env;
510         int rc;
511
512         ENTRY;
513
514         env = cl_env_percpu_get();
515         /* should never happen, similar to osc_ldlm_blocking_ast(). */
516         LASSERT(!IS_ERR(env));
517
518         rc = ldlm_error2errno(errcode);
519         if (oscl->ols_state == OLS_ENQUEUED) {
520                 oscl->ols_state = OLS_UPCALL_RECEIVED;
521         } else if (oscl->ols_state == OLS_CANCELLED) {
522                 rc = -EIO;
523         } else {
524                 CERROR("Impossible state: %d\n", oscl->ols_state);
525                 LBUG();
526         }
527
528         CDEBUG(D_INODE, "rc %d, err %d\n", rc, errcode);
529         if (rc == 0)
530                 mdc_lock_granted(env, oscl, lockh, errcode == ELDLM_OK);
531
532         /* Error handling, some errors are tolerable. */
533         if (oscl->ols_locklessable && rc == -EUSERS) {
534                 /* This is a tolerable error, turn this lock into
535                  * lockless lock.
536                  */
537                 osc_object_set_contended(cl2osc(slice->cls_obj));
538                 LASSERT(slice->cls_ops != oscl->ols_lockless_ops);
539
540                 /* Change this lock to ldlmlock-less lock. */
541                 osc_lock_to_lockless(env, oscl, 1);
542                 oscl->ols_state = OLS_GRANTED;
543                 rc = 0;
544         } else if (oscl->ols_glimpse && rc == -ENAVAIL) {
545                 LASSERT(oscl->ols_flags & LDLM_FL_LVB_READY);
546                 mdc_lock_lvb_update(env, cl2osc(slice->cls_obj),
547                                     NULL, &oscl->ols_lvb);
548                 /* Hide the error. */
549                 rc = 0;
550         }
551
552         if (oscl->ols_owner != NULL)
553                 cl_sync_io_note(env, oscl->ols_owner, rc);
554         cl_env_percpu_put(env);
555
556         RETURN(rc);
557 }
558
559 int mdc_fill_lvb(struct ptlrpc_request *req, struct ost_lvb *lvb)
560 {
561         struct mdt_body *body;
562
563         body = req_capsule_server_get(&req->rq_pill, &RMF_MDT_BODY);
564         if (!body)
565                 RETURN(-EPROTO);
566
567         lvb->lvb_mtime = body->mbo_mtime;
568         lvb->lvb_atime = body->mbo_atime;
569         lvb->lvb_ctime = body->mbo_ctime;
570         lvb->lvb_blocks = body->mbo_dom_blocks;
571         lvb->lvb_size = body->mbo_dom_size;
572
573         RETURN(0);
574 }
575
576 int mdc_enqueue_fini(struct ptlrpc_request *req, osc_enqueue_upcall_f upcall,
577                      void *cookie, struct lustre_handle *lockh,
578                      enum ldlm_mode mode, __u64 *flags, int errcode)
579 {
580         struct osc_lock *ols = cookie;
581         struct ldlm_lock *lock;
582         int rc = 0;
583
584         ENTRY;
585
586         /* The request was created before ldlm_cli_enqueue call. */
587         if (errcode == ELDLM_LOCK_ABORTED) {
588                 struct ldlm_reply *rep;
589
590                 rep = req_capsule_server_get(&req->rq_pill, &RMF_DLM_REP);
591                 LASSERT(rep != NULL);
592
593                 rep->lock_policy_res2 =
594                         ptlrpc_status_ntoh(rep->lock_policy_res2);
595                 if (rep->lock_policy_res2)
596                         errcode = rep->lock_policy_res2;
597
598                 rc = mdc_fill_lvb(req, &ols->ols_lvb);
599                 *flags |= LDLM_FL_LVB_READY;
600         } else if (errcode == ELDLM_OK) {
601                 /* Callers have references, should be valid always */
602                 lock = ldlm_handle2lock(lockh);
603                 LASSERT(lock);
604
605                 rc = mdc_fill_lvb(req, &lock->l_ost_lvb);
606                 LDLM_LOCK_PUT(lock);
607                 *flags |= LDLM_FL_LVB_READY;
608         }
609
610         /* Call the update callback. */
611         rc = (*upcall)(cookie, lockh, rc < 0 ? rc : errcode);
612
613         /* release the reference taken in ldlm_cli_enqueue() */
614         if (errcode == ELDLM_LOCK_MATCHED)
615                 errcode = ELDLM_OK;
616         if (errcode == ELDLM_OK && lustre_handle_is_used(lockh))
617                 ldlm_lock_decref(lockh, mode);
618
619         RETURN(rc);
620 }
621
622 int mdc_enqueue_interpret(const struct lu_env *env, struct ptlrpc_request *req,
623                           void *args, int rc)
624 {
625         struct osc_enqueue_args *aa = args;
626         struct ldlm_lock *lock;
627         struct lustre_handle *lockh = &aa->oa_lockh;
628         enum ldlm_mode mode = aa->oa_mode;
629
630         ENTRY;
631
632         LASSERT(!aa->oa_speculative);
633
634         /* ldlm_cli_enqueue is holding a reference on the lock, so it must
635          * be valid. */
636         lock = ldlm_handle2lock(lockh);
637         LASSERTF(lock != NULL,
638                  "lockh %#llx, req %p, aa %p - client evicted?\n",
639                  lockh->cookie, req, aa);
640
641         /* Take an additional reference so that a blocking AST that
642          * ldlm_cli_enqueue_fini() might post for a failed lock, is guaranteed
643          * to arrive after an upcall has been executed by
644          * osc_enqueue_fini(). */
645         ldlm_lock_addref(lockh, mode);
646
647         /* Let cl_lock_state_wait fail with -ERESTARTSYS to unuse sublocks. */
648         OBD_FAIL_TIMEOUT(OBD_FAIL_LDLM_ENQUEUE_HANG, 2);
649
650         /* Let CP AST to grant the lock first. */
651         OBD_FAIL_TIMEOUT(OBD_FAIL_OSC_CP_ENQ_RACE, 1);
652
653         /* Complete obtaining the lock procedure. */
654         rc = ldlm_cli_enqueue_fini(aa->oa_exp, req, aa->oa_type, 1,
655                                    aa->oa_mode, aa->oa_flags, NULL, 0,
656                                    lockh, rc);
657         /* Complete mdc stuff. */
658         rc = mdc_enqueue_fini(req, aa->oa_upcall, aa->oa_cookie, lockh, mode,
659                               aa->oa_flags, rc);
660
661         OBD_FAIL_TIMEOUT(OBD_FAIL_OSC_CP_CANCEL_RACE, 10);
662
663         ldlm_lock_decref(lockh, mode);
664         LDLM_LOCK_PUT(lock);
665         RETURN(rc);
666 }
667
668 /* When enqueuing asynchronously, locks are not ordered, we can obtain a lock
669  * from the 2nd OSC before a lock from the 1st one. This does not deadlock with
670  * other synchronous requests, however keeping some locks and trying to obtain
671  * others may take a considerable amount of time in a case of ost failure; and
672  * when other sync requests do not get released lock from a client, the client
673  * is excluded from the cluster -- such scenarious make the life difficult, so
674  * release locks just after they are obtained. */
675 int mdc_enqueue_send(const struct lu_env *env, struct obd_export *exp,
676                      struct ldlm_res_id *res_id, __u64 *flags,
677                      union ldlm_policy_data *policy,
678                      struct ost_lvb *lvb, int kms_valid,
679                      osc_enqueue_upcall_f upcall, void *cookie,
680                      struct ldlm_enqueue_info *einfo, int async)
681 {
682         struct obd_device *obd = exp->exp_obd;
683         struct lustre_handle lockh = { 0 };
684         struct ptlrpc_request *req = NULL;
685         struct ldlm_intent *lit;
686         enum ldlm_mode mode;
687         bool glimpse = *flags & LDLM_FL_HAS_INTENT;
688         __u64 match_flags = *flags;
689         int rc;
690
691         ENTRY;
692
693         mode = einfo->ei_mode;
694         if (einfo->ei_mode == LCK_PR)
695                 mode |= LCK_PW;
696
697         if (!glimpse)
698                 match_flags |= LDLM_FL_BLOCK_GRANTED;
699         mode = ldlm_lock_match(obd->obd_namespace, match_flags, res_id,
700                                einfo->ei_type, policy, mode, &lockh, 0);
701         if (mode) {
702                 struct ldlm_lock *matched;
703
704                 if (*flags & LDLM_FL_TEST_LOCK)
705                         RETURN(ELDLM_OK);
706
707                 matched = ldlm_handle2lock(&lockh);
708                 if (!matched || ldlm_is_kms_ignore(matched))
709                         goto no_match;
710
711                 if (mdc_set_dom_lock_data(env, matched, einfo->ei_cbdata)) {
712                         *flags |= LDLM_FL_LVB_READY;
713
714                         /* We already have a lock, and it's referenced. */
715                         (*upcall)(cookie, &lockh, ELDLM_LOCK_MATCHED);
716
717                         ldlm_lock_decref(&lockh, mode);
718                         LDLM_LOCK_PUT(matched);
719                         RETURN(ELDLM_OK);
720                 }
721 no_match:
722                 ldlm_lock_decref(&lockh, mode);
723                 LDLM_LOCK_PUT(matched);
724         }
725
726         if (*flags & (LDLM_FL_TEST_LOCK | LDLM_FL_MATCH_LOCK))
727                 RETURN(-ENOLCK);
728
729         req = ptlrpc_request_alloc(class_exp2cliimp(exp), &RQF_LDLM_INTENT);
730         if (req == NULL)
731                 RETURN(-ENOMEM);
732
733         rc = ldlm_prep_enqueue_req(exp, req, NULL, 0);
734         if (rc < 0) {
735                 ptlrpc_request_free(req);
736                 RETURN(rc);
737         }
738
739         /* pack the intent */
740         lit = req_capsule_client_get(&req->rq_pill, &RMF_LDLM_INTENT);
741         lit->opc = glimpse ? IT_GLIMPSE : IT_BRW;
742
743         req_capsule_set_size(&req->rq_pill, &RMF_MDT_MD, RCL_SERVER, 0);
744         req_capsule_set_size(&req->rq_pill, &RMF_ACL, RCL_SERVER, 0);
745         ptlrpc_request_set_replen(req);
746
747         /* users of mdc_enqueue() can pass this flag for ldlm_lock_match() */
748         *flags &= ~LDLM_FL_BLOCK_GRANTED;
749         /* All MDC IO locks are intents */
750         *flags |= LDLM_FL_HAS_INTENT;
751         rc = ldlm_cli_enqueue(exp, &req, einfo, res_id, policy, flags, NULL,
752                               0, LVB_T_NONE, &lockh, async);
753         if (async) {
754                 if (!rc) {
755                         struct osc_enqueue_args *aa;
756
757                         CLASSERT(sizeof(*aa) <= sizeof(req->rq_async_args));
758                         aa = ptlrpc_req_async_args(req);
759                         aa->oa_exp = exp;
760                         aa->oa_mode = einfo->ei_mode;
761                         aa->oa_type = einfo->ei_type;
762                         lustre_handle_copy(&aa->oa_lockh, &lockh);
763                         aa->oa_upcall = upcall;
764                         aa->oa_cookie = cookie;
765                         aa->oa_speculative = false;
766                         aa->oa_flags = flags;
767                         aa->oa_lvb = lvb;
768
769                         req->rq_interpret_reply = mdc_enqueue_interpret;
770                         ptlrpcd_add_req(req);
771                 } else {
772                         ptlrpc_req_finished(req);
773                 }
774                 RETURN(rc);
775         }
776
777         rc = mdc_enqueue_fini(req, upcall, cookie, &lockh, einfo->ei_mode,
778                               flags, rc);
779         ptlrpc_req_finished(req);
780         RETURN(rc);
781 }
782
783 /**
784  * Implementation of cl_lock_operations::clo_enqueue() method for osc
785  * layer. This initiates ldlm enqueue:
786  *
787  *     - cancels conflicting locks early (osc_lock_enqueue_wait());
788  *
789  *     - calls osc_enqueue_base() to do actual enqueue.
790  *
791  * osc_enqueue_base() is supplied with an upcall function that is executed
792  * when lock is received either after a local cached ldlm lock is matched, or
793  * when a reply from the server is received.
794  *
795  * This function does not wait for the network communication to complete.
796  */
797 static int mdc_lock_enqueue(const struct lu_env *env,
798                             const struct cl_lock_slice *slice,
799                             struct cl_io *unused, struct cl_sync_io *anchor)
800 {
801         struct osc_thread_info *info = osc_env_info(env);
802         struct osc_io *oio = osc_env_io(env);
803         struct osc_object *osc = cl2osc(slice->cls_obj);
804         struct osc_lock *oscl = cl2osc_lock(slice);
805         struct cl_lock *lock = slice->cls_lock;
806         struct ldlm_res_id *resname = &info->oti_resname;
807         union ldlm_policy_data *policy = &info->oti_policy;
808         osc_enqueue_upcall_f upcall = mdc_lock_upcall;
809         void *cookie = (void *)oscl;
810         bool async = false;
811         int result;
812
813         ENTRY;
814
815         LASSERTF(ergo(oscl->ols_glimpse, lock->cll_descr.cld_mode <= CLM_READ),
816                 "lock = %p, ols = %p\n", lock, oscl);
817
818         if (oscl->ols_state == OLS_GRANTED)
819                 RETURN(0);
820
821         /* Lockahead is not supported on MDT yet */
822         if (oscl->ols_flags & LDLM_FL_NO_EXPANSION) {
823                 result = -EOPNOTSUPP;
824                 RETURN(result);
825         }
826
827         if (oscl->ols_flags & LDLM_FL_TEST_LOCK)
828                 GOTO(enqueue_base, 0);
829
830         if (oscl->ols_glimpse) {
831                 LASSERT(equi(oscl->ols_speculative, anchor == NULL));
832                 async = true;
833                 GOTO(enqueue_base, 0);
834         }
835
836         result = osc_lock_enqueue_wait(env, osc, oscl);
837         if (result < 0)
838                 GOTO(out, result);
839
840         /* we can grant lockless lock right after all conflicting locks
841          * are canceled. */
842         if (osc_lock_is_lockless(oscl)) {
843                 oscl->ols_state = OLS_GRANTED;
844                 oio->oi_lockless = 1;
845                 RETURN(0);
846         }
847
848 enqueue_base:
849         oscl->ols_state = OLS_ENQUEUED;
850         if (anchor != NULL) {
851                 atomic_inc(&anchor->csi_sync_nr);
852                 oscl->ols_owner = anchor;
853         }
854
855         /**
856          * DLM lock's ast data must be osc_object;
857          * DLM's enqueue callback set to osc_lock_upcall() with cookie as
858          * osc_lock.
859          */
860         fid_build_reg_res_name(lu_object_fid(osc2lu(osc)), resname);
861         mdc_lock_build_policy(env, policy);
862         LASSERT(!oscl->ols_speculative);
863         result = mdc_enqueue_send(env, osc_export(osc), resname,
864                                   &oscl->ols_flags, policy,
865                                   &oscl->ols_lvb, osc->oo_oinfo->loi_kms_valid,
866                                   upcall, cookie, &oscl->ols_einfo, async);
867         if (result == 0) {
868                 if (osc_lock_is_lockless(oscl)) {
869                         oio->oi_lockless = 1;
870                 } else if (!async) {
871                         LASSERT(oscl->ols_state == OLS_GRANTED);
872                         LASSERT(oscl->ols_hold);
873                         LASSERT(oscl->ols_dlmlock != NULL);
874                 }
875         }
876 out:
877         if (result < 0) {
878                 oscl->ols_state = OLS_CANCELLED;
879                 osc_lock_wake_waiters(env, osc, oscl);
880
881                 if (anchor != NULL)
882                         cl_sync_io_note(env, anchor, result);
883         }
884         RETURN(result);
885 }
886
887 static const struct cl_lock_operations mdc_lock_lockless_ops = {
888         .clo_fini = osc_lock_fini,
889         .clo_enqueue = mdc_lock_enqueue,
890         .clo_cancel = mdc_lock_lockless_cancel,
891         .clo_print = osc_lock_print
892 };
893
894 static const struct cl_lock_operations mdc_lock_ops = {
895         .clo_fini       = osc_lock_fini,
896         .clo_enqueue    = mdc_lock_enqueue,
897         .clo_cancel     = osc_lock_cancel,
898         .clo_print      = osc_lock_print,
899 };
900
901 int mdc_lock_init(const struct lu_env *env, struct cl_object *obj,
902                   struct cl_lock *lock, const struct cl_io *io)
903 {
904         struct osc_lock *ols;
905         __u32 enqflags = lock->cll_descr.cld_enq_flags;
906         __u64 flags = osc_enq2ldlm_flags(enqflags);
907
908         ENTRY;
909
910         /* Ignore AGL for Data-on-MDT, stat returns size data */
911         if ((enqflags & CEF_SPECULATIVE) != 0)
912                 RETURN(0);
913
914         OBD_SLAB_ALLOC_PTR_GFP(ols, osc_lock_kmem, GFP_NOFS);
915         if (unlikely(ols == NULL))
916                 RETURN(-ENOMEM);
917
918         ols->ols_state = OLS_NEW;
919         spin_lock_init(&ols->ols_lock);
920         INIT_LIST_HEAD(&ols->ols_waiting_list);
921         INIT_LIST_HEAD(&ols->ols_wait_entry);
922         INIT_LIST_HEAD(&ols->ols_nextlock_oscobj);
923         ols->ols_lockless_ops = &mdc_lock_lockless_ops;
924
925         ols->ols_flags = flags;
926         ols->ols_speculative = !!(enqflags & CEF_SPECULATIVE);
927
928         if (ols->ols_flags & LDLM_FL_HAS_INTENT) {
929                 ols->ols_flags |= LDLM_FL_BLOCK_GRANTED;
930                 ols->ols_glimpse = 1;
931         }
932         mdc_lock_build_einfo(env, lock, cl2osc(obj), &ols->ols_einfo);
933
934         cl_lock_slice_add(lock, &ols->ols_cl, obj, &mdc_lock_ops);
935
936         if (!(enqflags & CEF_MUST))
937                 osc_lock_to_lockless(env, ols, (enqflags & CEF_NEVER));
938         if (ols->ols_locklessable && !(enqflags & CEF_DISCARD_DATA))
939                 ols->ols_flags |= LDLM_FL_DENY_ON_CONTENTION;
940
941         if (io->ci_type == CIT_WRITE || cl_io_is_mkwrite(io))
942                 osc_lock_set_writer(env, io, obj, ols);
943
944         LDLM_DEBUG_NOLOCK("lock %p, mdc lock %p, flags %llx\n",
945                           lock, ols, ols->ols_flags);
946         RETURN(0);
947 }
948
949 /**
950  * IO operations.
951  *
952  * An implementation of cl_io_operations specific methods for MDC layer.
953  *
954  */
955 static int mdc_async_upcall(void *a, int rc)
956 {
957         struct osc_async_cbargs *args = a;
958
959         args->opc_rc = rc;
960         complete(&args->opc_sync);
961         return 0;
962 }
963
964 static int mdc_get_lock_handle(const struct lu_env *env, struct osc_object *osc,
965                                pgoff_t index, struct lustre_handle *lh)
966 {
967         struct ldlm_lock *lock;
968
969         /* find DOM lock protecting object */
970         lock = mdc_dlmlock_at_pgoff(env, osc, index,
971                                     OSC_DAP_FL_TEST_LOCK |
972                                     OSC_DAP_FL_CANCELING);
973         if (lock == NULL) {
974                 struct ldlm_resource *res;
975                 struct ldlm_res_id *resname;
976
977                 resname = &osc_env_info(env)->oti_resname;
978                 fid_build_reg_res_name(lu_object_fid(osc2lu(osc)), resname);
979                 res = ldlm_resource_get(osc_export(osc)->exp_obd->obd_namespace,
980                                         NULL, resname, LDLM_IBITS, 0);
981                 ldlm_resource_dump(D_ERROR, res);
982                 libcfs_debug_dumpstack(NULL);
983                 return -ENOENT;
984         } else {
985                 *lh = lock->l_remote_handle;
986                 LDLM_LOCK_PUT(lock);
987         }
988         return 0;
989 }
990
991 static int mdc_io_setattr_start(const struct lu_env *env,
992                                 const struct cl_io_slice *slice)
993 {
994         struct cl_io *io = slice->cis_io;
995         struct osc_io *oio = cl2osc_io(env, slice);
996         struct cl_object *obj = slice->cis_obj;
997         struct lov_oinfo *loi = cl2osc(obj)->oo_oinfo;
998         struct cl_attr *attr = &osc_env_info(env)->oti_attr;
999         struct obdo *oa = &oio->oi_oa;
1000         struct osc_async_cbargs *cbargs = &oio->oi_cbarg;
1001         __u64 size = io->u.ci_setattr.sa_attr.lvb_size;
1002         unsigned int ia_avalid = io->u.ci_setattr.sa_avalid;
1003         enum op_xvalid ia_xvalid = io->u.ci_setattr.sa_xvalid;
1004         int rc;
1005
1006         /* silently ignore non-truncate setattr for Data-on-MDT object */
1007         if (cl_io_is_trunc(io)) {
1008                 /* truncate cache dirty pages first */
1009                 rc = osc_cache_truncate_start(env, cl2osc(obj), size,
1010                                               &oio->oi_trunc);
1011                 if (rc < 0)
1012                         return rc;
1013         }
1014
1015         if (oio->oi_lockless == 0) {
1016                 cl_object_attr_lock(obj);
1017                 rc = cl_object_attr_get(env, obj, attr);
1018                 if (rc == 0) {
1019                         struct ost_lvb *lvb = &io->u.ci_setattr.sa_attr;
1020                         unsigned int cl_valid = 0;
1021
1022                         if (ia_avalid & ATTR_SIZE) {
1023                                 attr->cat_size = size;
1024                                 attr->cat_kms = size;
1025                                 cl_valid = (CAT_SIZE | CAT_KMS);
1026                         }
1027                         if (ia_avalid & ATTR_MTIME_SET) {
1028                                 attr->cat_mtime = lvb->lvb_mtime;
1029                                 cl_valid |= CAT_MTIME;
1030                         }
1031                         if (ia_avalid & ATTR_ATIME_SET) {
1032                                 attr->cat_atime = lvb->lvb_atime;
1033                                 cl_valid |= CAT_ATIME;
1034                         }
1035                         if (ia_xvalid & OP_XVALID_CTIME_SET) {
1036                                 attr->cat_ctime = lvb->lvb_ctime;
1037                                 cl_valid |= CAT_CTIME;
1038                         }
1039                         rc = cl_object_attr_update(env, obj, attr, cl_valid);
1040                 }
1041                 cl_object_attr_unlock(obj);
1042                 if (rc < 0)
1043                         return rc;
1044         }
1045
1046         if (!(ia_avalid & ATTR_SIZE))
1047                 return 0;
1048
1049         memset(oa, 0, sizeof(*oa));
1050         oa->o_oi = loi->loi_oi;
1051         oa->o_mtime = attr->cat_mtime;
1052         oa->o_atime = attr->cat_atime;
1053         oa->o_ctime = attr->cat_ctime;
1054
1055         oa->o_size = size;
1056         oa->o_blocks = OBD_OBJECT_EOF;
1057         oa->o_valid = OBD_MD_FLID | OBD_MD_FLGROUP | OBD_MD_FLATIME |
1058                       OBD_MD_FLCTIME | OBD_MD_FLMTIME | OBD_MD_FLSIZE |
1059                       OBD_MD_FLBLOCKS;
1060         if (oio->oi_lockless) {
1061                 oa->o_flags = OBD_FL_SRVLOCK;
1062                 oa->o_valid |= OBD_MD_FLFLAGS;
1063         } else {
1064                 rc = mdc_get_lock_handle(env, cl2osc(obj), CL_PAGE_EOF,
1065                                          &oa->o_handle);
1066                 if (!rc)
1067                         oa->o_valid |= OBD_MD_FLHANDLE;
1068         }
1069
1070         init_completion(&cbargs->opc_sync);
1071
1072         rc = osc_punch_send(osc_export(cl2osc(obj)), oa,
1073                             mdc_async_upcall, cbargs);
1074         cbargs->opc_rpc_sent = rc == 0;
1075         return rc;
1076 }
1077
1078 static int mdc_io_read_ahead(const struct lu_env *env,
1079                              const struct cl_io_slice *ios,
1080                              pgoff_t start, struct cl_read_ahead *ra)
1081 {
1082         struct osc_object *osc = cl2osc(ios->cis_obj);
1083         struct ldlm_lock *dlmlock;
1084
1085         ENTRY;
1086
1087         dlmlock = mdc_dlmlock_at_pgoff(env, osc, start, 0);
1088         if (dlmlock == NULL)
1089                 RETURN(-ENODATA);
1090
1091         if (dlmlock->l_req_mode != LCK_PR) {
1092                 struct lustre_handle lockh;
1093
1094                 ldlm_lock2handle(dlmlock, &lockh);
1095                 ldlm_lock_addref(&lockh, LCK_PR);
1096                 ldlm_lock_decref(&lockh, dlmlock->l_req_mode);
1097         }
1098
1099         ra->cra_rpc_size = osc_cli(osc)->cl_max_pages_per_rpc;
1100         ra->cra_end = CL_PAGE_EOF;
1101         ra->cra_release = osc_read_ahead_release;
1102         ra->cra_cbdata = dlmlock;
1103
1104         RETURN(0);
1105 }
1106
1107 int mdc_io_fsync_start(const struct lu_env *env,
1108                        const struct cl_io_slice *slice)
1109 {
1110         struct cl_io *io = slice->cis_io;
1111         struct cl_fsync_io *fio = &io->u.ci_fsync;
1112         struct cl_object *obj = slice->cis_obj;
1113         struct osc_object *osc = cl2osc(obj);
1114         int result = 0;
1115
1116         ENTRY;
1117
1118         /* a MDC lock always covers whole object, do sync for whole
1119          * possible range despite of supplied start/end values.
1120          */
1121         result = osc_cache_writeback_range(env, osc, 0, CL_PAGE_EOF, 0,
1122                                            fio->fi_mode == CL_FSYNC_DISCARD);
1123         if (result > 0) {
1124                 fio->fi_nr_written += result;
1125                 result = 0;
1126         }
1127         if (fio->fi_mode == CL_FSYNC_ALL) {
1128                 int rc;
1129
1130                 rc = osc_cache_wait_range(env, osc, 0, CL_PAGE_EOF);
1131                 if (result == 0)
1132                         result = rc;
1133                 /* Use OSC sync code because it is asynchronous.
1134                  * It is to be added into MDC and avoid the using of
1135                  * OST_SYNC at both MDC and MDT.
1136                  */
1137                 rc = osc_fsync_ost(env, osc, fio);
1138                 if (result == 0)
1139                         result = rc;
1140         }
1141
1142         RETURN(result);
1143 }
1144
1145 struct mdc_data_version_args {
1146         struct osc_io *dva_oio;
1147 };
1148
1149 static int
1150 mdc_data_version_interpret(const struct lu_env *env, struct ptlrpc_request *req,
1151                            void *args, int rc)
1152 {
1153         struct mdc_data_version_args *dva = args;
1154         struct osc_io *oio = dva->dva_oio;
1155         const struct mdt_body *body;
1156
1157         ENTRY;
1158         if (rc < 0)
1159                 GOTO(out, rc);
1160
1161         body = req_capsule_server_get(&req->rq_pill, &RMF_MDT_BODY);
1162         if (body == NULL)
1163                 GOTO(out, rc = -EPROTO);
1164
1165         /* Prepare OBDO from mdt_body for CLIO */
1166         oio->oi_oa.o_valid = body->mbo_valid;
1167         oio->oi_oa.o_flags = body->mbo_flags;
1168         oio->oi_oa.o_data_version = body->mbo_version;
1169         oio->oi_oa.o_layout_version = body->mbo_layout_gen;
1170         EXIT;
1171 out:
1172         oio->oi_cbarg.opc_rc = rc;
1173         complete(&oio->oi_cbarg.opc_sync);
1174         return 0;
1175 }
1176
1177 static int mdc_io_data_version_start(const struct lu_env *env,
1178                                      const struct cl_io_slice *slice)
1179 {
1180         struct cl_data_version_io *dv = &slice->cis_io->u.ci_data_version;
1181         struct osc_io *oio = cl2osc_io(env, slice);
1182         struct osc_async_cbargs *cbargs = &oio->oi_cbarg;
1183         struct osc_object *obj = cl2osc(slice->cis_obj);
1184         struct obd_export *exp = osc_export(obj);
1185         struct ptlrpc_request *req;
1186         struct mdt_body *body;
1187         struct mdc_data_version_args *dva;
1188         int rc;
1189
1190         ENTRY;
1191
1192         memset(&oio->oi_oa, 0, sizeof(oio->oi_oa));
1193         oio->oi_oa.o_oi.oi_fid = *lu_object_fid(osc2lu(obj));
1194         oio->oi_oa.o_valid = OBD_MD_FLID;
1195
1196         init_completion(&cbargs->opc_sync);
1197
1198         req = ptlrpc_request_alloc(class_exp2cliimp(exp), &RQF_MDS_GETATTR);
1199         if (req == NULL)
1200                 RETURN(-ENOMEM);
1201
1202         rc = ptlrpc_request_pack(req, LUSTRE_MDS_VERSION, MDS_GETATTR);
1203         if (rc < 0) {
1204                 ptlrpc_request_free(req);
1205                 RETURN(rc);
1206         }
1207
1208         body = req_capsule_client_get(&req->rq_pill, &RMF_MDT_BODY);
1209         body->mbo_fid1 = *lu_object_fid(osc2lu(obj));
1210         body->mbo_valid = OBD_MD_FLID;
1211         /* Indicate that data version is needed */
1212         body->mbo_valid |= OBD_MD_FLDATAVERSION;
1213         body->mbo_flags = 0;
1214
1215         if (dv->dv_flags & (LL_DV_RD_FLUSH | LL_DV_WR_FLUSH)) {
1216                 body->mbo_valid |= OBD_MD_FLFLAGS;
1217                 body->mbo_flags |= OBD_FL_SRVLOCK;
1218                 if (dv->dv_flags & LL_DV_WR_FLUSH)
1219                         body->mbo_flags |= OBD_FL_FLUSH;
1220         }
1221
1222         req_capsule_set_size(&req->rq_pill, &RMF_ACL, RCL_SERVER, 0);
1223         req_capsule_set_size(&req->rq_pill, &RMF_MDT_MD, RCL_SERVER, 0);
1224         ptlrpc_request_set_replen(req);
1225
1226         req->rq_interpret_reply = mdc_data_version_interpret;
1227         CLASSERT(sizeof(*dva) <= sizeof(req->rq_async_args));
1228         dva = ptlrpc_req_async_args(req);
1229         dva->dva_oio = oio;
1230
1231         ptlrpcd_add_req(req);
1232
1233         RETURN(0);
1234 }
1235
1236 static void mdc_io_data_version_end(const struct lu_env *env,
1237                                     const struct cl_io_slice *slice)
1238 {
1239         struct cl_data_version_io *dv = &slice->cis_io->u.ci_data_version;
1240         struct osc_io *oio = cl2osc_io(env, slice);
1241         struct osc_async_cbargs *cbargs = &oio->oi_cbarg;
1242
1243         ENTRY;
1244         wait_for_completion(&cbargs->opc_sync);
1245
1246         if (cbargs->opc_rc != 0) {
1247                 slice->cis_io->ci_result = cbargs->opc_rc;
1248         } else {
1249                 slice->cis_io->ci_result = 0;
1250                 if (!(oio->oi_oa.o_valid &
1251                       (OBD_MD_LAYOUT_VERSION | OBD_MD_FLDATAVERSION)))
1252                         slice->cis_io->ci_result = -ENOTSUPP;
1253
1254                 if (oio->oi_oa.o_valid & OBD_MD_LAYOUT_VERSION)
1255                         dv->dv_layout_version = oio->oi_oa.o_layout_version;
1256                 if (oio->oi_oa.o_valid & OBD_MD_FLDATAVERSION)
1257                         dv->dv_data_version = oio->oi_oa.o_data_version;
1258         }
1259
1260         EXIT;
1261 }
1262
1263 static struct cl_io_operations mdc_io_ops = {
1264         .op = {
1265                 [CIT_READ] = {
1266                         .cio_iter_init = osc_io_iter_init,
1267                         .cio_iter_fini = osc_io_iter_fini,
1268                         .cio_start     = osc_io_read_start,
1269                 },
1270                 [CIT_WRITE] = {
1271                         .cio_iter_init = osc_io_write_iter_init,
1272                         .cio_iter_fini = osc_io_write_iter_fini,
1273                         .cio_start     = osc_io_write_start,
1274                         .cio_end       = osc_io_end,
1275                 },
1276                 [CIT_SETATTR] = {
1277                         .cio_iter_init = osc_io_iter_init,
1278                         .cio_iter_fini = osc_io_iter_fini,
1279                         .cio_start     = mdc_io_setattr_start,
1280                         .cio_end       = osc_io_setattr_end,
1281                 },
1282                 [CIT_DATA_VERSION] = {
1283                         .cio_start = mdc_io_data_version_start,
1284                         .cio_end   = mdc_io_data_version_end,
1285                 },
1286                 [CIT_FAULT] = {
1287                         .cio_iter_init = osc_io_iter_init,
1288                         .cio_iter_fini = osc_io_iter_fini,
1289                         .cio_start     = osc_io_fault_start,
1290                         .cio_end       = osc_io_end,
1291                 },
1292                 [CIT_FSYNC] = {
1293                         .cio_start = mdc_io_fsync_start,
1294                         .cio_end   = osc_io_fsync_end,
1295                 },
1296         },
1297         .cio_read_ahead   = mdc_io_read_ahead,
1298         .cio_submit       = osc_io_submit,
1299         .cio_commit_async = osc_io_commit_async,
1300 };
1301
1302 int mdc_io_init(const struct lu_env *env, struct cl_object *obj,
1303                 struct cl_io *io)
1304 {
1305         struct osc_io *oio = osc_env_io(env);
1306
1307         CL_IO_SLICE_CLEAN(oio, oi_cl);
1308         cl_io_slice_add(io, &oio->oi_cl, obj, &mdc_io_ops);
1309         return 0;
1310 }
1311
1312 static void mdc_build_res_name(struct osc_object *osc,
1313                                    struct ldlm_res_id *resname)
1314 {
1315         fid_build_reg_res_name(lu_object_fid(osc2lu(osc)), resname);
1316 }
1317
1318 /**
1319  * Implementation of struct cl_req_operations::cro_attr_set() for MDC
1320  * layer. MDC is responsible for struct obdo::o_id and struct obdo::o_seq
1321  * fields.
1322  */
1323 static void mdc_req_attr_set(const struct lu_env *env, struct cl_object *obj,
1324                              struct cl_req_attr *attr)
1325 {
1326         u64 flags = attr->cra_flags;
1327
1328         /* Copy object FID to cl_attr */
1329         attr->cra_oa->o_oi.oi_fid = *lu_object_fid(&obj->co_lu);
1330
1331         if (flags & OBD_MD_FLGROUP)
1332                 attr->cra_oa->o_valid |= OBD_MD_FLGROUP;
1333
1334         if (flags & OBD_MD_FLID)
1335                 attr->cra_oa->o_valid |= OBD_MD_FLID;
1336
1337         if (flags & OBD_MD_FLHANDLE) {
1338                 struct osc_page *opg;
1339
1340                 opg = osc_cl_page_osc(attr->cra_page, cl2osc(obj));
1341                 if (!opg->ops_srvlock) {
1342                         int rc;
1343
1344                         rc = mdc_get_lock_handle(env, cl2osc(obj),
1345                                                  osc_index(opg),
1346                                                  &attr->cra_oa->o_handle);
1347                         if (rc) {
1348                                 CL_PAGE_DEBUG(D_ERROR, env, attr->cra_page,
1349                                               "uncovered page!\n");
1350                                 LBUG();
1351                         } else {
1352                                 attr->cra_oa->o_valid |= OBD_MD_FLHANDLE;
1353                         }
1354                 }
1355         }
1356 }
1357
1358 static int mdc_attr_get(const struct lu_env *env, struct cl_object *obj,
1359                         struct cl_attr *attr)
1360 {
1361         struct lov_oinfo *oinfo = cl2osc(obj)->oo_oinfo;
1362
1363         if (OST_LVB_IS_ERR(oinfo->loi_lvb.lvb_blocks))
1364                 return OST_LVB_GET_ERR(oinfo->loi_lvb.lvb_blocks);
1365
1366         return osc_attr_get(env, obj, attr);
1367 }
1368
1369 static int mdc_object_ast_clear(struct ldlm_lock *lock, void *data)
1370 {
1371         ENTRY;
1372
1373         if ((lock->l_ast_data == NULL && !ldlm_is_kms_ignore(lock)) ||
1374             (lock->l_ast_data == data)) {
1375                 lock->l_ast_data = NULL;
1376                 ldlm_set_kms_ignore(lock);
1377         }
1378         RETURN(LDLM_ITER_CONTINUE);
1379 }
1380
1381 int mdc_object_prune(const struct lu_env *env, struct cl_object *obj)
1382 {
1383         struct osc_object *osc = cl2osc(obj);
1384         struct ldlm_res_id *resname = &osc_env_info(env)->oti_resname;
1385
1386         /* DLM locks don't hold a reference of osc_object so we have to
1387          * clear it before the object is being destroyed. */
1388         osc_build_res_name(osc, resname);
1389         ldlm_resource_iterate(osc_export(osc)->exp_obd->obd_namespace, resname,
1390                               mdc_object_ast_clear, osc);
1391         return 0;
1392 }
1393
1394 static const struct cl_object_operations mdc_ops = {
1395         .coo_page_init = osc_page_init,
1396         .coo_lock_init = mdc_lock_init,
1397         .coo_io_init = mdc_io_init,
1398         .coo_attr_get = mdc_attr_get,
1399         .coo_attr_update = osc_attr_update,
1400         .coo_glimpse = osc_object_glimpse,
1401         .coo_req_attr_set = mdc_req_attr_set,
1402         .coo_prune = mdc_object_prune,
1403 };
1404
1405 static const struct osc_object_operations mdc_object_ops = {
1406         .oto_build_res_name = mdc_build_res_name,
1407         .oto_dlmlock_at_pgoff = mdc_dlmlock_at_pgoff,
1408 };
1409
1410 static int mdc_object_init(const struct lu_env *env, struct lu_object *obj,
1411                            const struct lu_object_conf *conf)
1412 {
1413         struct osc_object *osc = lu2osc(obj);
1414
1415         if (osc->oo_initialized)
1416                 return 0;
1417
1418         osc->oo_initialized = true;
1419
1420         return osc_object_init(env, obj, conf);
1421 }
1422
1423 static void mdc_object_free(const struct lu_env *env, struct lu_object *obj)
1424 {
1425         osc_object_free(env, obj);
1426 }
1427
1428 static const struct lu_object_operations mdc_lu_obj_ops = {
1429         .loo_object_init = mdc_object_init,
1430         .loo_object_delete = NULL,
1431         .loo_object_release = NULL,
1432         .loo_object_free = mdc_object_free,
1433         .loo_object_print = osc_object_print,
1434         .loo_object_invariant = NULL
1435 };
1436
1437 struct lu_object *mdc_object_alloc(const struct lu_env *env,
1438                                    const struct lu_object_header *unused,
1439                                    struct lu_device *dev)
1440 {
1441         struct osc_object *osc;
1442         struct lu_object  *obj;
1443
1444         OBD_SLAB_ALLOC_PTR_GFP(osc, osc_object_kmem, GFP_NOFS);
1445         if (osc != NULL) {
1446                 obj = osc2lu(osc);
1447                 lu_object_init(obj, NULL, dev);
1448                 osc->oo_cl.co_ops = &mdc_ops;
1449                 obj->lo_ops = &mdc_lu_obj_ops;
1450                 osc->oo_obj_ops = &mdc_object_ops;
1451                 osc->oo_initialized = false;
1452         } else {
1453                 obj = NULL;
1454         }
1455         return obj;
1456 }
1457
1458 static int mdc_process_config(const struct lu_env *env, struct lu_device *d,
1459                               struct lustre_cfg *cfg)
1460 {
1461         size_t count  = class_modify_config(cfg, PARAM_MDC,
1462                                             &d->ld_obd->obd_kset.kobj);
1463         return count > 0 ? 0 : count;
1464 }
1465
1466 const struct lu_device_operations mdc_lu_ops = {
1467         .ldo_object_alloc = mdc_object_alloc,
1468         .ldo_process_config = mdc_process_config,
1469         .ldo_recovery_complete = NULL,
1470 };
1471
1472 static struct lu_device *mdc_device_alloc(const struct lu_env *env,
1473                                           struct lu_device_type *t,
1474                                           struct lustre_cfg *cfg)
1475 {
1476         struct lu_device *d;
1477         struct osc_device *od;
1478         struct obd_device *obd;
1479         int rc;
1480
1481         OBD_ALLOC_PTR(od);
1482         if (od == NULL)
1483                 RETURN(ERR_PTR(-ENOMEM));
1484
1485         cl_device_init(&od->od_cl, t);
1486         d = osc2lu_dev(od);
1487         d->ld_ops = &mdc_lu_ops;
1488
1489         /* Setup MDC OBD */
1490         obd = class_name2obd(lustre_cfg_string(cfg, 0));
1491         if (obd == NULL)
1492                 RETURN(ERR_PTR(-ENODEV));
1493
1494         rc = mdc_setup(obd, cfg);
1495         if (rc < 0) {
1496                 osc_device_free(env, d);
1497                 RETURN(ERR_PTR(rc));
1498         }
1499         od->od_exp = obd->obd_self_export;
1500         RETURN(d);
1501 }
1502
1503 static const struct lu_device_type_operations mdc_device_type_ops = {
1504         .ldto_device_alloc = mdc_device_alloc,
1505         .ldto_device_free = osc_device_free,
1506         .ldto_device_init = osc_device_init,
1507         .ldto_device_fini = osc_device_fini
1508 };
1509
1510 struct lu_device_type mdc_device_type = {
1511         .ldt_tags = LU_DEVICE_CL,
1512         .ldt_name = LUSTRE_MDC_NAME,
1513         .ldt_ops = &mdc_device_type_ops,
1514         .ldt_ctx_tags = LCT_CL_THREAD
1515 };
1516
1517 /** @} osc */