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