lustre/mdc/mdc_dev.c

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