Whamcloud - gitweb
32095e0eb43039880acfac3d775e6cf7218ddc72
[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.sun.com/software/products/lustre/docs/GPLv2.pdf
19  *
20  * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
21  * CA 95054 USA or visit www.sun.com if you need additional information or
22  * have any questions.
23  *
24  * GPL HEADER END
25  */
26 /*
27  * Copyright (c) 2002, 2010, Oracle and/or its affiliates. All rights reserved.
28  * Use is subject to license terms.
29  *
30  * Copyright (c) 2011, 2012, Whamcloud, Inc.
31  */
32 /*
33  * This file is part of Lustre, http://www.lustre.org/
34  * Lustre is a trademark of Sun Microsystems, Inc.
35  */
36
37 #include <linux/fs.h>
38 #include <linux/sched.h>
39 #include <linux/mm.h>
40 #include <linux/quotaops.h>
41 #include <linux/highmem.h>
42 #include <linux/pagemap.h>
43 #include <linux/security.h>
44
45 #define DEBUG_SUBSYSTEM S_LLITE
46
47 #include <obd_support.h>
48 #include <lustre_fid.h>
49 #include <lustre_lite.h>
50 #include <lustre_dlm.h>
51 #include <lustre_ver.h>
52 #include "llite_internal.h"
53
54 /*
55  * Check if we have something mounted at the named dchild.
56  * In such a case there would always be dentry present.
57  */
58 static int ll_d_mountpoint(struct dentry *dparent, struct dentry *dchild,
59                            struct qstr *name)
60 {
61         int mounted = 0;
62
63         if (unlikely(dchild)) {
64                 mounted = d_mountpoint(dchild);
65         } else if (dparent) {
66                 dchild = d_lookup(dparent, name);
67                 if (dchild) {
68                         mounted = d_mountpoint(dchild);
69                         dput(dchild);
70                 }
71         }
72         return mounted;
73 }
74
75 int ll_unlock(__u32 mode, struct lustre_handle *lockh)
76 {
77         ENTRY;
78
79         ldlm_lock_decref(lockh, mode);
80
81         RETURN(0);
82 }
83
84
85 /* called from iget5_locked->find_inode() under inode_lock spinlock */
86 static int ll_test_inode(struct inode *inode, void *opaque)
87 {
88         struct ll_inode_info *lli = ll_i2info(inode);
89         struct lustre_md     *md = opaque;
90
91         if (unlikely(!(md->body->valid & OBD_MD_FLID))) {
92                 CERROR("MDS body missing FID\n");
93                 return 0;
94         }
95
96         if (!lu_fid_eq(&lli->lli_fid, &md->body->fid1))
97                 return 0;
98
99         return 1;
100 }
101
102 static int ll_set_inode(struct inode *inode, void *opaque)
103 {
104         struct ll_inode_info *lli = ll_i2info(inode);
105         struct mdt_body *body = ((struct lustre_md *)opaque)->body;
106
107         if (unlikely(!(body->valid & OBD_MD_FLID))) {
108                 CERROR("MDS body missing FID\n");
109                 return -EINVAL;
110         }
111
112         lli->lli_fid = body->fid1;
113         if (unlikely(!(body->valid & OBD_MD_FLTYPE))) {
114                 CERROR("Can not initialize inode "DFID" without object type: "
115                        "valid = "LPX64"\n", PFID(&lli->lli_fid), body->valid);
116                 return -EINVAL;
117         }
118
119         inode->i_mode = (inode->i_mode & ~S_IFMT) | (body->mode & S_IFMT);
120         if (unlikely(inode->i_mode == 0)) {
121                 CERROR("Invalid inode "DFID" type\n", PFID(&lli->lli_fid));
122                 return -EINVAL;
123         }
124
125         ll_lli_init(lli);
126
127         return 0;
128 }
129
130
131 /*
132  * Get an inode by inode number (already instantiated by the intent lookup).
133  * Returns inode or NULL
134  */
135 struct inode *ll_iget(struct super_block *sb, ino_t hash,
136                       struct lustre_md *md)
137 {
138         struct inode         *inode;
139         ENTRY;
140
141         LASSERT(hash != 0);
142         inode = iget5_locked(sb, hash, ll_test_inode, ll_set_inode, md);
143
144         if (inode) {
145                 if (inode->i_state & I_NEW) {
146                         int rc = 0;
147
148                         ll_read_inode2(inode, md);
149                         if (S_ISREG(inode->i_mode) &&
150                             ll_i2info(inode)->lli_clob == NULL)
151                                 rc = cl_file_inode_init(inode, md);
152                         if (rc != 0) {
153                                 md->lsm = NULL;
154                                 make_bad_inode(inode);
155                                 unlock_new_inode(inode);
156                                 iput(inode);
157                                 inode = ERR_PTR(rc);
158                         } else
159                                 unlock_new_inode(inode);
160                 } else if (!(inode->i_state & (I_FREEING | I_CLEAR)))
161                         ll_update_inode(inode, md);
162                 CDEBUG(D_VFSTRACE, "got inode: %p for "DFID"\n",
163                        inode, PFID(&md->body->fid1));
164         }
165         RETURN(inode);
166 }
167
168 static void ll_invalidate_negative_children(struct inode *dir)
169 {
170         struct dentry *dentry, *tmp_subdir;
171
172         ll_lock_dcache(dir);
173         list_for_each_entry(dentry, &dir->i_dentry, d_alias) {
174                 spin_lock(&dentry->d_lock);
175                 if (!list_empty(&dentry->d_subdirs)) {
176                         struct dentry *child;
177
178                         list_for_each_entry_safe(child, tmp_subdir,
179                                                  &dentry->d_subdirs,
180                                                  d_u.d_child) {
181                                 if (child->d_inode == NULL)
182                                         d_lustre_invalidate(child);
183                         }
184                 }
185                 spin_unlock(&dentry->d_lock);
186         }
187         ll_unlock_dcache(dir);
188 }
189
190 int ll_md_blocking_ast(struct ldlm_lock *lock, struct ldlm_lock_desc *desc,
191                        void *data, int flag)
192 {
193         int rc;
194         struct lustre_handle lockh;
195         ENTRY;
196
197         switch (flag) {
198         case LDLM_CB_BLOCKING:
199                 ldlm_lock2handle(lock, &lockh);
200                 rc = ldlm_cli_cancel(&lockh);
201                 if (rc < 0) {
202                         CDEBUG(D_INODE, "ldlm_cli_cancel: %d\n", rc);
203                         RETURN(rc);
204                 }
205                 break;
206         case LDLM_CB_CANCELING: {
207                 struct inode *inode = ll_inode_from_lock(lock);
208                 struct ll_inode_info *lli;
209                 __u64 bits = lock->l_policy_data.l_inodebits.bits;
210                 struct lu_fid *fid;
211                 ldlm_mode_t mode = lock->l_req_mode;
212
213                 /* Invalidate all dentries associated with this inode */
214                 if (inode == NULL)
215                         break;
216
217                 LASSERT(lock->l_flags & LDLM_FL_CANCELING);
218                 /* For OPEN locks we differentiate between lock modes
219                  * LCK_CR, LCK_CW, LCK_PR - bug 22891 */
220                 if (bits & (MDS_INODELOCK_LOOKUP | MDS_INODELOCK_UPDATE |
221                             MDS_INODELOCK_LAYOUT))
222                         ll_have_md_lock(inode, &bits, LCK_MINMODE);
223
224                 if (bits & MDS_INODELOCK_OPEN)
225                         ll_have_md_lock(inode, &bits, mode);
226
227                 fid = ll_inode2fid(inode);
228                 if (lock->l_resource->lr_name.name[0] != fid_seq(fid) ||
229                     lock->l_resource->lr_name.name[1] != fid_oid(fid) ||
230                     lock->l_resource->lr_name.name[2] != fid_ver(fid)) {
231                         LDLM_ERROR(lock, "data mismatch with object "
232                                    DFID" (%p)", PFID(fid), inode);
233                 }
234
235                 if (bits & MDS_INODELOCK_OPEN) {
236                         int flags = 0;
237                         switch (lock->l_req_mode) {
238                         case LCK_CW:
239                                 flags = FMODE_WRITE;
240                                 break;
241                         case LCK_PR:
242                                 flags = FMODE_EXEC;
243                                 break;
244                         case LCK_CR:
245                                 flags = FMODE_READ;
246                                 break;
247                         default:
248                                 CERROR("Unexpected lock mode for OPEN lock "
249                                        "%d, inode %ld\n", lock->l_req_mode,
250                                        inode->i_ino);
251                         }
252                         ll_md_real_close(inode, flags);
253                 }
254
255                 lli = ll_i2info(inode);
256                 if (bits & MDS_INODELOCK_LAYOUT) {
257                         struct cl_object_conf conf = { .coc_inode = inode,
258                                                        .coc_invalidate = true };
259                         rc = ll_layout_conf(inode, &conf);
260                         if (rc)
261                                 CDEBUG(D_INODE, "invaliding layout %d.\n", rc);
262                 }
263
264                 if (bits & MDS_INODELOCK_UPDATE)
265                         lli->lli_flags &= ~LLIF_MDS_SIZE_LOCK;
266
267                 if (S_ISDIR(inode->i_mode) &&
268                      (bits & MDS_INODELOCK_UPDATE)) {
269                         CDEBUG(D_INODE, "invalidating inode %lu\n",
270                                inode->i_ino);
271                         truncate_inode_pages(inode->i_mapping, 0);
272                         ll_invalidate_negative_children(inode);
273                 }
274
275                 if (inode->i_sb->s_root &&
276                     inode != inode->i_sb->s_root->d_inode &&
277                     (bits & MDS_INODELOCK_LOOKUP))
278                         ll_invalidate_aliases(inode);
279                 iput(inode);
280                 break;
281         }
282         default:
283                 LBUG();
284         }
285
286         RETURN(0);
287 }
288
289 __u32 ll_i2suppgid(struct inode *i)
290 {
291         if (cfs_curproc_is_in_groups(i->i_gid))
292                 return (__u32)i->i_gid;
293         else
294                 return (__u32)(-1);
295 }
296
297 /* Pack the required supplementary groups into the supplied groups array.
298  * If we don't need to use the groups from the target inode(s) then we
299  * instead pack one or more groups from the user's supplementary group
300  * array in case it might be useful.  Not needed if doing an MDS-side upcall. */
301 void ll_i2gids(__u32 *suppgids, struct inode *i1, struct inode *i2)
302 {
303 #if 0
304         int i;
305 #endif
306
307         LASSERT(i1 != NULL);
308         LASSERT(suppgids != NULL);
309
310         suppgids[0] = ll_i2suppgid(i1);
311
312         if (i2)
313                 suppgids[1] = ll_i2suppgid(i2);
314                 else
315                         suppgids[1] = -1;
316
317 #if 0
318         for (i = 0; i < current_ngroups; i++) {
319                 if (suppgids[0] == -1) {
320                         if (current_groups[i] != suppgids[1])
321                                 suppgids[0] = current_groups[i];
322                         continue;
323                 }
324                 if (suppgids[1] == -1) {
325                         if (current_groups[i] != suppgids[0])
326                                 suppgids[1] = current_groups[i];
327                         continue;
328                 }
329                 break;
330         }
331 #endif
332 }
333
334 /*
335  * try to reuse three types of dentry:
336  * 1. unhashed alias, this one is unhashed by d_invalidate (but it may be valid
337  *    by concurrent .revalidate).
338  * 2. INVALID alias (common case for no valid ldlm lock held, but this flag may
339  *    be cleared by others calling d_lustre_revalidate).
340  * 3. DISCONNECTED alias.
341  */
342 static struct dentry *ll_find_alias(struct inode *inode, struct dentry *dentry)
343 {
344         struct dentry *alias, *discon_alias, *invalid_alias;
345
346         if (list_empty(&inode->i_dentry))
347                 return NULL;
348
349         discon_alias = invalid_alias = NULL;
350
351         ll_lock_dcache(inode);
352         list_for_each_entry(alias, &inode->i_dentry, d_alias) {
353                 LASSERT(alias != dentry);
354
355                 spin_lock(&alias->d_lock);
356                 if (alias->d_flags & DCACHE_DISCONNECTED)
357                         /* LASSERT(last_discon == NULL); LU-405, bz 20055 */
358                         discon_alias = alias;
359                 else if (alias->d_parent == dentry->d_parent             &&
360                          alias->d_name.hash == dentry->d_name.hash       &&
361                          alias->d_name.len == dentry->d_name.len         &&
362                          memcmp(alias->d_name.name, dentry->d_name.name,
363                                 dentry->d_name.len) == 0)
364                         invalid_alias = alias;
365                 spin_unlock(&alias->d_lock);
366
367                 if (invalid_alias)
368                         break;
369         }
370         alias = invalid_alias ?: discon_alias ?: NULL;
371         if (alias) {
372                 spin_lock(&alias->d_lock);
373                 dget_dlock(alias);
374                 spin_unlock(&alias->d_lock);
375         }
376         ll_unlock_dcache(inode);
377
378         return alias;
379 }
380
381 /*
382  * Similar to d_splice_alias(), but lustre treats invalid alias
383  * similar to DCACHE_DISCONNECTED, and tries to use it anyway.
384  */
385 struct dentry *ll_splice_alias(struct inode *inode, struct dentry *de)
386 {
387         struct dentry *new;
388
389         if (inode) {
390                 new = ll_find_alias(inode, de);
391                 if (new) {
392                         ll_dops_init(new, 1, 1);
393                         d_move(new, de);
394                         iput(inode);
395                         CDEBUG(D_DENTRY,
396                                "Reuse dentry %p inode %p refc %d flags %#x\n",
397                               new, new->d_inode, d_refcount(new), new->d_flags);
398                         return new;
399                 }
400         }
401         ll_dops_init(de, 1, 1);
402         __d_lustre_invalidate(de);
403         d_add(de, inode);
404         CDEBUG(D_DENTRY, "Add dentry %p inode %p refc %d flags %#x\n",
405                de, de->d_inode, d_refcount(de), de->d_flags);
406         return de;
407 }
408
409 int ll_lookup_it_finish(struct ptlrpc_request *request,
410                         struct lookup_intent *it, void *data)
411 {
412         struct it_cb_data *icbd = data;
413         struct dentry **de = icbd->icbd_childp;
414         struct inode *parent = icbd->icbd_parent;
415         struct inode *inode = NULL;
416         __u64 bits = 0;
417         int rc;
418         ENTRY;
419
420         /* NB 1 request reference will be taken away by ll_intent_lock()
421          * when I return */
422         if (!it_disposition(it, DISP_LOOKUP_NEG)) {
423                 rc = ll_prep_inode(&inode, request, (*de)->d_sb);
424                 if (rc)
425                         RETURN(rc);
426
427                 ll_set_lock_data(ll_i2sbi(parent)->ll_md_exp, inode, it, &bits);
428
429                 /* We used to query real size from OSTs here, but actually
430                    this is not needed. For stat() calls size would be updated
431                    from subsequent do_revalidate()->ll_inode_revalidate_it() in
432                    2.4 and
433                    vfs_getattr_it->ll_getattr()->ll_inode_revalidate_it() in 2.6
434                    Everybody else who needs correct file size would call
435                    ll_glimpse_size or some equivalent themselves anyway.
436                    Also see bug 7198. */
437         }
438
439         *de = ll_splice_alias(inode, *de);
440
441         if (!it_disposition(it, DISP_LOOKUP_NEG)) {
442                 /* we have lookup look - unhide dentry */
443                 if (bits & MDS_INODELOCK_LOOKUP)
444                         d_lustre_revalidate(*de);
445         } else {
446                 /* Check that parent has UPDATE lock. */
447                 struct lookup_intent parent_it = {
448                                         .it_op = IT_GETATTR,
449                                         .d.lustre.it_lock_handle = 0 };
450
451                 if (md_revalidate_lock(ll_i2mdexp(parent), &parent_it,
452                                        &ll_i2info(parent)->lli_fid, NULL)) {
453                         d_lustre_revalidate(*de);
454                         ll_intent_release(&parent_it);
455                 }
456         }
457
458         RETURN(0);
459 }
460
461 static struct dentry *ll_lookup_it(struct inode *parent, struct dentry *dentry,
462                                    struct lookup_intent *it, int lookup_flags)
463 {
464         struct lookup_intent lookup_it = { .it_op = IT_LOOKUP };
465         struct dentry *save = dentry, *retval;
466         struct ptlrpc_request *req = NULL;
467         struct md_op_data *op_data;
468         struct it_cb_data icbd;
469         __u32 opc;
470         int rc;
471         ENTRY;
472
473         if (dentry->d_name.len > ll_i2sbi(parent)->ll_namelen)
474                 RETURN(ERR_PTR(-ENAMETOOLONG));
475
476         CDEBUG(D_VFSTRACE, "VFS Op:name=%.*s,dir=%lu/%u(%p),intent=%s\n",
477                dentry->d_name.len, dentry->d_name.name, parent->i_ino,
478                parent->i_generation, parent, LL_IT2STR(it));
479
480         if (d_mountpoint(dentry))
481                 CERROR("Tell Peter, lookup on mtpt, it %s\n", LL_IT2STR(it));
482
483         ll_frob_intent(&it, &lookup_it);
484
485         /* As do_lookup is called before follow_mount, root dentry may be left
486          * not valid, revalidate it here. */
487         if (parent->i_sb->s_root && (parent->i_sb->s_root->d_inode == parent) &&
488             (it->it_op & (IT_OPEN | IT_CREAT))) {
489                 rc = ll_inode_revalidate_it(parent->i_sb->s_root, it,
490                                             MDS_INODELOCK_LOOKUP);
491                 if (rc)
492                         RETURN(ERR_PTR(rc));
493         }
494
495         if (it->it_op == IT_GETATTR) {
496                 rc = ll_statahead_enter(parent, &dentry, 0);
497                 if (rc == 1) {
498                         if (dentry == save)
499                                 GOTO(out, retval = NULL);
500                         GOTO(out, retval = dentry);
501                 }
502         }
503
504         icbd.icbd_childp = &dentry;
505         icbd.icbd_parent = parent;
506
507         if (it->it_op & IT_CREAT ||
508             (it->it_op & IT_OPEN && it->it_create_mode & O_CREAT))
509                 opc = LUSTRE_OPC_CREATE;
510         else
511                 opc = LUSTRE_OPC_ANY;
512
513         op_data = ll_prep_md_op_data(NULL, parent, NULL, dentry->d_name.name,
514                                      dentry->d_name.len, lookup_flags, opc,
515                                      NULL);
516         if (IS_ERR(op_data))
517                 RETURN((void *)op_data);
518
519         /* enforce umask if acl disabled or MDS doesn't support umask */
520         if (!IS_POSIXACL(parent) || !exp_connect_umask(ll_i2mdexp(parent)))
521                 it->it_create_mode &= ~cfs_curproc_umask();
522
523         rc = md_intent_lock(ll_i2mdexp(parent), op_data, NULL, 0, it,
524                             lookup_flags, &req, ll_md_blocking_ast, 0);
525         ll_finish_md_op_data(op_data);
526         if (rc < 0)
527                 GOTO(out, retval = ERR_PTR(rc));
528
529         rc = ll_lookup_it_finish(req, it, &icbd);
530         if (rc != 0) {
531                 ll_intent_release(it);
532                 GOTO(out, retval = ERR_PTR(rc));
533         }
534
535         if ((it->it_op & IT_OPEN) && dentry->d_inode &&
536             !S_ISREG(dentry->d_inode->i_mode) &&
537             !S_ISDIR(dentry->d_inode->i_mode)) {
538                 ll_release_openhandle(dentry, it);
539         }
540         ll_lookup_finish_locks(it, dentry);
541
542         if (dentry == save)
543                 GOTO(out, retval = NULL);
544         else
545                 GOTO(out, retval = dentry);
546  out:
547         if (req)
548                 ptlrpc_req_finished(req);
549         if (it->it_op == IT_GETATTR && (retval == NULL || retval == dentry))
550                 ll_statahead_mark(parent, dentry);
551         return retval;
552 }
553
554 struct lookup_intent *ll_convert_intent(struct open_intent *oit,
555                                         int lookup_flags)
556 {
557         struct lookup_intent *it;
558
559         OBD_ALLOC(it, sizeof(*it));
560         if (!it)
561                 return ERR_PTR(-ENOMEM);
562
563         if (lookup_flags & LOOKUP_OPEN) {
564                 it->it_op = IT_OPEN;
565                 if (lookup_flags & LOOKUP_CREATE)
566                         it->it_op |= IT_CREAT;
567                 it->it_create_mode = (oit->create_mode & S_IALLUGO) | S_IFREG;
568                 it->it_flags = ll_namei_to_lookup_intent_flag(oit->flags);
569         } else {
570                 it->it_op = IT_GETATTR;
571         }
572
573         return it;
574 }
575
576 static struct dentry *ll_lookup_nd(struct inode *parent, struct dentry *dentry,
577                                    struct nameidata *nd)
578 {
579         struct dentry *de;
580         ENTRY;
581
582         if (nd && !(nd->flags & (LOOKUP_CONTINUE|LOOKUP_PARENT))) {
583                 struct lookup_intent *it;
584
585                 if (ll_d2d(dentry) && ll_d2d(dentry)->lld_it) {
586                         it = ll_d2d(dentry)->lld_it;
587                         ll_d2d(dentry)->lld_it = NULL;
588                 } else {
589                         if ((nd->flags & LOOKUP_CREATE ) && !(nd->flags & LOOKUP_OPEN)) {
590                                 /* We are sure this is new dentry, so we need to create
591                                    our private data and set the dentry ops */ 
592                                 ll_dops_init(dentry, 1, 1);
593                                 __d_lustre_invalidate(dentry);
594                                 d_add(dentry, NULL);
595                                 RETURN(NULL);
596                         }
597                         it = ll_convert_intent(&nd->intent.open, nd->flags);
598                         if (IS_ERR(it))
599                                 RETURN((struct dentry *)it);
600                 }
601
602                 de = ll_lookup_it(parent, dentry, it, nd->flags);
603                 if (de)
604                         dentry = de;
605                 if ((nd->flags & LOOKUP_OPEN) && !IS_ERR(dentry)) { /* Open */
606                         if (dentry->d_inode &&
607                             it_disposition(it, DISP_OPEN_OPEN)) { /* nocreate */
608                                 if (S_ISFIFO(dentry->d_inode->i_mode)) {
609                                         // We cannot call open here as it would
610                                         // deadlock.
611                                         ptlrpc_req_finished(
612                                                        (struct ptlrpc_request *)
613                                                           it->d.lustre.it_data);
614                                 } else {
615                                         struct file *filp;
616
617                                         nd->intent.open.file->private_data = it;
618                                         filp = lookup_instantiate_filp(nd,
619                                                                        dentry,
620                                                                        NULL);
621                                         if (IS_ERR(filp)) {
622                                                 if (de)
623                                                         dput(de);
624                                                 de = (struct dentry *)filp;
625                                         }
626                                 }
627                         } else if (it_disposition(it, DISP_OPEN_CREATE)) {
628                                 // XXX This can only reliably work on assumption
629                                 // that there are NO hashed negative dentries.
630                                 ll_d2d(dentry)->lld_it = it;
631                                 it = NULL; /* Will be freed in ll_create_nd */
632                                 /* We absolutely depend on ll_create_nd to be
633                                  * called to not leak this intent and possible
634                                  * data attached to it */
635                         }
636                 }
637
638                 if (it) {
639                         ll_intent_release(it);
640                         OBD_FREE(it, sizeof(*it));
641                 }
642         } else {
643                 de = ll_lookup_it(parent, dentry, NULL, 0);
644         }
645
646         RETURN(de);
647 }
648
649 /* We depend on "mode" being set with the proper file type/umask by now */
650 static struct inode *ll_create_node(struct inode *dir, const char *name,
651                                     int namelen, const void *data, int datalen,
652                                     int mode, __u64 extra,
653                                     struct lookup_intent *it)
654 {
655         struct inode *inode = NULL;
656         struct ptlrpc_request *request = NULL;
657         struct ll_sb_info *sbi = ll_i2sbi(dir);
658         int rc;
659         ENTRY;
660
661         LASSERT(it && it->d.lustre.it_disposition);
662
663         LASSERT(it_disposition(it, DISP_ENQ_CREATE_REF));
664         request = it->d.lustre.it_data;
665         it_clear_disposition(it, DISP_ENQ_CREATE_REF);
666         rc = ll_prep_inode(&inode, request, dir->i_sb);
667         if (rc)
668                 GOTO(out, inode = ERR_PTR(rc));
669
670         LASSERT(list_empty(&inode->i_dentry));
671
672         /* We asked for a lock on the directory, but were granted a
673          * lock on the inode.  Since we finally have an inode pointer,
674          * stuff it in the lock. */
675         CDEBUG(D_DLMTRACE, "setting l_ast_data to inode %p (%lu/%u)\n",
676                inode, inode->i_ino, inode->i_generation);
677         ll_set_lock_data(sbi->ll_md_exp, inode, it, NULL);
678         EXIT;
679  out:
680         ptlrpc_req_finished(request);
681         return inode;
682 }
683
684 /*
685  * By the time this is called, we already have created the directory cache
686  * entry for the new file, but it is so far negative - it has no inode.
687  *
688  * We defer creating the OBD object(s) until open, to keep the intent and
689  * non-intent code paths similar, and also because we do not have the MDS
690  * inode number before calling ll_create_node() (which is needed for LOV),
691  * so we would need to do yet another RPC to the MDS to store the LOV EA
692  * data on the MDS.  If needed, we would pass the PACKED lmm as data and
693  * lmm_size in datalen (the MDS still has code which will handle that).
694  *
695  * If the create succeeds, we fill in the inode information
696  * with d_instantiate().
697  */
698 static int ll_create_it(struct inode *dir, struct dentry *dentry, int mode,
699                         struct lookup_intent *it)
700 {
701         struct inode *inode;
702         int rc = 0;
703         ENTRY;
704
705         CDEBUG(D_VFSTRACE, "VFS Op:name=%.*s,dir=%lu/%u(%p),intent=%s\n",
706                dentry->d_name.len, dentry->d_name.name, dir->i_ino,
707                dir->i_generation, dir, LL_IT2STR(it));
708
709         rc = it_open_error(DISP_OPEN_CREATE, it);
710         if (rc)
711                 RETURN(rc);
712
713         inode = ll_create_node(dir, dentry->d_name.name, dentry->d_name.len,
714                                NULL, 0, mode, 0, it);
715         if (IS_ERR(inode))
716                 RETURN(PTR_ERR(inode));
717
718         d_instantiate(dentry, inode);
719         RETURN(0);
720 }
721
722 static void ll_update_times(struct ptlrpc_request *request,
723                             struct inode *inode)
724 {
725         struct mdt_body *body = req_capsule_server_get(&request->rq_pill,
726                                                        &RMF_MDT_BODY);
727
728         LASSERT(body);
729         if (body->valid & OBD_MD_FLMTIME &&
730             body->mtime > LTIME_S(inode->i_mtime)) {
731                 CDEBUG(D_INODE, "setting ino %lu mtime from %lu to "LPU64"\n",
732                        inode->i_ino, LTIME_S(inode->i_mtime), body->mtime);
733                 LTIME_S(inode->i_mtime) = body->mtime;
734         }
735         if (body->valid & OBD_MD_FLCTIME &&
736             body->ctime > LTIME_S(inode->i_ctime))
737                 LTIME_S(inode->i_ctime) = body->ctime;
738 }
739
740 static int ll_new_node(struct inode *dir, struct qstr *name,
741                        const char *tgt, int mode, int rdev,
742                        struct dentry *dchild, __u32 opc)
743 {
744         struct ptlrpc_request *request = NULL;
745         struct md_op_data *op_data;
746         struct inode *inode = NULL;
747         struct ll_sb_info *sbi = ll_i2sbi(dir);
748         int tgt_len = 0;
749         int err;
750
751         ENTRY;
752         if (unlikely(tgt != NULL))
753                 tgt_len = strlen(tgt) + 1;
754
755         op_data = ll_prep_md_op_data(NULL, dir, NULL, name->name,
756                                      name->len, 0, opc, NULL);
757         if (IS_ERR(op_data))
758                 GOTO(err_exit, err = PTR_ERR(op_data));
759
760         err = md_create(sbi->ll_md_exp, op_data, tgt, tgt_len, mode,
761                         cfs_curproc_fsuid(), cfs_curproc_fsgid(),
762                         cfs_curproc_cap_pack(), rdev, &request);
763         ll_finish_md_op_data(op_data);
764         if (err)
765                 GOTO(err_exit, err);
766
767         ll_update_times(request, dir);
768
769         if (dchild) {
770                 err = ll_prep_inode(&inode, request, dchild->d_sb);
771                 if (err)
772                      GOTO(err_exit, err);
773
774                 d_instantiate(dchild, inode);
775         }
776         EXIT;
777 err_exit:
778         ptlrpc_req_finished(request);
779
780         return err;
781 }
782
783 static int ll_mknod_generic(struct inode *dir, struct qstr *name, int mode,
784                             unsigned rdev, struct dentry *dchild)
785 {
786         int err;
787         ENTRY;
788
789         CDEBUG(D_VFSTRACE, "VFS Op:name=%.*s,dir=%lu/%u(%p) mode %o dev %x\n",
790                name->len, name->name, dir->i_ino, dir->i_generation, dir,
791                mode, rdev);
792
793         if (!IS_POSIXACL(dir) || !exp_connect_umask(ll_i2mdexp(dir)))
794                 mode &= ~cfs_curproc_umask();
795
796         switch (mode & S_IFMT) {
797         case 0:
798                 mode |= S_IFREG; /* for mode = 0 case, fallthrough */
799         case S_IFREG:
800         case S_IFCHR:
801         case S_IFBLK:
802         case S_IFIFO:
803         case S_IFSOCK:
804                 err = ll_new_node(dir, name, NULL, mode, rdev, dchild,
805                                   LUSTRE_OPC_MKNOD);
806                 break;
807         case S_IFDIR:
808                 err = -EPERM;
809                 break;
810         default:
811                 err = -EINVAL;
812         }
813
814         if (!err)
815                 ll_stats_ops_tally(ll_i2sbi(dir), LPROC_LL_MKNOD, 1);
816
817         RETURN(err);
818 }
819
820 static int ll_create_nd(struct inode *dir, struct dentry *dentry,
821                         int mode, struct nameidata *nd)
822 {
823         struct lookup_intent *it = ll_d2d(dentry)->lld_it;
824         int rc;
825
826         if (!it)
827                 return ll_mknod_generic(dir, &dentry->d_name, mode, 0, dentry);
828
829         ll_d2d(dentry)->lld_it = NULL;
830
831         /* Was there an error? Propagate it! */
832         if (it->d.lustre.it_status) {
833                 rc = it->d.lustre.it_status;
834                 goto out;
835         }
836
837         rc = ll_create_it(dir, dentry, mode, it);
838         if (nd && (nd->flags & LOOKUP_OPEN) && dentry->d_inode) { /* Open */
839                 struct file *filp;
840
841                 nd->intent.open.file->private_data = it;
842                 filp = lookup_instantiate_filp(nd, dentry, NULL);
843                 if (IS_ERR(filp))
844                         rc = PTR_ERR(filp);
845         }
846
847 out:
848         ll_intent_release(it);
849         OBD_FREE(it, sizeof(*it));
850
851         if (!rc)
852                 ll_stats_ops_tally(ll_i2sbi(dir), LPROC_LL_CREATE, 1);
853
854         return rc;
855 }
856
857 static int ll_symlink_generic(struct inode *dir, struct qstr *name,
858                               const char *tgt, struct dentry *dchild)
859 {
860         int err;
861         ENTRY;
862
863         CDEBUG(D_VFSTRACE, "VFS Op:name=%.*s,dir=%lu/%u(%p),target=%.*s\n",
864                name->len, name->name, dir->i_ino, dir->i_generation,
865                dir, 3000, tgt);
866
867         err = ll_new_node(dir, name, (char *)tgt, S_IFLNK | S_IRWXUGO,
868                           0, dchild, LUSTRE_OPC_SYMLINK);
869
870         if (!err)
871                 ll_stats_ops_tally(ll_i2sbi(dir), LPROC_LL_SYMLINK, 1);
872
873         RETURN(err);
874 }
875
876 static int ll_link_generic(struct inode *src,  struct inode *dir,
877                            struct qstr *name, struct dentry *dchild)
878 {
879         struct ll_sb_info *sbi = ll_i2sbi(dir);
880         struct ptlrpc_request *request = NULL;
881         struct md_op_data *op_data;
882         int err;
883
884         ENTRY;
885         CDEBUG(D_VFSTRACE,
886                "VFS Op: inode=%lu/%u(%p), dir=%lu/%u(%p), target=%.*s\n",
887                src->i_ino, src->i_generation, src, dir->i_ino,
888                dir->i_generation, dir, name->len, name->name);
889
890         op_data = ll_prep_md_op_data(NULL, src, dir, name->name, name->len,
891                                      0, LUSTRE_OPC_ANY, NULL);
892         if (IS_ERR(op_data))
893                 RETURN(PTR_ERR(op_data));
894
895         err = md_link(sbi->ll_md_exp, op_data, &request);
896         ll_finish_md_op_data(op_data);
897         if (err)
898                 GOTO(out, err);
899
900         ll_update_times(request, dir);
901         ll_stats_ops_tally(sbi, LPROC_LL_LINK, 1);
902         EXIT;
903 out:
904         ptlrpc_req_finished(request);
905         RETURN(err);
906 }
907
908 static int ll_mkdir_generic(struct inode *dir, struct qstr *name,
909                             int mode, struct dentry *dchild)
910
911 {
912         int err;
913         ENTRY;
914
915         CDEBUG(D_VFSTRACE, "VFS Op:name=%.*s,dir=%lu/%u(%p)\n",
916                name->len, name->name, dir->i_ino, dir->i_generation, dir);
917
918         if (!IS_POSIXACL(dir) || !exp_connect_umask(ll_i2mdexp(dir)))
919                 mode &= ~cfs_curproc_umask();
920         mode = (mode & (S_IRWXUGO|S_ISVTX)) | S_IFDIR;
921         err = ll_new_node(dir, name, NULL, mode, 0, dchild, LUSTRE_OPC_MKDIR);
922
923         if (!err)
924                 ll_stats_ops_tally(ll_i2sbi(dir), LPROC_LL_MKDIR, 1);
925
926         RETURN(err);
927 }
928
929 /* Try to find the child dentry by its name.
930    If found, put the result fid into @fid. */
931 static void ll_get_child_fid(struct inode * dir, struct qstr *name,
932                              struct lu_fid *fid)
933 {
934         struct dentry *parent, *child;
935
936         parent = list_entry(dir->i_dentry.next, struct dentry, d_alias);
937         child = d_lookup(parent, name);
938         if (child) {
939                 if (child->d_inode)
940                         *fid = *ll_inode2fid(child->d_inode);
941                 dput(child);
942         }
943 }
944
945 static int ll_rmdir_generic(struct inode *dir, struct dentry *dparent,
946                             struct dentry *dchild, struct qstr *name)
947 {
948         struct ptlrpc_request *request = NULL;
949         struct md_op_data *op_data;
950         int rc;
951         ENTRY;
952
953         CDEBUG(D_VFSTRACE, "VFS Op:name=%.*s,dir=%lu/%u(%p)\n",
954                name->len, name->name, dir->i_ino, dir->i_generation, dir);
955
956         if (unlikely(ll_d_mountpoint(dparent, dchild, name)))
957                 RETURN(-EBUSY);
958
959         op_data = ll_prep_md_op_data(NULL, dir, NULL, name->name, name->len,
960                                      S_IFDIR, LUSTRE_OPC_ANY, NULL);
961         if (IS_ERR(op_data))
962                 RETURN(PTR_ERR(op_data));
963
964         ll_get_child_fid(dir, name, &op_data->op_fid3);
965         rc = md_unlink(ll_i2sbi(dir)->ll_md_exp, op_data, &request);
966         ll_finish_md_op_data(op_data);
967         if (rc == 0) {
968                 ll_update_times(request, dir);
969                 ll_stats_ops_tally(ll_i2sbi(dir), LPROC_LL_RMDIR, 1);
970         }
971
972         ptlrpc_req_finished(request);
973         RETURN(rc);
974 }
975
976 int ll_objects_destroy(struct ptlrpc_request *request, struct inode *dir)
977 {
978         struct mdt_body *body;
979         struct lov_mds_md *eadata;
980         struct lov_stripe_md *lsm = NULL;
981         struct obd_trans_info oti = { 0 };
982         struct obdo *oa;
983         struct obd_capa *oc = NULL;
984         int rc;
985         ENTRY;
986
987         /* req is swabbed so this is safe */
988         body = req_capsule_server_get(&request->rq_pill, &RMF_MDT_BODY);
989         if (!(body->valid & OBD_MD_FLEASIZE))
990                 RETURN(0);
991
992         if (body->eadatasize == 0) {
993                 CERROR("OBD_MD_FLEASIZE set but eadatasize zero\n");
994                 GOTO(out, rc = -EPROTO);
995         }
996
997         /* The MDS sent back the EA because we unlinked the last reference
998          * to this file. Use this EA to unlink the objects on the OST.
999          * It's opaque so we don't swab here; we leave it to obd_unpackmd() to
1000          * check it is complete and sensible. */
1001         eadata = req_capsule_server_sized_get(&request->rq_pill, &RMF_MDT_MD,
1002                                               body->eadatasize);
1003         LASSERT(eadata != NULL);
1004
1005         rc = obd_unpackmd(ll_i2dtexp(dir), &lsm, eadata, body->eadatasize);
1006         if (rc < 0) {
1007                 CERROR("obd_unpackmd: %d\n", rc);
1008                 GOTO(out, rc);
1009         }
1010         LASSERT(rc >= sizeof(*lsm));
1011
1012         OBDO_ALLOC(oa);
1013         if (oa == NULL)
1014                 GOTO(out_free_memmd, rc = -ENOMEM);
1015
1016         oa->o_id = lsm->lsm_object_id;
1017         oa->o_seq = lsm->lsm_object_seq;
1018         oa->o_mode = body->mode & S_IFMT;
1019         oa->o_valid = OBD_MD_FLID | OBD_MD_FLTYPE | OBD_MD_FLGROUP;
1020
1021         if (body->valid & OBD_MD_FLCOOKIE) {
1022                 oa->o_valid |= OBD_MD_FLCOOKIE;
1023                 oti.oti_logcookies =
1024                         req_capsule_server_sized_get(&request->rq_pill,
1025                                                      &RMF_LOGCOOKIES,
1026                                                    sizeof(struct llog_cookie) *
1027                                                      lsm->lsm_stripe_count);
1028                 if (oti.oti_logcookies == NULL) {
1029                         oa->o_valid &= ~OBD_MD_FLCOOKIE;
1030                         body->valid &= ~OBD_MD_FLCOOKIE;
1031                 }
1032         }
1033
1034         if (body->valid & OBD_MD_FLOSSCAPA) {
1035                 rc = md_unpack_capa(ll_i2mdexp(dir), request, &RMF_CAPA2, &oc);
1036                 if (rc)
1037                         GOTO(out_free_memmd, rc);
1038         }
1039
1040         rc = obd_destroy(NULL, ll_i2dtexp(dir), oa, lsm, &oti,
1041                          ll_i2mdexp(dir), oc);
1042         capa_put(oc);
1043         OBDO_FREE(oa);
1044         if (rc)
1045                 CERROR("obd destroy objid "LPX64" error %d\n",
1046                        lsm->lsm_object_id, rc);
1047  out_free_memmd:
1048         obd_free_memmd(ll_i2dtexp(dir), &lsm);
1049  out:
1050         return rc;
1051 }
1052
1053 /* ll_unlink_generic() doesn't update the inode with the new link count.
1054  * Instead, ll_ddelete() and ll_d_iput() will update it based upon if there
1055  * is any lock existing. They will recycle dentries and inodes based upon locks
1056  * too. b=20433 */
1057 static int ll_unlink_generic(struct inode *dir, struct dentry *dparent,
1058                              struct dentry *dchild, struct qstr *name)
1059 {
1060         struct ptlrpc_request *request = NULL;
1061         struct md_op_data *op_data;
1062         int rc;
1063         ENTRY;
1064         CDEBUG(D_VFSTRACE, "VFS Op:name=%.*s,dir=%lu/%u(%p)\n",
1065                name->len, name->name, dir->i_ino, dir->i_generation, dir);
1066
1067         /*
1068          * XXX: unlink bind mountpoint maybe call to here,
1069          * just check it as vfs_unlink does.
1070          */
1071         if (unlikely(ll_d_mountpoint(dparent, dchild, name)))
1072                 RETURN(-EBUSY);
1073
1074         op_data = ll_prep_md_op_data(NULL, dir, NULL, name->name,
1075                                      name->len, 0, LUSTRE_OPC_ANY, NULL);
1076         if (IS_ERR(op_data))
1077                 RETURN(PTR_ERR(op_data));
1078
1079         ll_get_child_fid(dir, name, &op_data->op_fid3);
1080         rc = md_unlink(ll_i2sbi(dir)->ll_md_exp, op_data, &request);
1081         ll_finish_md_op_data(op_data);
1082         if (rc)
1083                 GOTO(out, rc);
1084
1085         ll_update_times(request, dir);
1086         ll_stats_ops_tally(ll_i2sbi(dir), LPROC_LL_UNLINK, 1);
1087
1088         rc = ll_objects_destroy(request, dir);
1089  out:
1090         ptlrpc_req_finished(request);
1091         RETURN(rc);
1092 }
1093
1094 static int ll_rename_generic(struct inode *src, struct dentry *src_dparent,
1095                              struct dentry *src_dchild, struct qstr *src_name,
1096                              struct inode *tgt, struct dentry *tgt_dparent,
1097                              struct dentry *tgt_dchild, struct qstr *tgt_name)
1098 {
1099         struct ptlrpc_request *request = NULL;
1100         struct ll_sb_info *sbi = ll_i2sbi(src);
1101         struct md_op_data *op_data;
1102         int err;
1103         ENTRY;
1104         CDEBUG(D_VFSTRACE,"VFS Op:oldname=%.*s,src_dir=%lu/%u(%p),newname=%.*s,"
1105                "tgt_dir=%lu/%u(%p)\n", src_name->len, src_name->name,
1106                src->i_ino, src->i_generation, src, tgt_name->len,
1107                tgt_name->name, tgt->i_ino, tgt->i_generation, tgt);
1108
1109         if (unlikely(ll_d_mountpoint(src_dparent, src_dchild, src_name) ||
1110             ll_d_mountpoint(tgt_dparent, tgt_dchild, tgt_name)))
1111                 RETURN(-EBUSY);
1112
1113         op_data = ll_prep_md_op_data(NULL, src, tgt, NULL, 0, 0,
1114                                      LUSTRE_OPC_ANY, NULL);
1115         if (IS_ERR(op_data))
1116                 RETURN(PTR_ERR(op_data));
1117
1118         ll_get_child_fid(src, src_name, &op_data->op_fid3);
1119         ll_get_child_fid(tgt, tgt_name, &op_data->op_fid4);
1120         err = md_rename(sbi->ll_md_exp, op_data,
1121                         src_name->name, src_name->len,
1122                         tgt_name->name, tgt_name->len, &request);
1123         ll_finish_md_op_data(op_data);
1124         if (!err) {
1125                 ll_update_times(request, src);
1126                 ll_update_times(request, tgt);
1127                 ll_stats_ops_tally(sbi, LPROC_LL_RENAME, 1);
1128                 err = ll_objects_destroy(request, src);
1129         }
1130
1131         ptlrpc_req_finished(request);
1132
1133         RETURN(err);
1134 }
1135
1136 static int ll_mknod(struct inode *dir, struct dentry *dchild, int mode,
1137                     dev_t rdev)
1138 {
1139         return ll_mknod_generic(dir, &dchild->d_name, mode,
1140                                 old_encode_dev(rdev), dchild);
1141 }
1142
1143 static int ll_unlink(struct inode * dir, struct dentry *dentry)
1144 {
1145         return ll_unlink_generic(dir, NULL, dentry, &dentry->d_name);
1146 }
1147 static int ll_mkdir(struct inode *dir, struct dentry *dentry, int mode)
1148 {
1149         return ll_mkdir_generic(dir, &dentry->d_name, mode, dentry);
1150 }
1151 static int ll_rmdir(struct inode *dir, struct dentry *dentry)
1152 {
1153         return ll_rmdir_generic(dir, NULL, dentry, &dentry->d_name);
1154 }
1155 static int ll_symlink(struct inode *dir, struct dentry *dentry,
1156                       const char *oldname)
1157 {
1158         return ll_symlink_generic(dir, &dentry->d_name, oldname, dentry);
1159 }
1160 static int ll_link(struct dentry *old_dentry, struct inode *dir,
1161                    struct dentry *new_dentry)
1162 {
1163         return ll_link_generic(old_dentry->d_inode, dir, &new_dentry->d_name,
1164                                new_dentry);
1165 }
1166 static int ll_rename(struct inode *old_dir, struct dentry *old_dentry,
1167                      struct inode *new_dir, struct dentry *new_dentry)
1168 {
1169         int err;
1170         err = ll_rename_generic(old_dir, NULL,
1171                                  old_dentry, &old_dentry->d_name,
1172                                  new_dir, NULL, new_dentry,
1173                                  &new_dentry->d_name);
1174         if (!err) {
1175 #ifndef HAVE_FS_RENAME_DOES_D_MOVE
1176                 if (!S_ISDIR(old_dentry->d_inode->i_mode))
1177 #endif
1178                         d_move(old_dentry, new_dentry);
1179         }
1180         return err;
1181 }
1182
1183 struct inode_operations ll_dir_inode_operations = {
1184         .mknod              = ll_mknod,
1185         .lookup             = ll_lookup_nd,
1186         .create             = ll_create_nd,
1187         /* We need all these non-raw things for NFSD, to not patch it. */
1188         .unlink             = ll_unlink,
1189         .mkdir              = ll_mkdir,
1190         .rmdir              = ll_rmdir,
1191         .symlink            = ll_symlink,
1192         .link               = ll_link,
1193         .rename             = ll_rename,
1194         .setattr            = ll_setattr,
1195         .getattr            = ll_getattr,
1196         .permission         = ll_inode_permission,
1197         .setxattr           = ll_setxattr,
1198         .getxattr           = ll_getxattr,
1199         .listxattr          = ll_listxattr,
1200         .removexattr        = ll_removexattr,
1201 #ifdef HAVE_IOP_GET_ACL
1202         .get_acl            = ll_get_acl,
1203 #endif
1204 };
1205
1206 struct inode_operations ll_special_inode_operations = {
1207         .setattr        = ll_setattr,
1208         .getattr        = ll_getattr,
1209         .permission     = ll_inode_permission,
1210         .setxattr       = ll_setxattr,
1211         .getxattr       = ll_getxattr,
1212         .listxattr      = ll_listxattr,
1213         .removexattr    = ll_removexattr,
1214 #ifdef HAVE_IOP_GET_ACL
1215         .get_acl            = ll_get_acl,
1216 #endif
1217 };