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