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