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