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