Whamcloud - gitweb
LU-3279 changelog: fix CL_LAYOUT, accept all types
[fs/lustre-release.git] / lustre / liblustre / 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) 2003, 2010, Oracle and/or its affiliates. All rights reserved.
28  * Use is subject to license terms.
29  *
30  * Copyright (c) 2011, 2012, Intel Corporation.
31  */
32 /*
33  * This file is part of Lustre, http://www.lustre.org/
34  * Lustre is a trademark of Sun Microsystems, Inc.
35  *
36  * lustre/liblustre/namei.c
37  *
38  * Lustre Light name resolution
39  */
40
41 #define DEBUG_SUBSYSTEM S_LLITE
42
43 #include <stdlib.h>
44 #include <string.h>
45 #include <assert.h>
46 #include <time.h>
47 #include <sys/types.h>
48 #include <sys/stat.h>
49 #include <fcntl.h>
50 #include <sys/queue.h>
51
52 #include "llite_lib.h"
53
54 void ll_intent_drop_lock(struct lookup_intent *it)
55 {
56         struct lustre_handle *handle;
57
58         if (it->it_op && it->d.lustre.it_lock_mode) {
59                 handle = (struct lustre_handle *)&it->d.lustre.it_lock_handle;
60                 CDEBUG(D_DLMTRACE, "releasing lock with cookie "LPX64
61                        " from it %p\n", handle->cookie, it);
62                 ldlm_lock_decref(handle, it->d.lustre.it_lock_mode);
63
64                 /* bug 494: intent_release may be called multiple times, from
65                  * this thread and we don't want to double-decref this lock */
66                 it->d.lustre.it_lock_mode = 0;
67         }
68 }
69
70 void ll_intent_release(struct lookup_intent *it)
71 {
72         ENTRY;
73
74         ll_intent_drop_lock(it);
75         it->it_magic = 0;
76         it->it_op_release = 0;
77         it->d.lustre.it_disposition = 0;
78         it->d.lustre.it_data = NULL;
79         EXIT;
80 }
81
82 void llu_lookup_finish_locks(struct lookup_intent *it, struct pnode *pnode)
83 {
84         struct inode *inode;
85         LASSERT(it);
86         LASSERT(pnode);
87
88         inode = pnode->p_base->pb_ino;
89         if (it->d.lustre.it_lock_mode && inode != NULL) {
90                 struct llu_sb_info *sbi;
91
92                 CDEBUG(D_DLMTRACE, "setting l_data to inode %p (%llu/%lu)\n",
93                        inode, (long long)llu_i2stat(inode)->st_ino,
94                        llu_i2info(inode)->lli_st_generation);
95
96                 sbi = llu_i2sbi(inode);
97                 md_set_lock_data(sbi->ll_md_exp,
98                                  &it->d.lustre.it_lock_handle, inode, NULL);
99         }
100
101         /* drop lookup/getattr locks */
102         if (it->it_op & (IT_LOOKUP | IT_GETATTR))
103                 ll_intent_release(it);
104
105 }
106
107 static inline void llu_invalidate_inode_pages(struct inode * inode)
108 {
109         /* do nothing */
110 }
111
112 int llu_md_blocking_ast(struct ldlm_lock *lock,
113                         struct ldlm_lock_desc *desc,
114                         void *data, int flag)
115 {
116         struct lustre_handle lockh;
117         int rc;
118         ENTRY;
119
120
121         switch (flag) {
122         case LDLM_CB_BLOCKING:
123                 ldlm_lock2handle(lock, &lockh);
124                 rc = ldlm_cli_cancel(&lockh, 0);
125                 if (rc < 0) {
126                         CDEBUG(D_INODE, "ldlm_cli_cancel: %d\n", rc);
127                         RETURN(rc);
128                 }
129                 break;
130         case LDLM_CB_CANCELING: {
131                 struct inode *inode = llu_inode_from_resource_lock(lock);
132                 struct llu_inode_info *lli;
133                 struct intnl_stat *st;
134                 __u64 bits = lock->l_policy_data.l_inodebits.bits;
135                 struct lu_fid *fid;
136
137                 /* Inode is set to lock->l_resource->lr_lvb_inode
138                 * for mdc - bug 24555 */
139                 LASSERT(lock->l_ast_data == NULL);
140
141                 /* Invalidate all dentries associated with this inode */
142                 if (inode == NULL)
143                         break;
144
145                 lli =  llu_i2info(inode);
146                 st = llu_i2stat(inode);
147
148                 if (bits & MDS_INODELOCK_UPDATE)
149                         lli->lli_flags &= ~LLIF_MDS_SIZE_LOCK;
150
151                 fid = &lli->lli_fid;
152                 if (lock->l_resource->lr_name.name[0] != fid_seq(fid) ||
153                     lock->l_resource->lr_name.name[1] != fid_oid(fid) ||
154                     lock->l_resource->lr_name.name[2] != fid_ver(fid)) {
155                         LDLM_ERROR(lock,"data mismatch with ino %llu/%llu/%llu",
156                                   (long long)fid_seq(fid), 
157                                   (long long)fid_oid(fid),
158                                   (long long)fid_ver(fid));
159                 }
160                 if (S_ISDIR(st->st_mode) &&
161                     (bits & MDS_INODELOCK_UPDATE)) {
162                         CDEBUG(D_INODE, "invalidating inode %llu\n",
163                                (long long)st->st_ino);
164
165                         llu_invalidate_inode_pages(inode);
166                 }
167
168 /*
169                 if (inode->i_sb->s_root &&
170                     inode != inode->i_sb->s_root->d_inode)
171                         ll_unhash_aliases(inode);
172 */
173                 I_RELE(inode);
174                 break;
175         }
176         default:
177                 LBUG();
178         }
179
180         RETURN(0);
181 }
182
183 static int pnode_revalidate_finish(struct ptlrpc_request *req,
184                                    struct lookup_intent *it,
185                                    struct pnode *pnode)
186 {
187         struct inode *inode = pnode->p_base->pb_ino;
188         struct lustre_md md;
189         int rc = 0;
190         ENTRY;
191
192         LASSERT(inode);
193
194         if (!req)
195                 RETURN(0);
196
197         if (it_disposition(it, DISP_LOOKUP_NEG))
198                 RETURN(-ENOENT);
199
200         rc = md_get_lustre_md(llu_i2sbi(inode)->ll_md_exp, req,
201                               llu_i2sbi(inode)->ll_dt_exp, 
202                               llu_i2sbi(inode)->ll_md_exp, &md);
203         if (rc)
204                 RETURN(rc);
205
206         llu_update_inode(inode, &md);
207
208         RETURN(rc);
209 }
210
211 static int llu_pb_revalidate(struct pnode *pnode, int flags,
212                              struct lookup_intent *it)
213 {
214         struct pnode_base *pb = pnode->p_base;
215         struct md_op_data op_data = {{ 0 }};
216         struct ptlrpc_request *req = NULL;
217         struct lookup_intent lookup_it = { .it_op = IT_LOOKUP };
218         struct obd_export *exp;
219         int rc;
220         ENTRY;
221
222         CDEBUG(D_VFSTRACE, "VFS Op:name=%.*s,intent=%x\n",
223                (int)pb->pb_name.len, pb->pb_name.name, it ? it->it_op : 0);
224
225         /* We don't want to cache negative dentries, so return 0 immediately.
226          * We believe that this is safe, that negative dentries cannot be
227          * pinned by someone else */
228         if (pb->pb_ino == NULL) {
229                 CDEBUG(D_INODE, "negative pb\n");
230                 RETURN(0);
231         }
232
233         /* This is due to bad interaction with libsysio. remove this when we
234          * switched to libbsdio XXX
235          */
236         {
237                 struct llu_inode_info *lli = llu_i2info(pb->pb_ino);
238                 struct intnl_stat *st = llu_i2stat(pb->pb_ino);
239                 if (lli->lli_it) {
240                         CDEBUG(D_INODE, "inode %llu still have intent "
241                                         "%p(opc 0x%x), release it\n",
242                                         (long long) st->st_ino, lli->lli_it,
243                                         lli->lli_it->it_op);
244                         ll_intent_release(lli->lli_it);
245                         OBD_FREE(lli->lli_it, sizeof(*lli->lli_it));
246                         lli->lli_it = NULL;
247                 }
248         }
249
250         exp = llu_i2mdexp(pb->pb_ino);
251
252         if (!it) {
253                 it = &lookup_it;
254                 it->it_op_release = ll_intent_release;
255         }
256
257         llu_prep_md_op_data(&op_data, pnode->p_parent->p_base->pb_ino,
258                             pb->pb_ino, pb->pb_name.name, pb->pb_name.len,
259                             0, LUSTRE_OPC_ANY);
260
261         rc = md_intent_lock(exp, &op_data, NULL, 0, it, flags,
262                             &req, llu_md_blocking_ast,
263                             LDLM_FL_CANCEL_ON_BLOCK);
264         /* If req is NULL, then md_intent_lock only tried to do a lock match;
265          * if all was well, it will return 1 if it found locks, 0 otherwise. */
266         if (req == NULL && rc >= 0)
267                 GOTO(out, rc);
268
269         if (rc < 0)
270                 GOTO(out, rc = 0);
271
272         rc = pnode_revalidate_finish(req, it, pnode);
273         if (rc != 0) {
274                 ll_intent_release(it);
275                 GOTO(out, rc = 0);
276         }
277         rc = 1;
278
279         /* Note: ll_intent_lock may cause a callback, check this! */
280
281         if (it->it_op & IT_OPEN)
282                 LL_SAVE_INTENT(pb->pb_ino, it);
283
284  out:
285         if (req && rc == 1)
286                 ptlrpc_req_finished(req);
287         if (rc == 0) {
288                 LASSERT(pb->pb_ino);
289                 I_RELE(pb->pb_ino);
290                 pb->pb_ino = NULL;
291         } else {
292                 llu_lookup_finish_locks(it, pnode);
293         }
294         RETURN(rc);
295 }
296
297 static int lookup_it_finish(struct ptlrpc_request *request, int offset,
298                             struct lookup_intent *it, void *data)
299 {
300         struct it_cb_data *icbd = data;
301         struct pnode *child = icbd->icbd_child;
302         struct inode *parent = icbd->icbd_parent;
303         struct llu_sb_info *sbi = llu_i2sbi(parent);
304         struct inode *inode = NULL;
305         int rc;
306
307         /* libsysio require us generate inode right away if success.
308          * so if mds created new inode for us we need make sure it
309          * succeeded. thus for any error we can't delay to the
310          * llu_file_open() time. */
311         if (it_disposition(it, DISP_OPEN_CREATE) &&
312             it_open_error(DISP_OPEN_CREATE, it)) {
313                 CDEBUG(D_INODE, "detect mds create error\n");
314                 return it_open_error(DISP_OPEN_CREATE, it);
315         }
316         if (it_disposition(it, DISP_OPEN_OPEN) &&
317             it_open_error(DISP_OPEN_OPEN, it)) {
318                 CDEBUG(D_INODE, "detect mds open error\n");
319                 /* undo which did by md_intent_lock */
320                 if (it_disposition(it, DISP_OPEN_CREATE) &&
321                     !it_open_error(DISP_OPEN_CREATE, it)) {
322                         LASSERT(request);
323                         LASSERT(cfs_atomic_read(&request->rq_refcount) > 1);
324                         CDEBUG(D_INODE, "dec a ref of req %p\n", request);
325                         ptlrpc_req_finished(request);
326                 }
327                 return it_open_error(DISP_OPEN_OPEN, it);
328         }
329
330         /* NB 1 request reference will be taken away by ll_intent_lock()
331          * when I return
332          */
333         if (!it_disposition(it, DISP_LOOKUP_NEG) || (it->it_op & IT_CREAT)) {
334                 struct lustre_md md;
335                 struct llu_inode_info *lli;
336                 struct intnl_stat *st;
337                 ENTRY;
338
339                 if (it_disposition(it, DISP_OPEN_CREATE))
340                         ptlrpc_req_finished(request);
341
342                 rc = md_get_lustre_md(sbi->ll_md_exp, request,
343                                       sbi->ll_dt_exp, sbi->ll_md_exp, &md);
344                 if (rc)
345                         RETURN(rc);
346
347                 inode = llu_iget(parent->i_fs, &md);
348                 if (!inode || IS_ERR(inode)) {
349                         /* free the lsm if we allocated one above */
350                         if (md.lsm != NULL)
351                                 obd_free_memmd(sbi->ll_dt_exp, &md.lsm);
352                         RETURN(inode ? PTR_ERR(inode) : -ENOMEM);
353                 } else if (md.lsm != NULL) {
354                         obd_free_memmd(sbi->ll_dt_exp, &md.lsm);
355                 }
356
357                 lli = llu_i2info(inode);
358                 st = llu_i2stat(inode);
359
360                 /* If this is a stat, get the authoritative file size */
361                 if (it->it_op == IT_GETATTR && S_ISREG(st->st_mode) &&
362                     lli->lli_has_smd) {
363                         ldlm_error_t rc;
364
365                         /* bug 2334: drop MDS lock before acquiring OST lock */
366                         ll_intent_drop_lock(it);
367
368                         rc = cl_glimpse_size(inode);
369                         if (rc) {
370                                 I_RELE(inode);
371                                 RETURN(rc);
372                         }
373                 }
374         } else {
375                 ENTRY;
376         }
377
378         /* intent will be further used in cases of open()/getattr() */
379         if (inode && (it->it_op & IT_OPEN))
380                 LL_SAVE_INTENT(inode, it);
381
382         child->p_base->pb_ino = inode;
383
384         RETURN(0);
385 }
386
387 struct inode *llu_inode_from_resource_lock(struct ldlm_lock *lock)
388 {
389         struct inode *inode;
390         lock_res_and_lock(lock);
391
392         if (lock->l_resource->lr_lvb_inode) {
393                 inode = (struct inode *)lock->l_resource->lr_lvb_inode;
394                 I_REF(inode);
395         } else
396                 inode = NULL;
397
398         unlock_res_and_lock(lock);
399         return inode;
400 }
401
402 struct inode *llu_inode_from_lock(struct ldlm_lock *lock)
403 {
404         struct inode *inode;
405         lock_res_and_lock(lock);
406
407         if (lock->l_ast_data) {
408                 inode = (struct inode *)lock->l_ast_data;
409                 I_REF(inode);
410         } else
411                 inode = NULL;
412
413         unlock_res_and_lock(lock);
414         return inode;
415 }
416
417 static int llu_lookup_it(struct inode *parent, struct pnode *pnode,
418                          struct lookup_intent *it, int flags)
419 {
420         struct md_op_data op_data = {{ 0 }};
421         struct it_cb_data icbd;
422         struct ptlrpc_request *req = NULL;
423         struct lookup_intent lookup_it = { .it_op = IT_LOOKUP };
424         __u32 opc;
425         int rc;
426         ENTRY;
427
428         if (pnode->p_base->pb_name.len > EXT2_NAME_LEN)
429                 RETURN(-ENAMETOOLONG);
430
431         if (!it) {
432                 it = &lookup_it;
433                 it->it_op_release = ll_intent_release;
434         }
435
436         icbd.icbd_child = pnode;
437         icbd.icbd_parent = parent;
438
439         if (it->it_op & IT_CREAT || 
440             (it->it_op & IT_OPEN && it->it_create_mode & O_CREAT)) {
441                 opc = LUSTRE_OPC_CREATE;
442         } else {
443                 opc = LUSTRE_OPC_ANY;
444         }
445         
446         llu_prep_md_op_data(&op_data, parent, NULL,
447                             pnode->p_base->pb_name.name,
448                             pnode->p_base->pb_name.len, flags, opc);
449
450         rc = md_intent_lock(llu_i2mdexp(parent), &op_data, NULL, 0, it,
451                             flags, &req, llu_md_blocking_ast,
452                             LDLM_FL_CANCEL_ON_BLOCK);
453         if (rc < 0)
454                 GOTO(out, rc);
455
456         rc = lookup_it_finish(req, DLM_REPLY_REC_OFF, it, &icbd);
457         if (rc != 0) {
458                 ll_intent_release(it);
459                 GOTO(out, rc);
460         }
461
462         llu_lookup_finish_locks(it, pnode);
463
464  out:
465         if (req)
466                 ptlrpc_req_finished(req);
467         return rc;
468 }
469
470 static struct lookup_intent*
471 translate_lookup_intent(struct intent *intent, const char *path)
472 {
473         struct lookup_intent *it;
474         int fmode;
475
476         /* libsysio trick */
477         if (!intent || path) {
478                 CDEBUG(D_VFSTRACE, "not intent needed\n");
479                 return NULL;
480         }
481
482         OBD_ALLOC(it, sizeof(*it));
483         LASSERT(it);
484
485         memset(it, 0, sizeof(*it));
486
487         /* libsysio will assign intent like following:
488          * NOTE: INT_CREAT has include INT_UPDPARENT
489          *
490          * open: INT_OPEN [| INT_CREAT]
491          * mkdir: INT_CREAT
492          * symlink: INT_CREAT
493          * unlink: INT_UPDPARENT
494          * rmdir: INT_UPDPARENT
495          * mknod: INT_CREAT
496          * stat: INT_GETATTR
497          * setattr: NULL
498          *
499          * following logic is adjusted for libsysio
500          */
501
502         it->it_flags = intent->int_arg2 ? *((int*)intent->int_arg2) : 0;
503
504         if (intent->int_opmask & INT_OPEN) {
505                 it->it_op |= IT_OPEN;
506
507                 /* convert access mode from O_ to FMODE_ */
508                 if (it->it_flags & O_WRONLY)
509                         fmode = FMODE_WRITE;
510                 else if (it->it_flags & O_RDWR)
511                         fmode = FMODE_READ | FMODE_WRITE;
512                 else
513                         fmode = FMODE_READ;
514                 it->it_flags &= ~O_ACCMODE;
515                 it->it_flags |= fmode;
516         }
517
518         /* XXX libsysio has strange code on intent handling,
519          * more check later */
520         if (it->it_flags & O_CREAT) {
521                 it->it_op |= IT_CREAT;
522                 it->it_create_mode = *((int*)intent->int_arg1);
523                 /* bug 7278: libsysio hack. For O_EXCL, libsysio depends on
524                    this lookup to return negative result, but then there is no
525                    way to find out original intent in ll_iop_open(). So we just
526                    clear O_EXCL from libsysio flags here to avoid checking
527                    for negative result. O_EXCL will be enforced by MDS. */
528                 *((int*)intent->int_arg2) &= ~O_EXCL;
529         }
530
531         if (intent->int_opmask & INT_GETATTR)
532                 it->it_op |= IT_GETATTR;
533
534         LASSERT(!(intent->int_opmask & INT_SETATTR));
535
536         /* libsysio is different to linux vfs when doing unlink/rmdir,
537          * INT_UPDPARENT was passed down during name resolution. Here
538          * we treat it as normal lookup, later unlink()/rmdir() will
539          * do the actual work */
540
541         /* conform to kernel code, if only IT_LOOKUP was set, don't
542          * pass down it */
543         if (!it->it_op || it->it_op & IT_LOOKUP) {
544                 OBD_FREE(it, sizeof(*it));
545                 it = NULL;
546         }
547         if (it)
548                 it->it_op_release = ll_intent_release;
549
550         CDEBUG(D_VFSTRACE, "final intent 0x%x\n", it ? it->it_op : 0);
551         return it;
552 }
553
554 int llu_iop_lookup(struct pnode *pnode,
555                    struct inode **inop,
556                    struct intent *intnt,
557                    const char *path)
558 {
559         struct lookup_intent *it;
560         int rc;
561         ENTRY;
562
563         liblustre_wait_event(0);
564
565         *inop = NULL;
566
567         /* the mount root inode have no name, so don't call
568          * remote in this case. but probably we need revalidate
569          * it here? FIXME */
570         if (pnode->p_mount->mnt_root == pnode) {
571                 struct inode *i = pnode->p_base->pb_ino;
572                 *inop = i;
573                 RETURN(0);
574         }
575
576         if (!pnode->p_base->pb_name.len)
577                 RETURN(-EINVAL);
578
579         it = translate_lookup_intent(intnt, path);
580
581         /* param flags is not used, let it be 0 */
582         if (llu_pb_revalidate(pnode, 0, it)) {
583                 LASSERT(pnode->p_base->pb_ino);
584                 *inop = pnode->p_base->pb_ino;
585                 GOTO(out, rc = 0);
586         }
587
588         rc = llu_lookup_it(pnode->p_parent->p_base->pb_ino, pnode, it, 0);
589         if (!rc) {
590                 if (!pnode->p_base->pb_ino)
591                         rc = -ENOENT;
592                 else
593                         *inop = pnode->p_base->pb_ino;
594         }
595
596 out:
597         if (it)
598                 OBD_FREE(it, sizeof(*it));
599         liblustre_wait_event(0);
600         RETURN(rc);
601 }