Whamcloud - gitweb
Add separate create locks per object group.
[fs/lustre-release.git] / lustre / liblustre / namei.c
1 /* -*- mode: c; c-basic-offset: 8; indent-tabs-mode: nil; -*-
2  * vim:expandtab:shiftwidth=8:tabstop=8:
3  *
4  * Lustre Light name resolution
5  *
6  *  Copyright (c) 2002, 2003 Cluster File Systems, Inc.
7  *
8  *   This file is part of Lustre, http://www.lustre.org.
9  *
10  *   Lustre is free software; you can redistribute it and/or
11  *   modify it under the terms of version 2 of the GNU General Public
12  *   License as published by the Free Software Foundation.
13  *
14  *   Lustre is distributed in the hope that it will be useful,
15  *   but WITHOUT ANY WARRANTY; without even the implied warranty of
16  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17  *   GNU General Public License for more details.
18  *
19  *   You should have received a copy of the GNU General Public License
20  *   along with Lustre; if not, write to the Free Software
21  *   Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
22  */
23
24 #define DEBUG_SUBSYSTEM S_LLITE
25
26 #include <stdlib.h>
27 #include <string.h>
28 #include <assert.h>
29 #include <time.h>
30 #include <sys/types.h>
31 #include <sys/stat.h>
32 #include <sys/fcntl.h>
33 #include <sys/queue.h>
34
35 #include <sysio.h>
36 #include <fs.h>
37 #include <mount.h>
38 #include <inode.h>
39 #include <file.h>
40
41 #undef LIST_HEAD
42
43 #include "llite_lib.h"
44
45 static void ll_intent_drop_lock(struct lookup_intent *it)
46 {
47         struct lustre_handle *handle;
48
49         if (it->it_op && it->d.lustre.it_lock_mode) {
50                 handle = (struct lustre_handle *)&it->d.lustre.it_lock_handle;
51                 CDEBUG(D_DLMTRACE, "releasing lock with cookie "LPX64
52                        " from it %p\n", handle->cookie, it);
53                 ldlm_lock_decref(handle, it->d.lustre.it_lock_mode);
54
55                 /* bug 494: intent_release may be called multiple times, from
56                  * this thread and we don't want to double-decref this lock */
57                 it->d.lustre.it_lock_mode = 0;
58         }
59 }
60
61 static void ll_intent_release(struct lookup_intent *it)
62 {
63         ENTRY;
64
65         ll_intent_drop_lock(it);
66         it->it_magic = 0;
67         it->it_op_release = 0;
68         it->d.lustre.it_disposition = 0;
69         it->d.lustre.it_data = NULL;
70         EXIT;
71 }
72
73 /*
74  * remove the stale inode from pnode
75  */
76 void unhook_stale_inode(struct pnode *pno)
77 {
78         struct inode *inode = pno->p_base->pb_ino;
79         ENTRY;
80
81         LASSERT(inode);
82         LASSERT(llu_i2info(inode)->lli_stale_flag);
83
84         pno->p_base->pb_ino = NULL;
85         I_RELE(inode);
86
87         if (!llu_i2info(inode)->lli_open_count) {
88                 CDEBUG(D_INODE, "unhook inode %p (ino %lu) from pno %p\n",
89                                 inode, llu_i2info(inode)->lli_st_ino, pno);
90                 if (!inode->i_ref)
91                         _sysio_i_gone(inode);
92         }
93
94         EXIT;
95         return;
96 }
97
98 void llu_lookup_finish_locks(struct lookup_intent *it, struct pnode *pnode)
99 {
100         LASSERT(it);
101         LASSERT(pnode);
102
103         if (it && pnode->p_base->pb_ino != NULL) {
104                 struct inode *inode = pnode->p_base->pb_ino;
105                 CDEBUG(D_DLMTRACE, "setting l_data to inode %p (%lu/%lu)\n",
106                        inode, llu_i2info(inode)->lli_st_ino,
107                        llu_i2info(inode)->lli_st_generation);
108                 mdc_set_lock_data(NULL, &it->d.lustre.it_lock_handle, inode);
109         }
110
111         /* drop lookup/getattr locks */
112         if (it->it_op == IT_LOOKUP || it->it_op == IT_GETATTR)
113                 ll_intent_release(it);
114
115 }
116
117 static inline void llu_invalidate_inode_pages(struct inode * inode)
118 {
119         /* do nothing */
120 }
121
122 int llu_mdc_blocking_ast(struct ldlm_lock *lock,
123                          struct ldlm_lock_desc *desc,
124                          void *data, int flag)
125 {
126         int rc;
127         struct lustre_handle lockh;
128         ENTRY;
129
130
131         switch (flag) {
132         case LDLM_CB_BLOCKING:
133                 ldlm_lock2handle(lock, &lockh);
134                 rc = ldlm_cli_cancel(&lockh);
135                 if (rc < 0) {
136                         CDEBUG(D_INODE, "ldlm_cli_cancel: %d\n", rc);
137                         RETURN(rc);
138                 }
139                 break;
140         case LDLM_CB_CANCELING: {
141                 struct inode *inode = llu_inode_from_lock(lock);
142                 struct llu_inode_info *lli;
143                 __u64 bits = lock->l_policy_data.l_inodebits.bits;
144
145                 /* Invalidate all dentries associated with this inode */
146                 if (inode == NULL)
147                         break;
148
149                 lli =  llu_i2info(inode);
150
151                 if (bits & MDS_INODELOCK_UPDATE)
152                         clear_bit(LLI_F_HAVE_MDS_SIZE_LOCK, &lli->lli_flags);
153
154                 if (lock->l_resource->lr_name.name[0] != lli->lli_st_ino ||
155                     lock->l_resource->lr_name.name[1] != lli->lli_st_generation) {
156                         LDLM_ERROR(lock, "data mismatch with ino %lu/%lu",
157                                    lli->lli_st_ino, lli->lli_st_generation);
158                 }
159                 if (S_ISDIR(lli->lli_st_mode) &&
160                     (bits & MDS_INODELOCK_UPDATE)) {
161                         CDEBUG(D_INODE, "invalidating inode %lu\n",
162                                lli->lli_st_ino);
163
164                         llu_invalidate_inode_pages(inode);
165                 }
166
167 /*
168                 if (inode->i_sb->s_root &&
169                     inode != inode->i_sb->s_root->d_inode)
170                         ll_unhash_aliases(inode);
171 */
172                 I_RELE(inode);
173                 break;
174         }
175         default:
176                 LBUG();
177         }
178
179         RETURN(0);
180 }
181
182 static int pnode_revalidate_finish(struct ptlrpc_request *req,
183                                    int offset,
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 = mdc_req2lustre_md(llu_i2sbi(inode)->ll_mdc_exp, req, offset, 
201                                llu_i2sbi(inode)->ll_osc_exp, &md);
202         if (rc)
203                 RETURN(rc);
204
205         llu_update_inode(inode, md.body, md.lsm);
206
207         RETURN(rc);
208 }
209
210 int llu_pb_revalidate(struct pnode *pnode, int flags, struct lookup_intent *it)
211 {
212         struct pnode_base *pb = pnode->p_base;
213         struct ll_fid pfid, cfid;
214         struct it_cb_data icbd;
215         struct ll_uctxt ctxt;
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                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         /* check stale inode */
234         if (llu_i2info(pb->pb_ino)->lli_stale_flag)
235                 unhook_stale_inode(pnode);
236
237         /* check again because unhook_stale_inode() might generate
238          * negative pnode */
239         if (pb->pb_ino == NULL) {
240                 CDEBUG(D_INODE, "negative pb\n");
241                 RETURN(0);
242         }
243
244         /* This is due to bad interaction with libsysio. remove this when we
245          * switched to libbsdio XXX
246          */
247         {
248                 struct llu_inode_info *lli = llu_i2info(pb->pb_ino);
249                 if (lli->lli_it) {
250                         CDEBUG(D_INODE, "inode %lu still have intent "
251                                         "%p(opc 0x%x), release it\n",
252                                         lli->lli_st_ino, lli->lli_it,
253                                         lli->lli_it->it_op);
254                         ll_intent_release(lli->lli_it);
255                         OBD_FREE(lli->lli_it, sizeof(*lli->lli_it));
256                         lli->lli_it = NULL;
257                 }
258         }
259
260         exp = llu_i2mdcexp(pb->pb_ino);
261         ll_inode2fid(&pfid, pnode->p_parent->p_base->pb_ino);
262         ll_inode2fid(&cfid, pb->pb_ino);
263         icbd.icbd_parent = pnode->p_parent->p_base->pb_ino;
264         icbd.icbd_child = pnode;
265
266         if (!it) {
267                 it = &lookup_it;
268                 it->it_op_release = ll_intent_release;
269         }
270
271         ll_i2uctxt(&ctxt, pnode->p_parent->p_base->pb_ino, pb->pb_ino);
272
273         rc = mdc_intent_lock(exp, &ctxt, &pfid,
274                              pb->pb_name.name, pb->pb_name.len,
275                              NULL, 0, &cfid, it, flags, &req,
276                              llu_mdc_blocking_ast);
277         /* If req is NULL, then mdc_intent_lock only tried to do a lock match;
278          * if all was well, it will return 1 if it found locks, 0 otherwise. */
279         if (req == NULL && rc >= 0)
280                 GOTO(out, rc);
281
282         if (rc < 0)
283                 GOTO(out, rc = 0);
284
285         rc = pnode_revalidate_finish(req, 1, it, pnode);
286         if (rc != 0) {
287                 ll_intent_release(it);
288                 GOTO(out, rc = 0);
289         }
290         rc = 1;
291
292         /* Note: ll_intent_lock may cause a callback, check this! */
293
294         if (it->it_op & IT_OPEN)
295                 LL_SAVE_INTENT(pb->pb_ino, it);
296
297  out:
298         if (req && rc == 1)
299                 ptlrpc_req_finished(req);
300         if (rc == 0) {
301                 LASSERT(pb->pb_ino);
302                 I_RELE(pb->pb_ino);
303                 pb->pb_ino = NULL;
304         } else {
305                 llu_lookup_finish_locks(it, pnode);
306                 llu_i2info(pb->pb_ino)->lli_stale_flag = 0;
307         }
308         RETURN(rc);
309 }
310
311 static int lookup_it_finish(struct ptlrpc_request *request, int offset,
312                             struct lookup_intent *it, void *data)
313 {
314         struct it_cb_data *icbd = data;
315         struct pnode *child = icbd->icbd_child;
316         struct inode *parent = icbd->icbd_parent;
317         struct llu_sb_info *sbi = llu_i2sbi(parent);
318         struct inode *inode = NULL;
319         int rc;
320
321         /* NB 1 request reference will be taken away by ll_intent_lock()
322          * when I return
323          */
324         /* FIXME: for CREAT, libsysio require the inode must be generated here
325          * currently here we don't know the whether the create is successful
326          * or failed on mds. thus blinded return -EPERM in llu_iget(). need
327          * a fix later.
328          */
329         if ((it->it_op & IT_CREAT) || !it_disposition(it, DISP_LOOKUP_NEG)) {
330                 struct lustre_md md;
331                 struct llu_inode_info *lli;
332                 ENTRY;
333
334                 rc = mdc_req2lustre_md(sbi->ll_mdc_exp, request, offset, 
335                                        sbi->ll_osc_exp, &md);
336                 if (rc)
337                         RETURN(rc);
338
339                 inode = llu_iget(parent->i_fs, &md);
340                 if (!inode || IS_ERR(inode)) {
341                         /* free the lsm if we allocated one above */
342                         if (md.lsm != NULL)
343                                 obd_free_memmd(sbi->ll_osc_exp, &md.lsm);
344                         RETURN(inode ? PTR_ERR(inode) : -ENOMEM);
345                 } else if (md.lsm != NULL &&
346                            llu_i2info(inode)->lli_smd != md.lsm) {
347                         obd_free_memmd(sbi->ll_osc_exp, &md.lsm);
348                 }
349
350                 lli = llu_i2info(inode);
351
352                 /* If this is a stat, get the authoritative file size */
353                 if (it->it_op == IT_GETATTR && S_ISREG(lli->lli_st_mode) &&
354                     lli->lli_smd != NULL) {
355                         struct lov_stripe_md *lsm = lli->lli_smd;
356                         struct ost_lvb lvb;
357                         ldlm_error_t rc;
358
359                         LASSERT(lsm->lsm_object_id != 0);
360
361                         /* bug 2334: drop MDS lock before acquiring OST lock */
362                         ll_intent_drop_lock(it);
363
364                         rc = llu_glimpse_size(inode, &lvb);
365                         if (rc) {
366                                 I_RELE(inode);
367                                 RETURN(rc);
368                         }
369                         lli->lli_st_size = lvb.lvb_size;
370                 }
371         } else {
372                 ENTRY;
373         }
374
375         /* intent will be further used in cases of open()/getattr() */
376         if (inode && (it->it_op & IT_OPEN))
377                 LL_SAVE_INTENT(inode, it);
378
379         child->p_base->pb_ino = inode;
380
381         RETURN(0);
382 }
383
384 struct inode *llu_inode_from_lock(struct ldlm_lock *lock)
385 {
386         struct inode *inode;
387         l_lock(&lock->l_resource->lr_namespace->ns_lock);
388
389         if (lock->l_ast_data) {
390                 inode = (struct inode *)lock->l_ast_data;
391                 I_REF(inode);
392         } else
393                 inode = NULL;
394
395         l_unlock(&lock->l_resource->lr_namespace->ns_lock);
396         return inode;
397 }
398
399 static int llu_lookup_it(struct inode *parent, struct pnode *pnode,
400                          struct lookup_intent *it, int flags)
401 {
402         struct ll_fid pfid;
403         struct ll_uctxt ctxt;
404         struct it_cb_data icbd;
405         struct ptlrpc_request *req = NULL;
406         struct lookup_intent lookup_it = { .it_op = IT_LOOKUP };
407         int rc;
408         ENTRY;
409
410         if (pnode->p_base->pb_name.len > EXT2_NAME_LEN)
411                 RETURN(-ENAMETOOLONG);
412
413         if (!it) {
414                 it = &lookup_it;
415                 it->it_op_release = ll_intent_release;
416         }
417
418         icbd.icbd_child = pnode;
419         icbd.icbd_parent = parent;
420         icbd.icbd_child = pnode;
421         ll_inode2fid(&pfid, parent);
422         ll_i2uctxt(&ctxt, parent, NULL);
423
424         rc = mdc_intent_lock(llu_i2mdcexp(parent), &ctxt, &pfid,
425                              pnode->p_base->pb_name.name,
426                              pnode->p_base->pb_name.len,
427                              NULL, 0, NULL, it, flags, &req,
428                              llu_mdc_blocking_ast);
429         if (rc < 0)
430                 GOTO(out, rc);
431         
432         rc = lookup_it_finish(req, 1, it, &icbd);
433         if (rc != 0) {
434                 ll_intent_release(it);
435                 GOTO(out, rc);
436         }
437
438         llu_lookup_finish_locks(it, pnode);
439
440  out:
441         if (req)
442                 ptlrpc_req_finished(req);
443         return rc;
444 }
445
446 static struct lookup_intent*
447 translate_lookup_intent(struct intent *intent, const char *path)
448 {
449         struct lookup_intent *it;
450         int fmode;
451
452         /* libsysio trick */
453         if (!intent || path) {
454                 CDEBUG(D_VFSTRACE, "not intent needed\n");
455                 return NULL;
456         }
457
458         OBD_ALLOC(it, sizeof(*it));
459         LASSERT(it);
460
461         memset(it, 0, sizeof(*it));
462
463         /* libsysio will assign intent like following:
464          * NOTE: INT_CREAT has include INT_UPDPARENT
465          *
466          * open: INT_OPEN [| INT_CREAT]
467          * mkdir: INT_CREAT
468          * symlink: INT_CREAT
469          * unlink: INT_UPDPARENT
470          * rmdir: INT_UPDPARENT
471          * mknod: INT_CREAT
472          * stat: INT_GETATTR
473          * setattr: NULL
474          *
475          * following logic is adjusted for libsysio
476          */
477
478         it->it_flags = intent->int_arg2 ? *((int*)intent->int_arg2) : 0;
479
480         if (intent->int_opmask & INT_OPEN) {
481                 it->it_op |= IT_OPEN;
482
483                 /* convert access mode from O_ to FMODE_ */
484                 if (it->it_flags & O_WRONLY)
485                         fmode = FMODE_WRITE;
486                 else if (it->it_flags & O_RDWR)
487                         fmode = FMODE_READ | FMODE_WRITE;
488                 else
489                         fmode = FMODE_READ;
490                 it->it_flags &= ~O_ACCMODE;
491                 it->it_flags |= fmode;
492         }
493
494         /* XXX libsysio has strange code on intent handling,
495          * more check later */
496         if (it->it_flags & O_CREAT) {
497                 it->it_op |= IT_CREAT;
498                 it->it_create_mode = *((int*)intent->int_arg1);
499         }
500
501         if (intent->int_opmask & INT_GETATTR)
502                 it->it_op |= IT_GETATTR;
503
504         LASSERT(!(intent->int_opmask & INT_SETATTR));
505
506         /* libsysio is different to linux vfs when doing unlink/rmdir,
507          * INT_UPDPARENT was passed down during name resolution. Here
508          * we treat it as normal lookup, later unlink()/rmdir() will
509          * do the actual work */
510
511         /* conform to kernel code, if only IT_LOOKUP was set, don't
512          * pass down it */
513         if (!it->it_op || it->it_op == IT_LOOKUP) {
514                 OBD_FREE(it, sizeof(*it));
515                 it = NULL;
516         }
517         if (it)
518                 it->it_op_release = ll_intent_release;
519
520         CDEBUG(D_VFSTRACE, "final intent 0x%x\n", it ? it->it_op : 0);
521         return it;
522 }
523
524 int llu_iop_lookup(struct pnode *pnode,
525                    struct inode **inop,
526                    struct intent *intnt,
527                    const char *path)
528 {
529         struct lookup_intent *it;
530         int rc;
531         ENTRY;
532
533         *inop = NULL;
534
535         /* the mount root inode have no name, so don't call
536          * remote in this case. but probably we need revalidate
537          * it here? FIXME */
538         if (pnode->p_mount->mnt_root == pnode) {
539                 struct inode *i = pnode->p_base->pb_ino;
540                 *inop = i;
541                 return 0;
542         }
543
544         if (!pnode->p_base->pb_name.len)
545                 RETURN(-EINVAL);
546
547         it = translate_lookup_intent(intnt, path);
548
549         /* param flags is not used, let it be 0 */
550         if (llu_pb_revalidate(pnode, 0, it)) {
551                 LASSERT(pnode->p_base->pb_ino);
552                 *inop = pnode->p_base->pb_ino;
553                 RETURN(0);
554         }
555
556         rc = llu_lookup_it(pnode->p_parent->p_base->pb_ino, pnode, it, 0);
557         if (!rc) {
558                 if (!pnode->p_base->pb_ino)
559                         rc = -ENOENT;
560                 else
561                         *inop = pnode->p_base->pb_ino;
562         }
563
564         RETURN(rc);
565 }
566