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