lustre/llite/namei.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) 2002, 2010, Oracle and/or its affiliates. All rights reserved.
  24  * Use is subject to license terms.
  25  *
  26  * Copyright (c) 2011, 2017, Intel Corporation.
  27  */
  28 /*
  29  * This file is part of Lustre, http://www.lustre.org/
  30  * Lustre is a trademark of Sun Microsystems, Inc.
  31  */
  32
  33 #include <linux/fs.h>
  34 #include <linux/sched.h>
  35 #include <linux/mm.h>
  36 #include <linux/quotaops.h>
  37 #include <linux/highmem.h>
  38 #include <linux/pagemap.h>
  39 #include <linux/security.h>
  40 #include <linux/user_namespace.h>
  41 #ifdef HAVE_UIDGID_HEADER
  42 # include <linux/uidgid.h>
  43 #endif
  44
  45 #define DEBUG_SUBSYSTEM S_LLITE
  46
  47 #include <obd_support.h>
  48 #include <lustre_fid.h>
  49 #include <lustre_dlm.h>
  50 #include "llite_internal.h"
  51
  52 static int ll_create_it(struct inode *dir, struct dentry *dentry,
  53                         struct lookup_intent *it,
  54                         void *secctx, __u32 secctxlen);
  55
  56 /* called from iget5_locked->find_inode() under inode_lock spinlock */
  57 static int ll_test_inode(struct inode *inode, void *opaque)
  58 {
  59         struct ll_inode_info    *lli = ll_i2info(inode);
  60         struct lustre_md        *md = opaque;
  61
  62         if (unlikely(!(md->body->mbo_valid & OBD_MD_FLID))) {
  63                 CERROR("MDS body missing FID\n");
  64                 return 0;
  65         }
  66
  67         if (!lu_fid_eq(&lli->lli_fid, &md->body->mbo_fid1))
  68                 return 0;
  69
  70         return 1;
  71 }
  72
  73 static int ll_set_inode(struct inode *inode, void *opaque)
  74 {
  75         struct ll_inode_info *lli = ll_i2info(inode);
  76         struct mdt_body *body = ((struct lustre_md *)opaque)->body;
  77
  78         if (unlikely(!(body->mbo_valid & OBD_MD_FLID))) {
  79                 CERROR("MDS body missing FID\n");
  80                 return -EINVAL;
  81         }
  82
  83         lli->lli_fid = body->mbo_fid1;
  84         if (unlikely(!(body->mbo_valid & OBD_MD_FLTYPE))) {
  85                 CERROR("Can not initialize inode "DFID" without object type: "
  86                        "valid = %#llx\n",
  87                        PFID(&lli->lli_fid), body->mbo_valid);
  88                 return -EINVAL;
  89         }
  90
  91         inode->i_mode = (inode->i_mode & ~S_IFMT) | (body->mbo_mode & S_IFMT);
  92         if (unlikely(inode->i_mode == 0)) {
  93                 CERROR("Invalid inode "DFID" type\n", PFID(&lli->lli_fid));
  94                 return -EINVAL;
  95         }
  96
  97         ll_lli_init(lli);
  98
  99         return 0;
 100 }
 101
 102
 103 /**
 104  * Get an inode by inode number(@hash), which is already instantiated by
 105  * the intent lookup).
 106  */
 107 struct inode *ll_iget(struct super_block *sb, ino_t hash,
 108                       struct lustre_md *md)
 109 {
 110         struct inode    *inode;
 111         int             rc = 0;
 112
 113         ENTRY;
 114
 115         LASSERT(hash != 0);
 116         inode = iget5_locked(sb, hash, ll_test_inode, ll_set_inode, md);
 117         if (inode == NULL)
 118                 RETURN(ERR_PTR(-ENOMEM));
 119
 120         if (inode->i_state & I_NEW) {
 121                 rc = ll_read_inode2(inode, md);
 122                 if (rc == 0 && S_ISREG(inode->i_mode) &&
 123                     ll_i2info(inode)->lli_clob == NULL)
 124                         rc = cl_file_inode_init(inode, md);
 125
 126                 if (rc != 0) {
 127                         /* Let's clear directory lsm here, otherwise
 128                          * make_bad_inode() will reset the inode mode
 129                          * to regular, then ll_clear_inode will not
 130                          * be able to clear lsm_md */
 131                         if (S_ISDIR(inode->i_mode))
 132                                 ll_dir_clear_lsm_md(inode);
 133                         make_bad_inode(inode);
 134                         unlock_new_inode(inode);
 135                         iput(inode);
 136                         inode = ERR_PTR(rc);
 137                 } else {
 138                         inode_has_no_xattr(inode);
 139                         unlock_new_inode(inode);
 140                 }
 141         } else if (is_bad_inode(inode)) {
 142                 iput(inode);
 143                 inode = ERR_PTR(-ESTALE);
 144         } else if (!(inode->i_state & (I_FREEING | I_CLEAR))) {
 145                 rc = ll_update_inode(inode, md);
 146                 CDEBUG(D_VFSTRACE, "got inode: "DFID"(%p): rc = %d\n",
 147                        PFID(&md->body->mbo_fid1), inode, rc);
 148                 if (rc != 0) {
 149                         if (S_ISDIR(inode->i_mode))
 150                                 ll_dir_clear_lsm_md(inode);
 151                         iput(inode);
 152                         inode = ERR_PTR(rc);
 153                 }
 154         }
 155
 156         RETURN(inode);
 157 }
 158
 159 static void ll_invalidate_negative_children(struct inode *dir)
 160 {
 161         struct dentry *dentry, *tmp_subdir;
 162         DECLARE_LL_D_HLIST_NODE_PTR(p);
 163
 164         ll_lock_dcache(dir);
 165         ll_d_hlist_for_each_entry(dentry, p, &dir->i_dentry) {
 166                 spin_lock(&dentry->d_lock);
 167                 if (!list_empty(&dentry->d_subdirs)) {
 168                         struct dentry *child;
 169
 170                         list_for_each_entry_safe(child, tmp_subdir,
 171                                                  &dentry->d_subdirs,
 172                                                  d_child) {
 173                                 if (child->d_inode == NULL)
 174                                         d_lustre_invalidate(child, 1);
 175                         }
 176                 }
 177                 spin_unlock(&dentry->d_lock);
 178         }
 179         ll_unlock_dcache(dir);
 180 }
 181
 182 int ll_test_inode_by_fid(struct inode *inode, void *opaque)
 183 {
 184         return lu_fid_eq(&ll_i2info(inode)->lli_fid, opaque);
 185 }
 186
 187 int ll_dom_lock_cancel(struct inode *inode, struct ldlm_lock *lock)
 188 {
 189         struct lu_env *env;
 190         struct ll_inode_info *lli = ll_i2info(inode);
 191         struct cl_layout clt = { .cl_layout_gen = 0, };
 192         int rc;
 193         __u16 refcheck;
 194
 195
 196         ENTRY;
 197
 198         if (!lli->lli_clob) {
 199                 /* due to DoM read on open, there may exist pages for Lustre
 200                  * regular file even though cl_object is not set up yet. */
 201                 truncate_inode_pages(inode->i_mapping, 0);
 202                 RETURN(0);
 203         }
 204
 205         env = cl_env_get(&refcheck);
 206         if (IS_ERR(env))
 207                 RETURN(PTR_ERR(env));
 208
 209         rc = cl_object_layout_get(env, lli->lli_clob, &clt);
 210         if (rc) {
 211                 CDEBUG(D_INODE, "Cannot get layout for "DFID"\n",
 212                        PFID(ll_inode2fid(inode)));
 213                 rc = -ENODATA;
 214         } else if (clt.cl_size == 0 || clt.cl_dom_comp_size == 0) {
 215                 CDEBUG(D_INODE, "DOM lock without DOM layout for "DFID"\n",
 216                        PFID(ll_inode2fid(inode)));
 217         } else {
 218                 enum cl_fsync_mode mode;
 219                 loff_t end = clt.cl_dom_comp_size - 1;
 220
 221                 mode = ldlm_is_discard_data(lock) ?
 222                                         CL_FSYNC_DISCARD : CL_FSYNC_LOCAL;
 223                 rc = cl_sync_file_range(inode, 0, end, mode, 1);
 224                 truncate_inode_pages_range(inode->i_mapping, 0, end);
 225         }
 226         cl_env_put(env, &refcheck);
 227         RETURN(rc);
 228 }
 229
 230 void ll_lock_cancel_bits(struct ldlm_lock *lock, __u64 to_cancel)
 231 {
 232         struct inode *inode = ll_inode_from_resource_lock(lock);
 233         __u64 bits = to_cancel;
 234         int rc;
 235
 236         ENTRY;
 237
 238         if (!inode) {
 239                 /* That means the inode is evicted most likely and may cause
 240                  * the skipping of lock cleanups below, so print the message
 241                  * about that in log.
 242                  */
 243                 if (lock->l_resource->lr_lvb_inode)
 244                         LDLM_DEBUG(lock,
 245                                    "can't take inode for the lock (%sevicted)\n",
 246                                    lock->l_resource->lr_lvb_inode->i_state &
 247                                    I_FREEING ? "" : "not ");
 248                 RETURN_EXIT;
 249         }
 250
 251         if (!fid_res_name_eq(ll_inode2fid(inode),
 252                              &lock->l_resource->lr_name)) {
 253                 LDLM_ERROR(lock, "data mismatch with object "DFID"(%p)",
 254                            PFID(ll_inode2fid(inode)), inode);
 255                 LBUG();
 256         }
 257
 258         if (bits & MDS_INODELOCK_XATTR) {
 259                 if (S_ISDIR(inode->i_mode))
 260                         ll_i2info(inode)->lli_def_stripe_offset = -1;
 261                 ll_xattr_cache_destroy(inode);
 262                 bits &= ~MDS_INODELOCK_XATTR;
 263         }
 264
 265         /* For OPEN locks we differentiate between lock modes
 266          * LCK_CR, LCK_CW, LCK_PR - bug 22891 */
 267         if (bits & MDS_INODELOCK_OPEN)
 268                 ll_have_md_lock(inode, &bits, lock->l_req_mode);
 269
 270         if (bits & MDS_INODELOCK_OPEN) {
 271                 fmode_t fmode;
 272
 273                 switch (lock->l_req_mode) {
 274                 case LCK_CW:
 275                         fmode = FMODE_WRITE;
 276                         break;
 277                 case LCK_PR:
 278                         fmode = FMODE_EXEC;
 279                         break;
 280                 case LCK_CR:
 281                         fmode = FMODE_READ;
 282                         break;
 283                 default:
 284                         LDLM_ERROR(lock, "bad lock mode for OPEN lock");
 285                         LBUG();
 286                 }
 287
 288                 ll_md_real_close(inode, fmode);
 289
 290                 bits &= ~MDS_INODELOCK_OPEN;
 291         }
 292
 293         if (bits & (MDS_INODELOCK_LOOKUP | MDS_INODELOCK_UPDATE |
 294                     MDS_INODELOCK_LAYOUT | MDS_INODELOCK_PERM |
 295                     MDS_INODELOCK_DOM))
 296                 ll_have_md_lock(inode, &bits, LCK_MINMODE);
 297
 298         if (bits & MDS_INODELOCK_DOM) {
 299                 rc =  ll_dom_lock_cancel(inode, lock);
 300                 if (rc < 0)
 301                         CDEBUG(D_INODE, "cannot flush DoM data "
 302                                DFID": rc = %d\n",
 303                                PFID(ll_inode2fid(inode)), rc);
 304                 lock_res_and_lock(lock);
 305                 ldlm_set_kms_ignore(lock);
 306                 unlock_res_and_lock(lock);
 307         }
 308
 309         if (bits & MDS_INODELOCK_LAYOUT) {
 310                 struct cl_object_conf conf = {
 311                         .coc_opc = OBJECT_CONF_INVALIDATE,
 312                         .coc_inode = inode,
 313                 };
 314
 315                 rc = ll_layout_conf(inode, &conf);
 316                 if (rc < 0)
 317                         CDEBUG(D_INODE, "cannot invalidate layout of "
 318                                DFID": rc = %d\n",
 319                                PFID(ll_inode2fid(inode)), rc);
 320         }
 321
 322         if (bits & MDS_INODELOCK_UPDATE) {
 323                 struct ll_inode_info *lli = ll_i2info(inode);
 324
 325                 lli->lli_update_atime = 1;
 326         }
 327
 328         if ((bits & MDS_INODELOCK_UPDATE) && S_ISDIR(inode->i_mode)) {
 329                 struct ll_inode_info *lli = ll_i2info(inode);
 330
 331                 CDEBUG(D_INODE, "invalidating inode "DFID" lli = %p, "
 332                        "pfid  = "DFID"\n", PFID(ll_inode2fid(inode)),
 333                        lli, PFID(&lli->lli_pfid));
 334                 truncate_inode_pages(inode->i_mapping, 0);
 335
 336                 if (unlikely(!fid_is_zero(&lli->lli_pfid))) {
 337                         struct inode *master_inode = NULL;
 338                         unsigned long hash;
 339
 340                         /* This is slave inode, since all of the child dentry
 341                          * is connected on the master inode, so we have to
 342                          * invalidate the negative children on master inode */
 343                         CDEBUG(D_INODE, "Invalidate s"DFID" m"DFID"\n",
 344                                PFID(ll_inode2fid(inode)), PFID(&lli->lli_pfid));
 345
 346                         hash = cl_fid_build_ino(&lli->lli_pfid,
 347                                         ll_need_32bit_api(ll_i2sbi(inode)));
 348
 349                         /* Do not lookup the inode with ilookup5, otherwise
 350                          * it will cause dead lock,
 351                          * 1. Client1 send chmod req to the MDT0, then on MDT0,
 352                          * it enqueues master and all of its slaves lock,
 353                          * (mdt_attr_set() -> mdt_lock_slaves()), after gets
 354                          * master and stripe0 lock, it will send the enqueue
 355                          * req (for stripe1) to MDT1, then MDT1 finds the lock
 356                          * has been granted to client2. Then MDT1 sends blocking
 357                          * ast to client2.
 358                          * 2. At the same time, client2 tries to unlink
 359                          * the striped dir (rm -rf striped_dir), and during
 360                          * lookup, it will hold the master inode of the striped
 361                          * directory, whose inode state is NEW, then tries to
 362                          * revalidate all of its slaves, (ll_prep_inode()->
 363                          * ll_iget()->ll_read_inode2()-> ll_update_inode().).
 364                          * And it will be blocked on the server side because
 365                          * of 1.
 366                          * 3. Then the client get the blocking_ast req, cancel
 367                          * the lock, but being blocked if using ->ilookup5()),
 368                          * because master inode state is NEW. */
 369                         master_inode = ilookup5_nowait(inode->i_sb, hash,
 370                                                         ll_test_inode_by_fid,
 371                                                         (void *)&lli->lli_pfid);
 372                         if (master_inode) {
 373                                 ll_invalidate_negative_children(master_inode);
 374                                 iput(master_inode);
 375                         }
 376                 } else {
 377                         ll_invalidate_negative_children(inode);
 378                 }
 379         }
 380
 381         if ((bits & (MDS_INODELOCK_LOOKUP | MDS_INODELOCK_PERM)) &&
 382             inode->i_sb->s_root != NULL &&
 383             inode != inode->i_sb->s_root->d_inode)
 384                 ll_invalidate_aliases(inode);
 385
 386         iput(inode);
 387         RETURN_EXIT;
 388 }
 389
 390 /* Check if the given lock may be downgraded instead of canceling and
 391  * that convert is really needed. */
 392 int ll_md_need_convert(struct ldlm_lock *lock)
 393 {
 394         struct ldlm_namespace *ns = ldlm_lock_to_ns(lock);
 395         struct inode *inode;
 396         __u64 wanted = lock->l_policy_data.l_inodebits.cancel_bits;
 397         __u64 bits = lock->l_policy_data.l_inodebits.bits & ~wanted;
 398         enum ldlm_mode mode = LCK_MINMODE;
 399
 400         if (!lock->l_conn_export ||
 401             !exp_connect_lock_convert(lock->l_conn_export))
 402                 return 0;
 403
 404         if (!wanted || !bits || ldlm_is_cancel(lock))
 405                 return 0;
 406
 407         /* do not convert locks other than DOM for now */
 408         if (!((bits | wanted) & MDS_INODELOCK_DOM))
 409                 return 0;
 410
 411         /* We may have already remaining bits in some other lock so
 412          * lock convert will leave us just extra lock for the same bit.
 413          * Check if client has other lock with the same bits and the same
 414          * or lower mode and don't convert if any.
 415          */
 416         switch (lock->l_req_mode) {
 417         case LCK_PR:
 418                 mode = LCK_PR;
 419         case LCK_PW:
 420                 mode |= LCK_CR;
 421                 break;
 422         case LCK_CW:
 423                 mode = LCK_CW;
 424         case LCK_CR:
 425                 mode |= LCK_CR;
 426                 break;
 427         default:
 428                 /* do not convert other modes */
 429                 return 0;
 430         }
 431
 432         /* is lock is too old to be converted? */
 433         lock_res_and_lock(lock);
 434         if (ktime_after(ktime_get(),
 435                         ktime_add(lock->l_last_used,
 436                                   ktime_set(ns->ns_dirty_age_limit, 0)))) {
 437                 unlock_res_and_lock(lock);
 438                 return 0;
 439         }
 440         unlock_res_and_lock(lock);
 441
 442         inode = ll_inode_from_resource_lock(lock);
 443         ll_have_md_lock(inode, &bits, mode);
 444         iput(inode);
 445         return !!(bits);
 446 }
 447
 448 int ll_md_blocking_ast(struct ldlm_lock *lock, struct ldlm_lock_desc *desc,
 449                        void *data, int flag)
 450 {
 451         struct lustre_handle lockh;
 452         __u64 bits = lock->l_policy_data.l_inodebits.bits;
 453         int rc;
 454
 455         ENTRY;
 456
 457         switch (flag) {
 458         case LDLM_CB_BLOCKING:
 459         {
 460                 __u64 cancel_flags = LCF_ASYNC;
 461
 462                 if (ll_md_need_convert(lock)) {
 463                         cancel_flags |= LCF_CONVERT;
 464                         /* For lock convert some cancel actions may require
 465                          * this lock with non-dropped canceled bits, e.g. page
 466                          * flush for DOM lock. So call ll_lock_cancel_bits()
 467                          * here while canceled bits are still set.
 468                          */
 469                         bits = lock->l_policy_data.l_inodebits.cancel_bits;
 470                         if (bits & MDS_INODELOCK_DOM)
 471                                 ll_lock_cancel_bits(lock, MDS_INODELOCK_DOM);
 472                 }
 473                 ldlm_lock2handle(lock, &lockh);
 474                 rc = ldlm_cli_cancel(&lockh, cancel_flags);
 475                 if (rc < 0) {
 476                         CDEBUG(D_INODE, "ldlm_cli_cancel: rc = %d\n", rc);
 477                         RETURN(rc);
 478                 }
 479                 break;
 480         }
 481         case LDLM_CB_CANCELING:
 482                 /* Nothing to do for non-granted locks */
 483                 if (!ldlm_is_granted(lock))
 484                         break;
 485
 486                 if (ldlm_is_converting(lock)) {
 487                         /* this is called on already converted lock, so
 488                          * ibits has remained bits only and cancel_bits
 489                          * are bits that were dropped.
 490                          * Note that DOM lock is handled prior lock convert
 491                          * and is excluded here.
 492                          */
 493                         bits = lock->l_policy_data.l_inodebits.cancel_bits &
 494                                 ~MDS_INODELOCK_DOM;
 495                 } else {
 496                         LASSERT(ldlm_is_canceling(lock));
 497                 }
 498                 ll_lock_cancel_bits(lock, bits);
 499                 break;
 500         default:
 501                 LBUG();
 502         }
 503
 504         RETURN(0);
 505 }
 506
 507 __u32 ll_i2suppgid(struct inode *i)
 508 {
 509         if (in_group_p(i->i_gid))
 510                 return (__u32)from_kgid(&init_user_ns, i->i_gid);
 511         else
 512                 return (__u32) __kgid_val(INVALID_GID);
 513 }
 514
 515 /* Pack the required supplementary groups into the supplied groups array.
 516  * If we don't need to use the groups from the target inode(s) then we
 517  * instead pack one or more groups from the user's supplementary group
 518  * array in case it might be useful.  Not needed if doing an MDS-side upcall. */
 519 void ll_i2gids(__u32 *suppgids, struct inode *i1, struct inode *i2)
 520 {
 521         LASSERT(i1 != NULL);
 522         LASSERT(suppgids != NULL);
 523
 524         suppgids[0] = ll_i2suppgid(i1);
 525
 526         if (i2)
 527                 suppgids[1] = ll_i2suppgid(i2);
 528         else
 529                 suppgids[1] = -1;
 530 }
 531
 532 /*
 533  * try to reuse three types of dentry:
 534  * 1. unhashed alias, this one is unhashed by d_invalidate (but it may be valid
 535  *    by concurrent .revalidate).
 536  * 2. INVALID alias (common case for no valid ldlm lock held, but this flag may
 537  *    be cleared by others calling d_lustre_revalidate).
 538  * 3. DISCONNECTED alias.
 539  */
 540 static struct dentry *ll_find_alias(struct inode *inode, struct dentry *dentry)
 541 {
 542         struct dentry *alias, *discon_alias, *invalid_alias;
 543         DECLARE_LL_D_HLIST_NODE_PTR(p);
 544
 545         if (ll_d_hlist_empty(&inode->i_dentry))
 546                 return NULL;
 547
 548         discon_alias = invalid_alias = NULL;
 549
 550         ll_lock_dcache(inode);
 551         ll_d_hlist_for_each_entry(alias, p, &inode->i_dentry) {
 552                 LASSERT(alias != dentry);
 553
 554                 spin_lock(&alias->d_lock);
 555                 if ((alias->d_flags & DCACHE_DISCONNECTED) &&
 556                     S_ISDIR(inode->i_mode))
 557                         /* LASSERT(last_discon == NULL); LU-405, bz 20055 */
 558                         discon_alias = alias;
 559                 else if (alias->d_parent == dentry->d_parent             &&
 560                          alias->d_name.hash == dentry->d_name.hash       &&
 561                          alias->d_name.len == dentry->d_name.len         &&
 562                          memcmp(alias->d_name.name, dentry->d_name.name,
 563                                 dentry->d_name.len) == 0)
 564                         invalid_alias = alias;
 565                 spin_unlock(&alias->d_lock);
 566
 567                 if (invalid_alias)
 568                         break;
 569         }
 570         alias = invalid_alias ?: discon_alias ?: NULL;
 571         if (alias) {
 572                 spin_lock(&alias->d_lock);
 573                 dget_dlock(alias);
 574                 spin_unlock(&alias->d_lock);
 575         }
 576         ll_unlock_dcache(inode);
 577
 578         return alias;
 579 }
 580
 581 /*
 582  * Similar to d_splice_alias(), but lustre treats invalid alias
 583  * similar to DCACHE_DISCONNECTED, and tries to use it anyway.
 584  */
 585 struct dentry *ll_splice_alias(struct inode *inode, struct dentry *de)
 586 {
 587         struct dentry *new;
 588         int rc;
 589
 590         if (inode) {
 591                 new = ll_find_alias(inode, de);
 592                 if (new) {
 593                         rc = ll_d_init(new);
 594                         if (rc < 0) {
 595                                 dput(new);
 596                                 return ERR_PTR(rc);
 597                         }
 598                         d_move(new, de);
 599                         iput(inode);
 600                         CDEBUG(D_DENTRY,
 601                                "Reuse dentry %p inode %p refc %d flags %#x\n",
 602                               new, new->d_inode, ll_d_count(new), new->d_flags);
 603                         return new;
 604                 }
 605         }
 606         rc = ll_d_init(de);
 607         if (rc < 0)
 608                 return ERR_PTR(rc);
 609         d_add(de, inode);
 610         CDEBUG(D_DENTRY, "Add dentry %p inode %p refc %d flags %#x\n",
 611                de, de->d_inode, ll_d_count(de), de->d_flags);
 612         return de;
 613 }
 614
 615 static int ll_lookup_it_finish(struct ptlrpc_request *request,
 616                                struct lookup_intent *it,
 617                                struct inode *parent, struct dentry **de,
 618                                void *secctx, __u32 secctxlen)
 619 {
 620         struct inode             *inode = NULL;
 621         __u64                     bits = 0;
 622         int                       rc;
 623         struct dentry *alias;
 624         ENTRY;
 625
 626         /* NB 1 request reference will be taken away by ll_intent_lock()
 627          * when I return */
 628         CDEBUG(D_DENTRY, "it %p it_disposition %x\n", it,
 629                it->it_disposition);
 630         if (!it_disposition(it, DISP_LOOKUP_NEG)) {
 631                 struct req_capsule *pill = &request->rq_pill;
 632                 struct mdt_body *body = req_capsule_server_get(pill,
 633                                                                &RMF_MDT_BODY);
 634
 635                 rc = ll_prep_inode(&inode, request, (*de)->d_sb, it);
 636                 if (rc)
 637                         RETURN(rc);
 638
 639                 if (it->it_op & IT_OPEN)
 640                         ll_dom_finish_open(inode, request, it);
 641
 642                 ll_set_lock_data(ll_i2sbi(parent)->ll_md_exp, inode, it, &bits);
 643
 644                 /* We used to query real size from OSTs here, but actually
 645                  * this is not needed. For stat() calls size would be updated
 646                  * from subsequent do_revalidate()->ll_inode_revalidate_it() in
 647                  * 2.4 and
 648                  * vfs_getattr_it->ll_getattr()->ll_inode_revalidate_it() in 2.6
 649                  * Everybody else who needs correct file size would call
 650                  * ll_glimpse_size or some equivalent themselves anyway.
 651                  * Also see bug 7198.
 652                  */
 653
 654                 /* If security context was returned by MDT, put it in
 655                  * inode now to save an extra getxattr from security hooks,
 656                  * and avoid deadlock.
 657                  */
 658                 if (body->mbo_valid & OBD_MD_SECCTX) {
 659                         secctx = req_capsule_server_get(pill, &RMF_FILE_SECCTX);
 660                         secctxlen = req_capsule_get_size(pill,
 661                                                            &RMF_FILE_SECCTX,
 662                                                            RCL_SERVER);
 663
 664                         if (secctxlen)
 665                                 CDEBUG(D_SEC, "server returned security context"
 666                                        " for "DFID"\n",
 667                                        PFID(ll_inode2fid(inode)));
 668                 }
 669
 670                 if (secctx != NULL && secctxlen != 0) {
 671                         inode_lock(inode);
 672                         rc = security_inode_notifysecctx(inode, secctx,
 673                                                          secctxlen);
 674                         inode_unlock(inode);
 675                         if (rc)
 676                                 CWARN("cannot set security context for "
 677                                       DFID": rc = %d\n",
 678                                       PFID(ll_inode2fid(inode)), rc);
 679                 }
 680         }
 681
 682         /* Only hash *de if it is unhashed (new dentry).
 683          * Atoimc_open may passin hashed dentries for open.
 684          */
 685         alias = ll_splice_alias(inode, *de);
 686         if (IS_ERR(alias))
 687                 GOTO(out, rc = PTR_ERR(alias));
 688
 689         *de = alias;
 690
 691         if (!it_disposition(it, DISP_LOOKUP_NEG)) {
 692                 /* we have lookup look - unhide dentry */
 693                 if (bits & MDS_INODELOCK_LOOKUP)
 694                         d_lustre_revalidate(*de);
 695         } else if (!it_disposition(it, DISP_OPEN_CREATE)) {
 696                 /* If file created on server, don't depend on parent UPDATE
 697                  * lock to unhide it. It is left hidden and next lookup can
 698                  * find it in ll_splice_alias.
 699                  */
 700                 /* Check that parent has UPDATE lock. */
 701                 struct lookup_intent parent_it = {
 702                                         .it_op = IT_GETATTR,
 703                                         .it_lock_handle = 0 };
 704                 struct lu_fid   fid = ll_i2info(parent)->lli_fid;
 705
 706                 /* If it is striped directory, get the real stripe parent */
 707                 if (unlikely(ll_i2info(parent)->lli_lsm_md != NULL)) {
 708                         rc = md_get_fid_from_lsm(ll_i2mdexp(parent),
 709                                                  ll_i2info(parent)->lli_lsm_md,
 710                                                  (*de)->d_name.name,
 711                                                  (*de)->d_name.len, &fid);
 712                         if (rc != 0)
 713                                 GOTO(out, rc);
 714                 }
 715
 716                 if (md_revalidate_lock(ll_i2mdexp(parent), &parent_it, &fid,
 717                                        NULL)) {
 718                         d_lustre_revalidate(*de);
 719                         ll_intent_release(&parent_it);
 720                 }
 721         }
 722
 723         GOTO(out, rc = 0);
 724
 725 out:
 726         if (rc != 0 && it->it_op & IT_OPEN)
 727                 ll_open_cleanup((*de)->d_sb, request);
 728
 729         return rc;
 730 }
 731
 732 static struct dentry *ll_lookup_it(struct inode *parent, struct dentry *dentry,
 733                                    struct lookup_intent *it,
 734                                    void **secctx, __u32 *secctxlen)
 735 {
 736         struct lookup_intent lookup_it = { .it_op = IT_LOOKUP };
 737         struct dentry *save = dentry, *retval;
 738         struct ptlrpc_request *req = NULL;
 739         struct md_op_data *op_data = NULL;
 740         __u32 opc;
 741         int rc;
 742         char secctx_name[XATTR_NAME_MAX + 1];
 743
 744         ENTRY;
 745
 746         if (dentry->d_name.len > ll_i2sbi(parent)->ll_namelen)
 747                 RETURN(ERR_PTR(-ENAMETOOLONG));
 748
 749         CDEBUG(D_VFSTRACE, "VFS Op:name=%.*s, dir="DFID"(%p), intent=%s\n",
 750                dentry->d_name.len, dentry->d_name.name,
 751                PFID(ll_inode2fid(parent)), parent, LL_IT2STR(it));
 752
 753         if (d_mountpoint(dentry))
 754                 CERROR("Tell Peter, lookup on mtpt, it %s\n", LL_IT2STR(it));
 755
 756         if (it == NULL || it->it_op == IT_GETXATTR)
 757                 it = &lookup_it;
 758
 759         if (it->it_op == IT_GETATTR && dentry_may_statahead(parent, dentry)) {
 760                 rc = ll_statahead(parent, &dentry, 0);
 761                 if (rc == 1)
 762                         RETURN(dentry == save ? NULL : dentry);
 763         }
 764
 765         if (it->it_op & IT_OPEN && it->it_flags & FMODE_WRITE &&
 766             dentry->d_sb->s_flags & MS_RDONLY)
 767                 RETURN(ERR_PTR(-EROFS));
 768
 769         if (it->it_op & IT_CREAT)
 770                 opc = LUSTRE_OPC_CREATE;
 771         else
 772                 opc = LUSTRE_OPC_ANY;
 773
 774         op_data = ll_prep_md_op_data(NULL, parent, NULL, dentry->d_name.name,
 775                                      dentry->d_name.len, 0, opc, NULL);
 776         if (IS_ERR(op_data))
 777                 GOTO(out, retval = ERR_CAST(op_data));
 778
 779         /* enforce umask if acl disabled or MDS doesn't support umask */
 780         if (!IS_POSIXACL(parent) || !exp_connect_umask(ll_i2mdexp(parent)))
 781                 it->it_create_mode &= ~current_umask();
 782
 783         if (it->it_op & IT_CREAT &&
 784             ll_i2sbi(parent)->ll_flags & LL_SBI_FILE_SECCTX) {
 785                 rc = ll_dentry_init_security(dentry, it->it_create_mode,
 786                                              &dentry->d_name,
 787                                              &op_data->op_file_secctx_name,
 788                                              &op_data->op_file_secctx,
 789                                              &op_data->op_file_secctx_size);
 790                 if (rc < 0)
 791                         GOTO(out, retval = ERR_PTR(rc));
 792                 if (secctx != NULL)
 793                         *secctx = op_data->op_file_secctx;
 794                 if (secctxlen != NULL)
 795                         *secctxlen = op_data->op_file_secctx_size;
 796         } else {
 797                 if (secctx != NULL)
 798                         *secctx = NULL;
 799                 if (secctxlen != NULL)
 800                         *secctxlen = 0;
 801         }
 802
 803         /* ask for security context upon intent */
 804         if (it->it_op & (IT_LOOKUP | IT_GETATTR | IT_OPEN)) {
 805                 /* get name of security xattr to request to server */
 806                 rc = ll_listsecurity(parent, secctx_name,
 807                                      sizeof(secctx_name));
 808                 if (rc < 0) {
 809                         CDEBUG(D_SEC, "cannot get security xattr name for "
 810                                DFID": rc = %d\n",
 811                                PFID(ll_inode2fid(parent)), rc);
 812                 } else if (rc > 0) {
 813                         op_data->op_file_secctx_name = secctx_name;
 814                         op_data->op_file_secctx_name_size = rc;
 815                         CDEBUG(D_SEC, "'%.*s' is security xattr for "DFID"\n",
 816                                rc, secctx_name, PFID(ll_inode2fid(parent)));
 817                 }
 818         }
 819
 820         rc = md_intent_lock(ll_i2mdexp(parent), op_data, it, &req,
 821                             &ll_md_blocking_ast, 0);
 822         /* If the MDS allows the client to chgrp (CFS_SETGRP_PERM), but the
 823          * client does not know which suppgid should be sent to the MDS, or
 824          * some other(s) changed the target file's GID after this RPC sent
 825          * to the MDS with the suppgid as the original GID, then we should
 826          * try again with right suppgid. */
 827         if (rc == -EACCES && it->it_op & IT_OPEN &&
 828             it_disposition(it, DISP_OPEN_DENY)) {
 829                 struct mdt_body *body;
 830
 831                 LASSERT(req != NULL);
 832
 833                 body = req_capsule_server_get(&req->rq_pill, &RMF_MDT_BODY);
 834                 if (op_data->op_suppgids[0] == body->mbo_gid ||
 835                     op_data->op_suppgids[1] == body->mbo_gid ||
 836                     !in_group_p(make_kgid(&init_user_ns, body->mbo_gid)))
 837                         GOTO(out, retval = ERR_PTR(-EACCES));
 838
 839                 fid_zero(&op_data->op_fid2);
 840                 op_data->op_suppgids[1] = body->mbo_gid;
 841                 ptlrpc_req_finished(req);
 842                 req = NULL;
 843                 ll_intent_release(it);
 844                 rc = md_intent_lock(ll_i2mdexp(parent), op_data, it, &req,
 845                                     &ll_md_blocking_ast, 0);
 846         }
 847
 848         if (rc < 0)
 849                 GOTO(out, retval = ERR_PTR(rc));
 850
 851         /* dir layout may change */
 852         ll_unlock_md_op_lsm(op_data);
 853         rc = ll_lookup_it_finish(req, it, parent, &dentry,
 854                                  secctx != NULL ? *secctx : NULL,
 855                                  secctxlen != NULL ? *secctxlen : 0);
 856         if (rc != 0) {
 857                 ll_intent_release(it);
 858                 GOTO(out, retval = ERR_PTR(rc));
 859         }
 860
 861         if ((it->it_op & IT_OPEN) && dentry->d_inode &&
 862             !S_ISREG(dentry->d_inode->i_mode) &&
 863             !S_ISDIR(dentry->d_inode->i_mode)) {
 864                 ll_release_openhandle(dentry, it);
 865         }
 866         ll_lookup_finish_locks(it, dentry);
 867
 868         GOTO(out, retval = (dentry == save) ? NULL : dentry);
 869
 870 out:
 871         if (op_data != NULL && !IS_ERR(op_data)) {
 872                 if (secctx != NULL && secctxlen != NULL) {
 873                         /* caller needs sec ctx info, so reset it in op_data to
 874                          * prevent it from being freed */
 875                         op_data->op_file_secctx = NULL;
 876                         op_data->op_file_secctx_size = 0;
 877                 }
 878                 ll_finish_md_op_data(op_data);
 879         }
 880
 881         ptlrpc_req_finished(req);
 882         return retval;
 883 }
 884
 885 #ifdef HAVE_IOP_ATOMIC_OPEN
 886 static struct dentry *ll_lookup_nd(struct inode *parent, struct dentry *dentry,
 887                                    unsigned int flags)
 888 {
 889         struct lookup_intent *itp, it = { .it_op = IT_GETATTR };
 890         struct dentry *de;
 891
 892         CDEBUG(D_VFSTRACE, "VFS Op:name=%.*s, dir="DFID"(%p), flags=%u\n",
 893                dentry->d_name.len, dentry->d_name.name,
 894                PFID(ll_inode2fid(parent)), parent, flags);
 895
 896         /*
 897          * Optimize away (CREATE && !OPEN). Let .create handle the race.
 898          * but only if we have write permissions there, otherwise we need
 899          * to proceed with lookup. LU-4185
 900          */
 901         if ((flags & LOOKUP_CREATE) && !(flags & LOOKUP_OPEN) &&
 902             (inode_permission(parent, MAY_WRITE | MAY_EXEC) == 0))
 903                 return NULL;
 904
 905         if (flags & (LOOKUP_PARENT|LOOKUP_OPEN|LOOKUP_CREATE))
 906                 itp = NULL;
 907         else
 908                 itp = &it;
 909         de = ll_lookup_it(parent, dentry, itp, NULL, NULL);
 910
 911         if (itp != NULL)
 912                 ll_intent_release(itp);
 913
 914         return de;
 915 }
 916
 917 /*
 918  * For cached negative dentry and new dentry, handle lookup/create/open
 919  * together.
 920  */
 921 static int ll_atomic_open(struct inode *dir, struct dentry *dentry,
 922                           struct file *file, unsigned open_flags,
 923                           umode_t mode, int *opened)
 924 {
 925         struct lookup_intent *it;
 926         struct dentry *de;
 927         long long lookup_flags = LOOKUP_OPEN;
 928         void *secctx = NULL;
 929         __u32 secctxlen = 0;
 930         int rc = 0;
 931         ENTRY;
 932
 933         CDEBUG(D_VFSTRACE, "VFS Op:name=%.*s, dir="DFID"(%p), file %p,"
 934                            "open_flags %x, mode %x opened %d\n",
 935                dentry->d_name.len, dentry->d_name.name,
 936                PFID(ll_inode2fid(dir)), dir, file, open_flags, mode, *opened);
 937
 938         /* Only negative dentries enter here */
 939         LASSERT(dentry->d_inode == NULL);
 940
 941         if (!d_unhashed(dentry)) {
 942                 /* A valid negative dentry that just passed revalidation,
 943                  * there's little point to try and open it server-side,
 944                  * even though there's a minuscule chance it might succeed.
 945                  * Either way it's a valid race to just return -ENOENT here.
 946                  */
 947                 if (!(open_flags & O_CREAT))
 948                         return -ENOENT;
 949
 950                 /* Otherwise we just unhash it to be rehashed afresh via
 951                  * lookup if necessary
 952                  */
 953                 d_drop(dentry);
 954         }
 955
 956         OBD_ALLOC(it, sizeof(*it));
 957         if (!it)
 958                 RETURN(-ENOMEM);
 959
 960         it->it_op = IT_OPEN;
 961         if (open_flags & O_CREAT) {
 962                 it->it_op |= IT_CREAT;
 963                 lookup_flags |= LOOKUP_CREATE;
 964         }
 965         it->it_create_mode = (mode & S_IALLUGO) | S_IFREG;
 966         it->it_flags = (open_flags & ~O_ACCMODE) | OPEN_FMODE(open_flags);
 967         it->it_flags &= ~MDS_OPEN_FL_INTERNAL;
 968
 969         /* Dentry added to dcache tree in ll_lookup_it */
 970         de = ll_lookup_it(dir, dentry, it, &secctx, &secctxlen);
 971         if (IS_ERR(de))
 972                 rc = PTR_ERR(de);
 973         else if (de != NULL)
 974                 dentry = de;
 975
 976         CFS_FAIL_TIMEOUT(OBD_FAIL_LLITE_CREATE_FILE_PAUSE, cfs_fail_val);
 977
 978         if (!rc) {
 979                 if (it_disposition(it, DISP_OPEN_CREATE)) {
 980                         /* Dentry instantiated in ll_create_it. */
 981                         rc = ll_create_it(dir, dentry, it, secctx, secctxlen);
 982                         security_release_secctx(secctx, secctxlen);
 983                         if (rc) {
 984                                 /* We dget in ll_splice_alias. */
 985                                 if (de != NULL)
 986                                         dput(de);
 987                                 goto out_release;
 988                         }
 989
 990                         *opened |= FILE_CREATED;
 991                 }
 992                 if (dentry->d_inode && it_disposition(it, DISP_OPEN_OPEN)) {
 993                         /* Open dentry. */
 994                         if (S_ISFIFO(dentry->d_inode->i_mode)) {
 995                                 /* We cannot call open here as it might
 996                                  * deadlock. This case is unreachable in
 997                                  * practice because of OBD_CONNECT_NODEVOH. */
 998                                 rc = finish_no_open(file, de);
 999                         } else {
1000                                 file->private_data = it;
1001                                 rc = finish_open(file, dentry, NULL, opened);
1002                                 /* We dget in ll_splice_alias. finish_open takes
1003                                  * care of dget for fd open.
1004                                  */
1005                                 if (de != NULL)
1006                                         dput(de);
1007                         }
1008                 } else {
1009                         rc = finish_no_open(file, de);
1010                 }
1011         }
1012
1013 out_release:
1014         ll_intent_release(it);
1015         OBD_FREE(it, sizeof(*it));
1016
1017         RETURN(rc);
1018 }
1019
1020 #else /* !HAVE_IOP_ATOMIC_OPEN */
1021 static struct lookup_intent *
1022 ll_convert_intent(struct open_intent *oit, int lookup_flags, bool is_readonly)
1023 {
1024         struct lookup_intent *it;
1025
1026         OBD_ALLOC_PTR(it);
1027         if (!it)
1028                 return ERR_PTR(-ENOMEM);
1029
1030         if (lookup_flags & LOOKUP_OPEN) {
1031                 it->it_op = IT_OPEN;
1032                 /* Avoid file creation for ro bind mount point(is_readonly) */
1033                 if ((lookup_flags & LOOKUP_CREATE) && !is_readonly)
1034                         it->it_op |= IT_CREAT;
1035                 it->it_create_mode = (oit->create_mode & S_IALLUGO) | S_IFREG;
1036                 it->it_flags = ll_namei_to_lookup_intent_flag(oit->flags &
1037                                                 ~(is_readonly ? O_CREAT : 0));
1038                 it->it_flags &= ~MDS_OPEN_FL_INTERNAL;
1039         } else {
1040                 it->it_op = IT_GETATTR;
1041         }
1042
1043         return it;
1044 }
1045
1046 static struct dentry *ll_lookup_nd(struct inode *parent, struct dentry *dentry,
1047                                    struct nameidata *nd)
1048 {
1049         struct dentry *de;
1050         ENTRY;
1051
1052         if (nd && !(nd->flags & (LOOKUP_CONTINUE|LOOKUP_PARENT))) {
1053                 struct lookup_intent *it;
1054
1055                 if (ll_d2d(dentry) && ll_d2d(dentry)->lld_it) {
1056                         it = ll_d2d(dentry)->lld_it;
1057                         ll_d2d(dentry)->lld_it = NULL;
1058                 } else {
1059                         /*
1060                          * Optimize away (CREATE && !OPEN). Let .create handle
1061                          * the race. But only if we have write permissions
1062                          * there, otherwise we need to proceed with lookup.
1063                          * LU-4185
1064                          */
1065                         if ((nd->flags & LOOKUP_CREATE) &&
1066                             !(nd->flags & LOOKUP_OPEN) &&
1067                             (inode_permission(parent,
1068                                               MAY_WRITE | MAY_EXEC) == 0))
1069                                 RETURN(NULL);
1070
1071                         it = ll_convert_intent(&nd->intent.open, nd->flags,
1072                                 (nd->path.mnt->mnt_flags & MNT_READONLY) ||
1073                                 (nd->path.mnt->mnt_sb->s_flags & MS_RDONLY));
1074                         if (IS_ERR(it))
1075                                 RETURN((struct dentry *)it);
1076                 }
1077
1078                 de = ll_lookup_it(parent, dentry, it, NULL, NULL);
1079                 if (de)
1080                         dentry = de;
1081                 if ((nd->flags & LOOKUP_OPEN) && !IS_ERR(dentry)) { /* Open */
1082                         if (dentry->d_inode &&
1083                             it_disposition(it, DISP_OPEN_OPEN)) { /* nocreate */
1084                                 if (S_ISFIFO(dentry->d_inode->i_mode)) {
1085                                         /* We cannot call open here as it might
1086                                          * deadlock. This case is unreachable in
1087                                          * practice because of
1088                                          * OBD_CONNECT_NODEVOH. */
1089                                 } else {
1090                                         struct file *filp;
1091
1092                                         nd->intent.open.file->private_data = it;
1093                                         filp = lookup_instantiate_filp(nd,
1094                                                                        dentry,
1095                                                                        NULL);
1096                                         if (IS_ERR(filp)) {
1097                                                 if (de)
1098                                                         dput(de);
1099                                                 de = (struct dentry *)filp;
1100                                         }
1101                                 }
1102                         } else if (it_disposition(it, DISP_OPEN_CREATE)) {
1103                                 /* XXX This can only reliably work on assumption
1104                                  * that there are NO hashed negative dentries.*/
1105                                 ll_d2d(dentry)->lld_it = it;
1106                                 it = NULL; /* Will be freed in ll_create_nd */
1107                                 /* We absolutely depend on ll_create_nd to be
1108                                  * called to not leak this intent and possible
1109                                  * data attached to it */
1110                         }
1111                 }
1112
1113                 if (it) {
1114                         ll_intent_release(it);
1115                         OBD_FREE(it, sizeof(*it));
1116                 }
1117         } else {
1118                 de = ll_lookup_it(parent, dentry, NULL, NULL, NULL);
1119         }
1120
1121         RETURN(de);
1122 }
1123 #endif /* HAVE_IOP_ATOMIC_OPEN */
1124
1125 /* We depend on "mode" being set with the proper file type/umask by now */
1126 static struct inode *ll_create_node(struct inode *dir, struct lookup_intent *it)
1127 {
1128         struct inode *inode = NULL;
1129         struct ptlrpc_request *request = NULL;
1130         struct ll_sb_info *sbi = ll_i2sbi(dir);
1131         int rc;
1132         ENTRY;
1133
1134         LASSERT(it && it->it_disposition);
1135
1136         LASSERT(it_disposition(it, DISP_ENQ_CREATE_REF));
1137         request = it->it_request;
1138         it_clear_disposition(it, DISP_ENQ_CREATE_REF);
1139         rc = ll_prep_inode(&inode, request, dir->i_sb, it);
1140         if (rc)
1141                 GOTO(out, inode = ERR_PTR(rc));
1142
1143         /* Pause to allow for a race with concurrent access by fid */
1144         OBD_FAIL_TIMEOUT(OBD_FAIL_LLITE_CREATE_NODE_PAUSE, cfs_fail_val);
1145
1146         /* We asked for a lock on the directory, but were granted a
1147          * lock on the inode.  Since we finally have an inode pointer,
1148          * stuff it in the lock. */
1149         CDEBUG(D_DLMTRACE, "setting l_ast_data to inode "DFID"(%p)\n",
1150                PFID(ll_inode2fid(inode)), inode);
1151         ll_set_lock_data(sbi->ll_md_exp, inode, it, NULL);
1152         EXIT;
1153  out:
1154         ptlrpc_req_finished(request);
1155         return inode;
1156 }
1157
1158 /*
1159  * By the time this is called, we already have created the directory cache
1160  * entry for the new file, but it is so far negative - it has no inode.
1161  *
1162  * We defer creating the OBD object(s) until open, to keep the intent and
1163  * non-intent code paths similar, and also because we do not have the MDS
1164  * inode number before calling ll_create_node() (which is needed for LOV),
1165  * so we would need to do yet another RPC to the MDS to store the LOV EA
1166  * data on the MDS.  If needed, we would pass the PACKED lmm as data and
1167  * lmm_size in datalen (the MDS still has code which will handle that).
1168  *
1169  * If the create succeeds, we fill in the inode information
1170  * with d_instantiate().
1171  */
1172 static int ll_create_it(struct inode *dir, struct dentry *dentry,
1173                         struct lookup_intent *it,
1174                         void *secctx, __u32 secctxlen)
1175 {
1176         struct inode *inode;
1177         int rc = 0;
1178         ENTRY;
1179
1180         CDEBUG(D_VFSTRACE, "VFS Op:name=%.*s, dir="DFID"(%p), intent=%s\n",
1181                dentry->d_name.len, dentry->d_name.name,
1182                PFID(ll_inode2fid(dir)), dir, LL_IT2STR(it));
1183
1184         rc = it_open_error(DISP_OPEN_CREATE, it);
1185         if (rc)
1186                 RETURN(rc);
1187
1188         inode = ll_create_node(dir, it);
1189         if (IS_ERR(inode))
1190                 RETURN(PTR_ERR(inode));
1191
1192         if ((ll_i2sbi(inode)->ll_flags & LL_SBI_FILE_SECCTX) &&
1193             secctx != NULL) {
1194                 inode_lock(inode);
1195                 /* must be done before d_instantiate, because it calls
1196                  * security_d_instantiate, which means a getxattr if security
1197                  * context is not set yet */
1198                 rc = security_inode_notifysecctx(inode, secctx, secctxlen);
1199                 inode_unlock(inode);
1200                 if (rc)
1201                         RETURN(rc);
1202         }
1203
1204         d_instantiate(dentry, inode);
1205
1206         if (!(ll_i2sbi(inode)->ll_flags & LL_SBI_FILE_SECCTX)) {
1207                 rc = ll_inode_init_security(dentry, inode, dir);
1208                 if (rc)
1209                         RETURN(rc);
1210         }
1211
1212         RETURN(0);
1213 }
1214
1215 void ll_update_times(struct ptlrpc_request *request, struct inode *inode)
1216 {
1217         struct mdt_body *body = req_capsule_server_get(&request->rq_pill,
1218                                                        &RMF_MDT_BODY);
1219
1220         LASSERT(body);
1221         if (body->mbo_valid & OBD_MD_FLMTIME &&
1222             body->mbo_mtime > inode->i_mtime.tv_sec) {
1223                 CDEBUG(D_INODE,
1224                        "setting fid " DFID " mtime from %lld to %llu\n",
1225                        PFID(ll_inode2fid(inode)),
1226                        (s64)inode->i_mtime.tv_sec, body->mbo_mtime);
1227                 inode->i_mtime.tv_sec = body->mbo_mtime;
1228         }
1229
1230         if (body->mbo_valid & OBD_MD_FLCTIME &&
1231             body->mbo_ctime > inode->i_ctime.tv_sec)
1232                 inode->i_ctime.tv_sec = body->mbo_ctime;
1233 }
1234
1235 static int ll_new_node(struct inode *dir, struct dentry *dchild,
1236                        const char *tgt, umode_t mode, int rdev, __u32 opc)
1237 {
1238         struct qstr *name = &dchild->d_name;
1239         struct ptlrpc_request *request = NULL;
1240         struct md_op_data *op_data;
1241         struct inode *inode = NULL;
1242         struct ll_sb_info *sbi = ll_i2sbi(dir);
1243         int tgt_len = 0;
1244         int err;
1245
1246         ENTRY;
1247         if (unlikely(tgt != NULL))
1248                 tgt_len = strlen(tgt) + 1;
1249
1250 again:
1251         op_data = ll_prep_md_op_data(NULL, dir, NULL, name->name,
1252                                      name->len, 0, opc, NULL);
1253         if (IS_ERR(op_data))
1254                 GOTO(err_exit, err = PTR_ERR(op_data));
1255
1256         if (sbi->ll_flags & LL_SBI_FILE_SECCTX) {
1257                 err = ll_dentry_init_security(dchild, mode, &dchild->d_name,
1258                                               &op_data->op_file_secctx_name,
1259                                               &op_data->op_file_secctx,
1260                                               &op_data->op_file_secctx_size);
1261                 if (err < 0)
1262                         GOTO(err_exit, err);
1263         }
1264
1265         err = md_create(sbi->ll_md_exp, op_data, tgt, tgt_len, mode,
1266                         from_kuid(&init_user_ns, current_fsuid()),
1267                         from_kgid(&init_user_ns, current_fsgid()),
1268                         cfs_curproc_cap_pack(), rdev, &request);
1269         if (err < 0 && err != -EREMOTE)
1270                 GOTO(err_exit, err);
1271
1272         /* If the client doesn't know where to create a subdirectory (or
1273          * in case of a race that sends the RPC to the wrong MDS), the
1274          * MDS will return -EREMOTE and the client will fetch the layout
1275          * of the directory, then create the directory on the right MDT. */
1276         if (unlikely(err == -EREMOTE)) {
1277                 struct ll_inode_info    *lli = ll_i2info(dir);
1278                 struct lmv_user_md      *lum;
1279                 int                     lumsize;
1280                 int                     err2;
1281
1282                 ptlrpc_req_finished(request);
1283                 request = NULL;
1284
1285                 err2 = ll_dir_getstripe(dir, (void **)&lum, &lumsize, &request,
1286                                         OBD_MD_DEFAULT_MEA);
1287                 if (err2 == 0) {
1288                         /* Update stripe_offset and retry */
1289                         lli->lli_def_stripe_offset = lum->lum_stripe_offset;
1290                 } else if (err2 == -ENODATA &&
1291                            lli->lli_def_stripe_offset != -1) {
1292                         /* If there are no default stripe EA on the MDT, but the
1293                          * client has default stripe, then it probably means
1294                          * default stripe EA has just been deleted. */
1295                         lli->lli_def_stripe_offset = -1;
1296                 } else {
1297                         GOTO(err_exit, err);
1298                 }
1299
1300                 ptlrpc_req_finished(request);
1301                 request = NULL;
1302                 ll_finish_md_op_data(op_data);
1303                 goto again;
1304         }
1305
1306         ll_update_times(request, dir);
1307
1308         CFS_FAIL_TIMEOUT(OBD_FAIL_LLITE_NEWNODE_PAUSE, cfs_fail_val);
1309
1310         err = ll_prep_inode(&inode, request, dchild->d_sb, NULL);
1311         if (err)
1312                 GOTO(err_exit, err);
1313
1314         if (sbi->ll_flags & LL_SBI_FILE_SECCTX) {
1315                 inode_lock(inode);
1316                 /* must be done before d_instantiate, because it calls
1317                  * security_d_instantiate, which means a getxattr if security
1318                  * context is not set yet */
1319                 err = security_inode_notifysecctx(inode,
1320                                                   op_data->op_file_secctx,
1321                                                   op_data->op_file_secctx_size);
1322                 inode_unlock(inode);
1323                 if (err)
1324                         GOTO(err_exit, err);
1325         }
1326
1327         d_instantiate(dchild, inode);
1328
1329         if (!(sbi->ll_flags & LL_SBI_FILE_SECCTX)) {
1330                 err = ll_inode_init_security(dchild, inode, dir);
1331                 if (err)
1332                         GOTO(err_exit, err);
1333         }
1334
1335         EXIT;
1336 err_exit:
1337         if (request != NULL)
1338                 ptlrpc_req_finished(request);
1339
1340         if (!IS_ERR_OR_NULL(op_data))
1341                 ll_finish_md_op_data(op_data);
1342
1343         return err;
1344 }
1345
1346 static int ll_mknod(struct inode *dir, struct dentry *dchild, ll_umode_t mode,
1347                     dev_t rdev)
1348 {
1349         struct qstr *name = &dchild->d_name;
1350         int err;
1351         ENTRY;
1352
1353         CDEBUG(D_VFSTRACE, "VFS Op:name=%.*s, dir="DFID"(%p) mode %o dev %x\n",
1354                name->len, name->name, PFID(ll_inode2fid(dir)), dir,
1355                mode, rdev);
1356
1357         if (!IS_POSIXACL(dir) || !exp_connect_umask(ll_i2mdexp(dir)))
1358                 mode &= ~current_umask();
1359
1360         switch (mode & S_IFMT) {
1361         case 0:
1362                 mode |= S_IFREG; /* for mode = 0 case, fallthrough */
1363         case S_IFREG:
1364         case S_IFCHR:
1365         case S_IFBLK:
1366         case S_IFIFO:
1367         case S_IFSOCK:
1368                 err = ll_new_node(dir, dchild, NULL, mode, old_encode_dev(rdev),
1369                                   LUSTRE_OPC_MKNOD);
1370                 break;
1371         case S_IFDIR:
1372                 err = -EPERM;
1373                 break;
1374         default:
1375                 err = -EINVAL;
1376         }
1377
1378         if (!err)
1379                 ll_stats_ops_tally(ll_i2sbi(dir), LPROC_LL_MKNOD, 1);
1380
1381         RETURN(err);
1382 }
1383
1384 #ifdef HAVE_IOP_ATOMIC_OPEN
1385 /*
1386  * Plain create. Intent create is handled in atomic_open.
1387  */
1388 static int ll_create_nd(struct inode *dir, struct dentry *dentry,
1389                         umode_t mode, bool want_excl)
1390 {
1391         int rc;
1392
1393         CFS_FAIL_TIMEOUT(OBD_FAIL_LLITE_CREATE_FILE_PAUSE, cfs_fail_val);
1394
1395         CDEBUG(D_VFSTRACE, "VFS Op:name=%.*s, dir="DFID"(%p), "
1396                            "flags=%u, excl=%d\n", dentry->d_name.len,
1397                dentry->d_name.name, PFID(ll_inode2fid(dir)),
1398                dir, mode, want_excl);
1399
1400         /* Using mknod(2) to create a regular file is designed to not recognize
1401          * volatile file name, so we use ll_mknod() here. */
1402         rc = ll_mknod(dir, dentry, mode, 0);
1403
1404         ll_stats_ops_tally(ll_i2sbi(dir), LPROC_LL_CREATE, 1);
1405
1406         CDEBUG(D_VFSTRACE, "VFS Op:name=%.*s, unhashed %d\n",
1407                dentry->d_name.len, dentry->d_name.name, d_unhashed(dentry));
1408
1409         return rc;
1410 }
1411 #else /* !HAVE_IOP_ATOMIC_OPEN */
1412 static int ll_create_nd(struct inode *dir, struct dentry *dentry,
1413                         ll_umode_t mode, struct nameidata *nd)
1414 {
1415         struct ll_dentry_data *lld = ll_d2d(dentry);
1416         struct lookup_intent *it = NULL;
1417         int rc;
1418
1419         CFS_FAIL_TIMEOUT(OBD_FAIL_LLITE_CREATE_FILE_PAUSE, cfs_fail_val);
1420
1421         if (lld != NULL)
1422                 it = lld->lld_it;
1423
1424         if (!it) {
1425                 /* LU-8559: use LUSTRE_OPC_CREATE for non atomic open case
1426                  * so that volatile file name is recoginized.
1427                  * Mknod(2), however, is designed to not recognize volatile
1428                  * file name to avoid inode leak under orphan directory until
1429                  * MDT reboot */
1430                 return ll_new_node(dir, dentry, NULL, mode, 0,
1431                                    LUSTRE_OPC_CREATE);
1432         }
1433
1434         lld->lld_it = NULL;
1435
1436         /* Was there an error? Propagate it! */
1437         if (it->it_status) {
1438                 rc = it->it_status;
1439                 goto out;
1440         }
1441
1442         rc = ll_create_it(dir, dentry, it, NULL, 0);
1443         if (nd && (nd->flags & LOOKUP_OPEN) && dentry->d_inode) { /* Open */
1444                 struct file *filp;
1445
1446                 nd->intent.open.file->private_data = it;
1447                 filp = lookup_instantiate_filp(nd, dentry, NULL);
1448                 if (IS_ERR(filp))
1449                         rc = PTR_ERR(filp);
1450         }
1451
1452 out:
1453         ll_intent_release(it);
1454         OBD_FREE(it, sizeof(*it));
1455
1456         if (!rc)
1457                 ll_stats_ops_tally(ll_i2sbi(dir), LPROC_LL_CREATE, 1);
1458
1459         return rc;
1460 }
1461 #endif /* HAVE_IOP_ATOMIC_OPEN */
1462
1463 static int ll_symlink(struct inode *dir, struct dentry *dchild,
1464                       const char *oldpath)
1465 {
1466         struct qstr *name = &dchild->d_name;
1467         int err;
1468         ENTRY;
1469
1470         CDEBUG(D_VFSTRACE, "VFS Op:name=%.*s, dir="DFID"(%p), target=%.*s\n",
1471                name->len, name->name, PFID(ll_inode2fid(dir)),
1472                dir, 3000, oldpath);
1473
1474         err = ll_new_node(dir, dchild, oldpath, S_IFLNK | S_IRWXUGO, 0,
1475                           LUSTRE_OPC_SYMLINK);
1476
1477         if (!err)
1478                 ll_stats_ops_tally(ll_i2sbi(dir), LPROC_LL_SYMLINK, 1);
1479
1480         RETURN(err);
1481 }
1482
1483 static int ll_link(struct dentry *old_dentry, struct inode *dir,
1484                    struct dentry *new_dentry)
1485 {
1486         struct inode *src = old_dentry->d_inode;
1487         struct qstr *name = &new_dentry->d_name;
1488         struct ll_sb_info *sbi = ll_i2sbi(dir);
1489         struct ptlrpc_request *request = NULL;
1490         struct md_op_data *op_data;
1491         int err;
1492
1493         ENTRY;
1494         CDEBUG(D_VFSTRACE, "VFS Op: inode="DFID"(%p), dir="DFID"(%p), "
1495                "target=%.*s\n", PFID(ll_inode2fid(src)), src,
1496                PFID(ll_inode2fid(dir)), dir, name->len, name->name);
1497
1498         op_data = ll_prep_md_op_data(NULL, src, dir, name->name, name->len,
1499                                      0, LUSTRE_OPC_ANY, NULL);
1500         if (IS_ERR(op_data))
1501                 RETURN(PTR_ERR(op_data));
1502
1503         err = md_link(sbi->ll_md_exp, op_data, &request);
1504         ll_finish_md_op_data(op_data);
1505         if (err)
1506                 GOTO(out, err);
1507
1508         ll_update_times(request, dir);
1509         ll_stats_ops_tally(sbi, LPROC_LL_LINK, 1);
1510         EXIT;
1511 out:
1512         ptlrpc_req_finished(request);
1513         RETURN(err);
1514 }
1515
1516 static int ll_mkdir(struct inode *dir, struct dentry *dchild, ll_umode_t mode)
1517 {
1518         struct qstr *name = &dchild->d_name;
1519         int err;
1520         ENTRY;
1521
1522         CDEBUG(D_VFSTRACE, "VFS Op:name=%.*s, dir="DFID"(%p)\n",
1523                name->len, name->name, PFID(ll_inode2fid(dir)), dir);
1524
1525         if (!IS_POSIXACL(dir) || !exp_connect_umask(ll_i2mdexp(dir)))
1526                 mode &= ~current_umask();
1527
1528         mode = (mode & (S_IRWXUGO|S_ISVTX)) | S_IFDIR;
1529
1530         err = ll_new_node(dir, dchild, NULL, mode, 0, LUSTRE_OPC_MKDIR);
1531         if (err == 0)
1532                 ll_stats_ops_tally(ll_i2sbi(dir), LPROC_LL_MKDIR, 1);
1533
1534         RETURN(err);
1535 }
1536
1537 static int ll_rmdir(struct inode *dir, struct dentry *dchild)
1538 {
1539         struct qstr *name = &dchild->d_name;
1540         struct ptlrpc_request *request = NULL;
1541         struct md_op_data *op_data;
1542         int rc;
1543         ENTRY;
1544
1545         CDEBUG(D_VFSTRACE, "VFS Op:name=%.*s, dir="DFID"(%p)\n",
1546                name->len, name->name, PFID(ll_inode2fid(dir)), dir);
1547
1548         if (unlikely(d_mountpoint(dchild)))
1549                 RETURN(-EBUSY);
1550
1551         op_data = ll_prep_md_op_data(NULL, dir, NULL, name->name, name->len,
1552                                      S_IFDIR, LUSTRE_OPC_ANY, NULL);
1553         if (IS_ERR(op_data))
1554                 RETURN(PTR_ERR(op_data));
1555
1556         if (dchild->d_inode != NULL)
1557                 op_data->op_fid3 = *ll_inode2fid(dchild->d_inode);
1558
1559         op_data->op_fid2 = op_data->op_fid3;
1560         rc = md_unlink(ll_i2sbi(dir)->ll_md_exp, op_data, &request);
1561         ll_finish_md_op_data(op_data);
1562         if (rc == 0) {
1563                 ll_update_times(request, dir);
1564                 ll_stats_ops_tally(ll_i2sbi(dir), LPROC_LL_RMDIR, 1);
1565         }
1566
1567         ptlrpc_req_finished(request);
1568         RETURN(rc);
1569 }
1570
1571 /**
1572  * Remove dir entry
1573  **/
1574 int ll_rmdir_entry(struct inode *dir, char *name, int namelen)
1575 {
1576         struct ptlrpc_request *request = NULL;
1577         struct md_op_data *op_data;
1578         int rc;
1579         ENTRY;
1580
1581         CDEBUG(D_VFSTRACE, "VFS Op:name=%.*s, dir="DFID"(%p)\n",
1582                namelen, name, PFID(ll_inode2fid(dir)), dir);
1583
1584         op_data = ll_prep_md_op_data(NULL, dir, NULL, name, strlen(name),
1585                                      S_IFDIR, LUSTRE_OPC_ANY, NULL);
1586         if (IS_ERR(op_data))
1587                 RETURN(PTR_ERR(op_data));
1588         op_data->op_cli_flags |= CLI_RM_ENTRY;
1589         rc = md_unlink(ll_i2sbi(dir)->ll_md_exp, op_data, &request);
1590         ll_finish_md_op_data(op_data);
1591         if (rc == 0) {
1592                 ll_update_times(request, dir);
1593                 ll_stats_ops_tally(ll_i2sbi(dir), LPROC_LL_RMDIR, 1);
1594         }
1595
1596         ptlrpc_req_finished(request);
1597         RETURN(rc);
1598 }
1599
1600 static int ll_unlink(struct inode *dir, struct dentry *dchild)
1601 {
1602         struct qstr *name = &dchild->d_name;
1603         struct ptlrpc_request *request = NULL;
1604         struct md_op_data *op_data;
1605         struct mdt_body *body;
1606         int rc;
1607         ENTRY;
1608         CDEBUG(D_VFSTRACE, "VFS Op:name=%.*s, dir="DFID"(%p)\n",
1609                name->len, name->name, PFID(ll_inode2fid(dir)), dir);
1610
1611         /*
1612          * XXX: unlink bind mountpoint maybe call to here,
1613          * just check it as vfs_unlink does.
1614          */
1615         if (unlikely(d_mountpoint(dchild)))
1616                 RETURN(-EBUSY);
1617
1618         op_data = ll_prep_md_op_data(NULL, dir, NULL, name->name, name->len, 0,
1619                                      LUSTRE_OPC_ANY, NULL);
1620         if (IS_ERR(op_data))
1621                 RETURN(PTR_ERR(op_data));
1622
1623         op_data->op_fid3 = *ll_inode2fid(dchild->d_inode);
1624
1625         op_data->op_fid2 = op_data->op_fid3;
1626         rc = md_unlink(ll_i2sbi(dir)->ll_md_exp, op_data, &request);
1627         ll_finish_md_op_data(op_data);
1628         if (rc)
1629                 GOTO(out, rc);
1630
1631         /*
1632          * The server puts attributes in on the last unlink, use them to update
1633          * the link count so the inode can be freed immediately.
1634          */
1635         body = req_capsule_server_get(&request->rq_pill, &RMF_MDT_BODY);
1636         if (body->mbo_valid & OBD_MD_FLNLINK)
1637                 set_nlink(dchild->d_inode, body->mbo_nlink);
1638
1639         ll_update_times(request, dir);
1640         ll_stats_ops_tally(ll_i2sbi(dir), LPROC_LL_UNLINK, 1);
1641
1642 out:
1643         ptlrpc_req_finished(request);
1644         RETURN(rc);
1645 }
1646
1647 static int ll_rename(struct inode *src, struct dentry *src_dchild,
1648                      struct inode *tgt, struct dentry *tgt_dchild
1649 #ifdef HAVE_IOPS_RENAME_WITH_FLAGS
1650                      , unsigned int flags
1651 #endif
1652                      )
1653 {
1654         struct qstr *src_name = &src_dchild->d_name;
1655         struct qstr *tgt_name = &tgt_dchild->d_name;
1656         struct ptlrpc_request *request = NULL;
1657         struct ll_sb_info *sbi = ll_i2sbi(src);
1658         struct md_op_data *op_data;
1659         int err;
1660         ENTRY;
1661
1662 #ifdef HAVE_IOPS_RENAME_WITH_FLAGS
1663         if (flags)
1664                 return -EINVAL;
1665 #endif
1666
1667         CDEBUG(D_VFSTRACE, "VFS Op:oldname=%.*s, src_dir="DFID
1668                "(%p), newname=%.*s, tgt_dir="DFID"(%p)\n",
1669                src_name->len, src_name->name,
1670                PFID(ll_inode2fid(src)), src, tgt_name->len,
1671                tgt_name->name, PFID(ll_inode2fid(tgt)), tgt);
1672
1673         if (unlikely(d_mountpoint(src_dchild) || d_mountpoint(tgt_dchild)))
1674                 RETURN(-EBUSY);
1675
1676         op_data = ll_prep_md_op_data(NULL, src, tgt, NULL, 0, 0,
1677                                      LUSTRE_OPC_ANY, NULL);
1678         if (IS_ERR(op_data))
1679                 RETURN(PTR_ERR(op_data));
1680
1681         if (src_dchild->d_inode != NULL)
1682                 op_data->op_fid3 = *ll_inode2fid(src_dchild->d_inode);
1683
1684         if (tgt_dchild->d_inode != NULL)
1685                 op_data->op_fid4 = *ll_inode2fid(tgt_dchild->d_inode);
1686
1687         err = md_rename(sbi->ll_md_exp, op_data,
1688                         src_name->name, src_name->len,
1689                         tgt_name->name, tgt_name->len, &request);
1690         ll_finish_md_op_data(op_data);
1691         if (!err) {
1692                 ll_update_times(request, src);
1693                 ll_update_times(request, tgt);
1694                 ll_stats_ops_tally(sbi, LPROC_LL_RENAME, 1);
1695         }
1696
1697         ptlrpc_req_finished(request);
1698
1699         if (err == 0)
1700                 d_move(src_dchild, tgt_dchild);
1701
1702         RETURN(err);
1703 }
1704
1705 const struct inode_operations ll_dir_inode_operations = {
1706         .mknod          = ll_mknod,
1707 #ifdef HAVE_IOP_ATOMIC_OPEN
1708         .atomic_open    = ll_atomic_open,
1709 #endif
1710         .lookup         = ll_lookup_nd,
1711         .create         = ll_create_nd,
1712         /* We need all these non-raw things for NFSD, to not patch it. */
1713         .unlink         = ll_unlink,
1714         .mkdir          = ll_mkdir,
1715         .rmdir          = ll_rmdir,
1716         .symlink        = ll_symlink,
1717         .link           = ll_link,
1718         .rename         = ll_rename,
1719         .setattr        = ll_setattr,
1720         .getattr        = ll_getattr,
1721         .permission     = ll_inode_permission,
1722 #ifdef HAVE_IOP_XATTR
1723         .setxattr       = ll_setxattr,
1724         .getxattr       = ll_getxattr,
1725         .removexattr    = ll_removexattr,
1726 #endif
1727         .listxattr      = ll_listxattr,
1728 #ifdef HAVE_IOP_GET_ACL
1729         .get_acl        = ll_get_acl,
1730 #endif
1731 #ifdef HAVE_IOP_SET_ACL
1732         .set_acl        = ll_set_acl,
1733 #endif
1734 };
1735
1736 const struct inode_operations ll_special_inode_operations = {
1737         .setattr        = ll_setattr,
1738         .getattr        = ll_getattr,
1739         .permission     = ll_inode_permission,
1740 #ifdef HAVE_IOP_XATTR
1741         .setxattr       = ll_setxattr,
1742         .getxattr       = ll_getxattr,
1743         .removexattr    = ll_removexattr,
1744 #endif
1745         .listxattr      = ll_listxattr,
1746 #ifdef HAVE_IOP_GET_ACL
1747         .get_acl        = ll_get_acl,
1748 #endif
1749 #ifdef HAVE_IOP_SET_ACL
1750         .set_acl        = ll_set_acl,
1751 #endif
1752 };