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                 /*
 697                  * If file was created on the server, the dentry is revalidated
 698                  * in ll_create_it if the lock allows for it.
 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         __u64 bits = 0;
1178         int rc = 0;
1179         ENTRY;
1180
1181         CDEBUG(D_VFSTRACE, "VFS Op:name=%.*s, dir="DFID"(%p), intent=%s\n",
1182                dentry->d_name.len, dentry->d_name.name,
1183                PFID(ll_inode2fid(dir)), dir, LL_IT2STR(it));
1184
1185         rc = it_open_error(DISP_OPEN_CREATE, it);
1186         if (rc)
1187                 RETURN(rc);
1188
1189         inode = ll_create_node(dir, it);
1190         if (IS_ERR(inode))
1191                 RETURN(PTR_ERR(inode));
1192
1193         if ((ll_i2sbi(inode)->ll_flags & LL_SBI_FILE_SECCTX) &&
1194             secctx != NULL) {
1195                 inode_lock(inode);
1196                 /* must be done before d_instantiate, because it calls
1197                  * security_d_instantiate, which means a getxattr if security
1198                  * context is not set yet */
1199                 rc = security_inode_notifysecctx(inode, secctx, secctxlen);
1200                 inode_unlock(inode);
1201                 if (rc)
1202                         RETURN(rc);
1203         }
1204
1205         d_instantiate(dentry, inode);
1206
1207         if (!(ll_i2sbi(inode)->ll_flags & LL_SBI_FILE_SECCTX)) {
1208                 rc = ll_inode_init_security(dentry, inode, dir);
1209                 if (rc)
1210                         RETURN(rc);
1211         }
1212
1213         ll_set_lock_data(ll_i2sbi(dir)->ll_md_exp, inode, it, &bits);
1214         if (bits & MDS_INODELOCK_LOOKUP)
1215                 d_lustre_revalidate(dentry);
1216
1217         RETURN(0);
1218 }
1219
1220 void ll_update_times(struct ptlrpc_request *request, struct inode *inode)
1221 {
1222         struct mdt_body *body = req_capsule_server_get(&request->rq_pill,
1223                                                        &RMF_MDT_BODY);
1224
1225         LASSERT(body);
1226         if (body->mbo_valid & OBD_MD_FLMTIME &&
1227             body->mbo_mtime > inode->i_mtime.tv_sec) {
1228                 CDEBUG(D_INODE,
1229                        "setting fid " DFID " mtime from %lld to %llu\n",
1230                        PFID(ll_inode2fid(inode)),
1231                        (s64)inode->i_mtime.tv_sec, body->mbo_mtime);
1232                 inode->i_mtime.tv_sec = body->mbo_mtime;
1233         }
1234
1235         if (body->mbo_valid & OBD_MD_FLCTIME &&
1236             body->mbo_ctime > inode->i_ctime.tv_sec)
1237                 inode->i_ctime.tv_sec = body->mbo_ctime;
1238 }
1239
1240 static int ll_new_node(struct inode *dir, struct dentry *dchild,
1241                        const char *tgt, umode_t mode, int rdev, __u32 opc)
1242 {
1243         struct qstr *name = &dchild->d_name;
1244         struct ptlrpc_request *request = NULL;
1245         struct md_op_data *op_data;
1246         struct inode *inode = NULL;
1247         struct ll_sb_info *sbi = ll_i2sbi(dir);
1248         int tgt_len = 0;
1249         int err;
1250
1251         ENTRY;
1252         if (unlikely(tgt != NULL))
1253                 tgt_len = strlen(tgt) + 1;
1254
1255 again:
1256         op_data = ll_prep_md_op_data(NULL, dir, NULL, name->name,
1257                                      name->len, 0, opc, NULL);
1258         if (IS_ERR(op_data))
1259                 GOTO(err_exit, err = PTR_ERR(op_data));
1260
1261         if (sbi->ll_flags & LL_SBI_FILE_SECCTX) {
1262                 err = ll_dentry_init_security(dchild, mode, &dchild->d_name,
1263                                               &op_data->op_file_secctx_name,
1264                                               &op_data->op_file_secctx,
1265                                               &op_data->op_file_secctx_size);
1266                 if (err < 0)
1267                         GOTO(err_exit, err);
1268         }
1269
1270         err = md_create(sbi->ll_md_exp, op_data, tgt, tgt_len, mode,
1271                         from_kuid(&init_user_ns, current_fsuid()),
1272                         from_kgid(&init_user_ns, current_fsgid()),
1273                         cfs_curproc_cap_pack(), rdev, &request);
1274         if (err < 0 && err != -EREMOTE)
1275                 GOTO(err_exit, err);
1276
1277         /* If the client doesn't know where to create a subdirectory (or
1278          * in case of a race that sends the RPC to the wrong MDS), the
1279          * MDS will return -EREMOTE and the client will fetch the layout
1280          * of the directory, then create the directory on the right MDT. */
1281         if (unlikely(err == -EREMOTE)) {
1282                 struct ll_inode_info    *lli = ll_i2info(dir);
1283                 struct lmv_user_md      *lum;
1284                 int                     lumsize;
1285                 int                     err2;
1286
1287                 ptlrpc_req_finished(request);
1288                 request = NULL;
1289
1290                 err2 = ll_dir_getstripe(dir, (void **)&lum, &lumsize, &request,
1291                                         OBD_MD_DEFAULT_MEA);
1292                 if (err2 == 0) {
1293                         /* Update stripe_offset and retry */
1294                         lli->lli_def_stripe_offset = lum->lum_stripe_offset;
1295                 } else if (err2 == -ENODATA &&
1296                            lli->lli_def_stripe_offset != -1) {
1297                         /* If there are no default stripe EA on the MDT, but the
1298                          * client has default stripe, then it probably means
1299                          * default stripe EA has just been deleted. */
1300                         lli->lli_def_stripe_offset = -1;
1301                 } else {
1302                         GOTO(err_exit, err);
1303                 }
1304
1305                 ptlrpc_req_finished(request);
1306                 request = NULL;
1307                 ll_finish_md_op_data(op_data);
1308                 goto again;
1309         }
1310
1311         ll_update_times(request, dir);
1312
1313         CFS_FAIL_TIMEOUT(OBD_FAIL_LLITE_NEWNODE_PAUSE, cfs_fail_val);
1314
1315         err = ll_prep_inode(&inode, request, dchild->d_sb, NULL);
1316         if (err)
1317                 GOTO(err_exit, err);
1318
1319         if (sbi->ll_flags & LL_SBI_FILE_SECCTX) {
1320                 inode_lock(inode);
1321                 /* must be done before d_instantiate, because it calls
1322                  * security_d_instantiate, which means a getxattr if security
1323                  * context is not set yet */
1324                 err = security_inode_notifysecctx(inode,
1325                                                   op_data->op_file_secctx,
1326                                                   op_data->op_file_secctx_size);
1327                 inode_unlock(inode);
1328                 if (err)
1329                         GOTO(err_exit, err);
1330         }
1331
1332         d_instantiate(dchild, inode);
1333
1334         if (!(sbi->ll_flags & LL_SBI_FILE_SECCTX)) {
1335                 err = ll_inode_init_security(dchild, inode, dir);
1336                 if (err)
1337                         GOTO(err_exit, err);
1338         }
1339
1340         EXIT;
1341 err_exit:
1342         if (request != NULL)
1343                 ptlrpc_req_finished(request);
1344
1345         if (!IS_ERR_OR_NULL(op_data))
1346                 ll_finish_md_op_data(op_data);
1347
1348         return err;
1349 }
1350
1351 static int ll_mknod(struct inode *dir, struct dentry *dchild, ll_umode_t mode,
1352                     dev_t rdev)
1353 {
1354         struct qstr *name = &dchild->d_name;
1355         int err;
1356         ENTRY;
1357
1358         CDEBUG(D_VFSTRACE, "VFS Op:name=%.*s, dir="DFID"(%p) mode %o dev %x\n",
1359                name->len, name->name, PFID(ll_inode2fid(dir)), dir,
1360                mode, rdev);
1361
1362         if (!IS_POSIXACL(dir) || !exp_connect_umask(ll_i2mdexp(dir)))
1363                 mode &= ~current_umask();
1364
1365         switch (mode & S_IFMT) {
1366         case 0:
1367                 mode |= S_IFREG; /* for mode = 0 case, fallthrough */
1368         case S_IFREG:
1369         case S_IFCHR:
1370         case S_IFBLK:
1371         case S_IFIFO:
1372         case S_IFSOCK:
1373                 err = ll_new_node(dir, dchild, NULL, mode, old_encode_dev(rdev),
1374                                   LUSTRE_OPC_MKNOD);
1375                 break;
1376         case S_IFDIR:
1377                 err = -EPERM;
1378                 break;
1379         default:
1380                 err = -EINVAL;
1381         }
1382
1383         if (!err)
1384                 ll_stats_ops_tally(ll_i2sbi(dir), LPROC_LL_MKNOD, 1);
1385
1386         RETURN(err);
1387 }
1388
1389 #ifdef HAVE_IOP_ATOMIC_OPEN
1390 /*
1391  * Plain create. Intent create is handled in atomic_open.
1392  */
1393 static int ll_create_nd(struct inode *dir, struct dentry *dentry,
1394                         umode_t mode, bool want_excl)
1395 {
1396         int rc;
1397
1398         CFS_FAIL_TIMEOUT(OBD_FAIL_LLITE_CREATE_FILE_PAUSE, cfs_fail_val);
1399
1400         CDEBUG(D_VFSTRACE, "VFS Op:name=%.*s, dir="DFID"(%p), "
1401                            "flags=%u, excl=%d\n", dentry->d_name.len,
1402                dentry->d_name.name, PFID(ll_inode2fid(dir)),
1403                dir, mode, want_excl);
1404
1405         /* Using mknod(2) to create a regular file is designed to not recognize
1406          * volatile file name, so we use ll_mknod() here. */
1407         rc = ll_mknod(dir, dentry, mode, 0);
1408
1409         ll_stats_ops_tally(ll_i2sbi(dir), LPROC_LL_CREATE, 1);
1410
1411         CDEBUG(D_VFSTRACE, "VFS Op:name=%.*s, unhashed %d\n",
1412                dentry->d_name.len, dentry->d_name.name, d_unhashed(dentry));
1413
1414         return rc;
1415 }
1416 #else /* !HAVE_IOP_ATOMIC_OPEN */
1417 static int ll_create_nd(struct inode *dir, struct dentry *dentry,
1418                         ll_umode_t mode, struct nameidata *nd)
1419 {
1420         struct ll_dentry_data *lld = ll_d2d(dentry);
1421         struct lookup_intent *it = NULL;
1422         int rc;
1423
1424         CFS_FAIL_TIMEOUT(OBD_FAIL_LLITE_CREATE_FILE_PAUSE, cfs_fail_val);
1425
1426         if (lld != NULL)
1427                 it = lld->lld_it;
1428
1429         if (!it) {
1430                 /* LU-8559: use LUSTRE_OPC_CREATE for non atomic open case
1431                  * so that volatile file name is recoginized.
1432                  * Mknod(2), however, is designed to not recognize volatile
1433                  * file name to avoid inode leak under orphan directory until
1434                  * MDT reboot */
1435                 return ll_new_node(dir, dentry, NULL, mode, 0,
1436                                    LUSTRE_OPC_CREATE);
1437         }
1438
1439         lld->lld_it = NULL;
1440
1441         /* Was there an error? Propagate it! */
1442         if (it->it_status) {
1443                 rc = it->it_status;
1444                 goto out;
1445         }
1446
1447         rc = ll_create_it(dir, dentry, it, NULL, 0);
1448         if (nd && (nd->flags & LOOKUP_OPEN) && dentry->d_inode) { /* Open */
1449                 struct file *filp;
1450
1451                 nd->intent.open.file->private_data = it;
1452                 filp = lookup_instantiate_filp(nd, dentry, NULL);
1453                 if (IS_ERR(filp))
1454                         rc = PTR_ERR(filp);
1455         }
1456
1457 out:
1458         ll_intent_release(it);
1459         OBD_FREE(it, sizeof(*it));
1460
1461         if (!rc)
1462                 ll_stats_ops_tally(ll_i2sbi(dir), LPROC_LL_CREATE, 1);
1463
1464         return rc;
1465 }
1466 #endif /* HAVE_IOP_ATOMIC_OPEN */
1467
1468 static int ll_symlink(struct inode *dir, struct dentry *dchild,
1469                       const char *oldpath)
1470 {
1471         struct qstr *name = &dchild->d_name;
1472         int err;
1473         ENTRY;
1474
1475         CDEBUG(D_VFSTRACE, "VFS Op:name=%.*s, dir="DFID"(%p), target=%.*s\n",
1476                name->len, name->name, PFID(ll_inode2fid(dir)),
1477                dir, 3000, oldpath);
1478
1479         err = ll_new_node(dir, dchild, oldpath, S_IFLNK | S_IRWXUGO, 0,
1480                           LUSTRE_OPC_SYMLINK);
1481
1482         if (!err)
1483                 ll_stats_ops_tally(ll_i2sbi(dir), LPROC_LL_SYMLINK, 1);
1484
1485         RETURN(err);
1486 }
1487
1488 static int ll_link(struct dentry *old_dentry, struct inode *dir,
1489                    struct dentry *new_dentry)
1490 {
1491         struct inode *src = old_dentry->d_inode;
1492         struct qstr *name = &new_dentry->d_name;
1493         struct ll_sb_info *sbi = ll_i2sbi(dir);
1494         struct ptlrpc_request *request = NULL;
1495         struct md_op_data *op_data;
1496         int err;
1497
1498         ENTRY;
1499         CDEBUG(D_VFSTRACE, "VFS Op: inode="DFID"(%p), dir="DFID"(%p), "
1500                "target=%.*s\n", PFID(ll_inode2fid(src)), src,
1501                PFID(ll_inode2fid(dir)), dir, name->len, name->name);
1502
1503         op_data = ll_prep_md_op_data(NULL, src, dir, name->name, name->len,
1504                                      0, LUSTRE_OPC_ANY, NULL);
1505         if (IS_ERR(op_data))
1506                 RETURN(PTR_ERR(op_data));
1507
1508         err = md_link(sbi->ll_md_exp, op_data, &request);
1509         ll_finish_md_op_data(op_data);
1510         if (err)
1511                 GOTO(out, err);
1512
1513         ll_update_times(request, dir);
1514         ll_stats_ops_tally(sbi, LPROC_LL_LINK, 1);
1515         EXIT;
1516 out:
1517         ptlrpc_req_finished(request);
1518         RETURN(err);
1519 }
1520
1521 static int ll_mkdir(struct inode *dir, struct dentry *dchild, ll_umode_t mode)
1522 {
1523         struct qstr *name = &dchild->d_name;
1524         int err;
1525         ENTRY;
1526
1527         CDEBUG(D_VFSTRACE, "VFS Op:name=%.*s, dir="DFID"(%p)\n",
1528                name->len, name->name, PFID(ll_inode2fid(dir)), dir);
1529
1530         if (!IS_POSIXACL(dir) || !exp_connect_umask(ll_i2mdexp(dir)))
1531                 mode &= ~current_umask();
1532
1533         mode = (mode & (S_IRWXUGO|S_ISVTX)) | S_IFDIR;
1534
1535         err = ll_new_node(dir, dchild, NULL, mode, 0, LUSTRE_OPC_MKDIR);
1536         if (err == 0)
1537                 ll_stats_ops_tally(ll_i2sbi(dir), LPROC_LL_MKDIR, 1);
1538
1539         RETURN(err);
1540 }
1541
1542 static int ll_rmdir(struct inode *dir, struct dentry *dchild)
1543 {
1544         struct qstr *name = &dchild->d_name;
1545         struct ptlrpc_request *request = NULL;
1546         struct md_op_data *op_data;
1547         int rc;
1548         ENTRY;
1549
1550         CDEBUG(D_VFSTRACE, "VFS Op:name=%.*s, dir="DFID"(%p)\n",
1551                name->len, name->name, PFID(ll_inode2fid(dir)), dir);
1552
1553         if (unlikely(d_mountpoint(dchild)))
1554                 RETURN(-EBUSY);
1555
1556         op_data = ll_prep_md_op_data(NULL, dir, NULL, name->name, name->len,
1557                                      S_IFDIR, LUSTRE_OPC_ANY, NULL);
1558         if (IS_ERR(op_data))
1559                 RETURN(PTR_ERR(op_data));
1560
1561         if (dchild->d_inode != NULL)
1562                 op_data->op_fid3 = *ll_inode2fid(dchild->d_inode);
1563
1564         op_data->op_fid2 = op_data->op_fid3;
1565         rc = md_unlink(ll_i2sbi(dir)->ll_md_exp, op_data, &request);
1566         ll_finish_md_op_data(op_data);
1567         if (rc == 0) {
1568                 ll_update_times(request, dir);
1569                 ll_stats_ops_tally(ll_i2sbi(dir), LPROC_LL_RMDIR, 1);
1570         }
1571
1572         ptlrpc_req_finished(request);
1573         RETURN(rc);
1574 }
1575
1576 /**
1577  * Remove dir entry
1578  **/
1579 int ll_rmdir_entry(struct inode *dir, char *name, int namelen)
1580 {
1581         struct ptlrpc_request *request = NULL;
1582         struct md_op_data *op_data;
1583         int rc;
1584         ENTRY;
1585
1586         CDEBUG(D_VFSTRACE, "VFS Op:name=%.*s, dir="DFID"(%p)\n",
1587                namelen, name, PFID(ll_inode2fid(dir)), dir);
1588
1589         op_data = ll_prep_md_op_data(NULL, dir, NULL, name, strlen(name),
1590                                      S_IFDIR, LUSTRE_OPC_ANY, NULL);
1591         if (IS_ERR(op_data))
1592                 RETURN(PTR_ERR(op_data));
1593         op_data->op_cli_flags |= CLI_RM_ENTRY;
1594         rc = md_unlink(ll_i2sbi(dir)->ll_md_exp, op_data, &request);
1595         ll_finish_md_op_data(op_data);
1596         if (rc == 0) {
1597                 ll_update_times(request, dir);
1598                 ll_stats_ops_tally(ll_i2sbi(dir), LPROC_LL_RMDIR, 1);
1599         }
1600
1601         ptlrpc_req_finished(request);
1602         RETURN(rc);
1603 }
1604
1605 static int ll_unlink(struct inode *dir, struct dentry *dchild)
1606 {
1607         struct qstr *name = &dchild->d_name;
1608         struct ptlrpc_request *request = NULL;
1609         struct md_op_data *op_data;
1610         struct mdt_body *body;
1611         int rc;
1612         ENTRY;
1613         CDEBUG(D_VFSTRACE, "VFS Op:name=%.*s, dir="DFID"(%p)\n",
1614                name->len, name->name, PFID(ll_inode2fid(dir)), dir);
1615
1616         /*
1617          * XXX: unlink bind mountpoint maybe call to here,
1618          * just check it as vfs_unlink does.
1619          */
1620         if (unlikely(d_mountpoint(dchild)))
1621                 RETURN(-EBUSY);
1622
1623         op_data = ll_prep_md_op_data(NULL, dir, NULL, name->name, name->len, 0,
1624                                      LUSTRE_OPC_ANY, NULL);
1625         if (IS_ERR(op_data))
1626                 RETURN(PTR_ERR(op_data));
1627
1628         op_data->op_fid3 = *ll_inode2fid(dchild->d_inode);
1629
1630         op_data->op_fid2 = op_data->op_fid3;
1631         rc = md_unlink(ll_i2sbi(dir)->ll_md_exp, op_data, &request);
1632         ll_finish_md_op_data(op_data);
1633         if (rc)
1634                 GOTO(out, rc);
1635
1636         /*
1637          * The server puts attributes in on the last unlink, use them to update
1638          * the link count so the inode can be freed immediately.
1639          */
1640         body = req_capsule_server_get(&request->rq_pill, &RMF_MDT_BODY);
1641         if (body->mbo_valid & OBD_MD_FLNLINK)
1642                 set_nlink(dchild->d_inode, body->mbo_nlink);
1643
1644         ll_update_times(request, dir);
1645         ll_stats_ops_tally(ll_i2sbi(dir), LPROC_LL_UNLINK, 1);
1646
1647 out:
1648         ptlrpc_req_finished(request);
1649         RETURN(rc);
1650 }
1651
1652 static int ll_rename(struct inode *src, struct dentry *src_dchild,
1653                      struct inode *tgt, struct dentry *tgt_dchild
1654 #ifdef HAVE_IOPS_RENAME_WITH_FLAGS
1655                      , unsigned int flags
1656 #endif
1657                      )
1658 {
1659         struct qstr *src_name = &src_dchild->d_name;
1660         struct qstr *tgt_name = &tgt_dchild->d_name;
1661         struct ptlrpc_request *request = NULL;
1662         struct ll_sb_info *sbi = ll_i2sbi(src);
1663         struct md_op_data *op_data;
1664         int err;
1665         ENTRY;
1666
1667 #ifdef HAVE_IOPS_RENAME_WITH_FLAGS
1668         if (flags)
1669                 return -EINVAL;
1670 #endif
1671
1672         CDEBUG(D_VFSTRACE, "VFS Op:oldname=%.*s, src_dir="DFID
1673                "(%p), newname=%.*s, tgt_dir="DFID"(%p)\n",
1674                src_name->len, src_name->name,
1675                PFID(ll_inode2fid(src)), src, tgt_name->len,
1676                tgt_name->name, PFID(ll_inode2fid(tgt)), tgt);
1677
1678         if (unlikely(d_mountpoint(src_dchild) || d_mountpoint(tgt_dchild)))
1679                 RETURN(-EBUSY);
1680
1681         op_data = ll_prep_md_op_data(NULL, src, tgt, NULL, 0, 0,
1682                                      LUSTRE_OPC_ANY, NULL);
1683         if (IS_ERR(op_data))
1684                 RETURN(PTR_ERR(op_data));
1685
1686         if (src_dchild->d_inode != NULL)
1687                 op_data->op_fid3 = *ll_inode2fid(src_dchild->d_inode);
1688
1689         if (tgt_dchild->d_inode != NULL)
1690                 op_data->op_fid4 = *ll_inode2fid(tgt_dchild->d_inode);
1691
1692         err = md_rename(sbi->ll_md_exp, op_data,
1693                         src_name->name, src_name->len,
1694                         tgt_name->name, tgt_name->len, &request);
1695         ll_finish_md_op_data(op_data);
1696         if (!err) {
1697                 ll_update_times(request, src);
1698                 ll_update_times(request, tgt);
1699                 ll_stats_ops_tally(sbi, LPROC_LL_RENAME, 1);
1700         }
1701
1702         ptlrpc_req_finished(request);
1703
1704         if (err == 0)
1705                 d_move(src_dchild, tgt_dchild);
1706
1707         RETURN(err);
1708 }
1709
1710 const struct inode_operations ll_dir_inode_operations = {
1711         .mknod          = ll_mknod,
1712 #ifdef HAVE_IOP_ATOMIC_OPEN
1713         .atomic_open    = ll_atomic_open,
1714 #endif
1715         .lookup         = ll_lookup_nd,
1716         .create         = ll_create_nd,
1717         /* We need all these non-raw things for NFSD, to not patch it. */
1718         .unlink         = ll_unlink,
1719         .mkdir          = ll_mkdir,
1720         .rmdir          = ll_rmdir,
1721         .symlink        = ll_symlink,
1722         .link           = ll_link,
1723         .rename         = ll_rename,
1724         .setattr        = ll_setattr,
1725         .getattr        = ll_getattr,
1726         .permission     = ll_inode_permission,
1727 #ifdef HAVE_IOP_XATTR
1728         .setxattr       = ll_setxattr,
1729         .getxattr       = ll_getxattr,
1730         .removexattr    = ll_removexattr,
1731 #endif
1732         .listxattr      = ll_listxattr,
1733 #ifdef HAVE_IOP_GET_ACL
1734         .get_acl        = ll_get_acl,
1735 #endif
1736 #ifdef HAVE_IOP_SET_ACL
1737         .set_acl        = ll_set_acl,
1738 #endif
1739 };
1740
1741 const struct inode_operations ll_special_inode_operations = {
1742         .setattr        = ll_setattr,
1743         .getattr        = ll_getattr,
1744         .permission     = ll_inode_permission,
1745 #ifdef HAVE_IOP_XATTR
1746         .setxattr       = ll_setxattr,
1747         .getxattr       = ll_getxattr,
1748         .removexattr    = ll_removexattr,
1749 #endif
1750         .listxattr      = ll_listxattr,
1751 #ifdef HAVE_IOP_GET_ACL
1752         .get_acl        = ll_get_acl,
1753 #endif
1754 #ifdef HAVE_IOP_SET_ACL
1755         .set_acl        = ll_set_acl,
1756 #endif
1757 };