Whamcloud - gitweb
Fix one build error, one build warning, and one extremely scary
[fs/lustre-release.git] / lustre / llite / namei.c
1 /* -*- mode: c; c-basic-offset: 8; indent-tabs-mode: nil; -*-
2  * vim:expandtab:shiftwidth=8:tabstop=8:
3  *
4  * This code is issued under the GNU General Public License.
5  * See the file COPYING in this distribution
6  *
7  * Copyright (C) 1992, 1993, 1994, 1995
8  * Remy Card (card@masi.ibp.fr)
9  * Laboratoire MASI - Institut Blaise Pascal
10  * Universite Pierre et Marie Curie (Paris VI)
11  *
12  *  from
13  *
14  *  linux/fs/ext2/namei.c
15  *
16  *  Copyright (C) 1991, 1992  Linus Torvalds
17  *
18  *  Big-endian to little-endian byte-swapping/bitmaps by
19  *        David S. Miller (davem@caip.rutgers.edu), 1995
20  *  Directory entry file type support and forward compatibility hooks
21  *      for B-tree directories by Theodore Ts'o (tytso@mit.edu), 1998
22  *
23  *  Changes for use in OBDFS
24  *  Copyright (c) 1999, Seagate Technology Inc.
25  *  Copyright (C) 2001, Cluster File Systems, Inc.
26  *                       Rewritten based on recent ext2 page cache use.
27  *
28  */
29
30 #include <linux/fs.h>
31 #include <linux/locks.h>
32 #include <linux/quotaops.h>
33
34 #define DEBUG_SUBSYSTEM S_LLITE
35
36 #include <linux/obd_support.h>
37 #include <linux/lustre_lite.h>
38 #include <linux/lustre_dlm.h>
39 extern struct address_space_operations ll_aops;
40
41 /* from super.c */
42 extern void ll_change_inode(struct inode *inode);
43 extern int ll_setattr(struct dentry *de, struct iattr *attr);
44
45 /* from dir.c */
46 extern int ll_add_link (struct dentry *dentry, struct inode *inode);
47 ino_t ll_inode_by_name(struct inode * dir, struct dentry *dentry, int *typ);
48 int ext2_make_empty(struct inode *inode, struct inode *parent);
49 struct ext2_dir_entry_2 * ext2_find_entry (struct inode * dir,
50                    struct dentry *dentry, struct page ** res_page);
51 int ext2_delete_entry (struct ext2_dir_entry_2 * dir, struct page * page );
52 int ext2_empty_dir (struct inode * inode);
53 struct ext2_dir_entry_2 * ext2_dotdot (struct inode *dir, struct page **p);
54 void ext2_set_link(struct inode *dir, struct ext2_dir_entry_2 *de,
55                    struct page *page, struct inode *inode);
56
57 /*
58  * Couple of helper functions - make the code slightly cleaner.
59  */
60 static inline void ext2_inc_count(struct inode *inode)
61 {
62         inode->i_nlink++;
63 }
64
65 /* postpone the disk update until the inode really goes away */
66 static inline void ext2_dec_count(struct inode *inode)
67 {
68         inode->i_nlink--;
69 }
70
71 static inline int ext2_add_nondir(struct dentry *dentry, struct inode *inode)
72 {
73         int err;
74         err = ll_add_link(dentry, inode);
75         if (!err) {
76                 d_instantiate(dentry, inode);
77                 return 0;
78         }
79         ext2_dec_count(inode);
80         iput(inode);
81         return err;
82 }
83
84 /* methods */
85 static int ll_find_inode(struct inode *inode, unsigned long ino, void *opaque)
86 {
87         struct mds_body *body = (struct mds_body *)opaque;
88
89         if (inode->i_generation != body->generation)
90                 return 0;
91
92         return 1;
93 }
94
95 extern struct dentry_operations ll_d_ops;
96
97 int ll_lock(struct inode *dir, struct dentry *dentry,
98             struct lookup_intent *it, struct lustre_handle *lockh)
99 {
100         struct ll_sb_info *sbi = ll_i2sbi(dir);
101         int err;
102
103         if ((it->it_op & (IT_CREAT | IT_MKDIR | IT_SYMLINK | IT_SETATTR |
104                           IT_MKNOD)) )
105                 err = mdc_enqueue(&sbi->ll_mdc_conn, LDLM_MDSINTENT,
106                                   it, LCK_PW, dir, dentry, lockh, 0, NULL, 0,
107                                   dir, sizeof(*dir));
108         else if (it->it_op & (IT_READDIR | IT_GETATTR | IT_OPEN | IT_UNLINK))
109                 err = mdc_enqueue(&sbi->ll_mdc_conn, LDLM_MDSINTENT,
110                                   it, LCK_PR, dir, dentry, lockh, 0, NULL, 0,
111                                   dir, sizeof(*dir));
112         else {
113                 LBUG();
114                 RETURN(-1);
115         }
116
117         RETURN(err);
118 }
119
120 int ll_unlock(__u32 mode, struct lustre_handle *lockh)
121 {
122         struct ldlm_lock *lock;
123         ENTRY;
124
125         lock = lustre_handle2object(lockh);
126         ldlm_lock_decref(lock, mode);
127
128         RETURN(0);
129 }
130
131 static struct dentry *ll_lookup2(struct inode * dir, struct dentry *dentry,
132                                  struct lookup_intent *it)
133 {
134         struct ptlrpc_request *request = NULL;
135         struct inode * inode = NULL;
136         struct ll_sb_info *sbi = ll_i2sbi(dir);
137         struct ll_inode_md md;
138         struct lustre_handle lockh;
139         int err, type, offset;
140         ino_t ino;
141
142         ENTRY;
143
144         CDEBUG(D_INFO, "name: %*s, intent op: %d\n", dentry->d_name.len,
145                dentry->d_name.name, it->it_op);
146
147         if (dentry->d_name.len > EXT2_NAME_LEN)
148                 RETURN(ERR_PTR(-ENAMETOOLONG));
149
150         err = ll_lock(dir, dentry, it, &lockh);
151         memcpy(it->it_lock_handle, &lockh, sizeof(lockh));
152
153         if ( (it->it_op & (IT_CREAT | IT_MKDIR | IT_SYMLINK | IT_MKNOD)) &&
154              it->it_disposition && !it->it_status)
155                 GOTO(negative, NULL);
156
157         if ( (it->it_op & (IT_GETATTR | IT_UNLINK)) &&
158              it->it_disposition && it->it_status)
159                 GOTO(negative, NULL);
160
161         if (!it->it_disposition) {
162                 struct ll_inode_info *lli = ll_i2info(dir);
163                 memcpy(&lli->lli_intent_lock_handle, &lockh, sizeof(lockh));
164
165                 ino = ll_inode_by_name(dir, dentry, &type);
166
167                 err = mdc_getattr(&sbi->ll_mdc_conn, ino, type,
168                                   OBD_MD_FLNOTOBD|OBD_MD_FLBLOCKS, 0, &request);
169                 if (err) {
170                         CERROR("failure %d inode %ld\n", err, (long)ino);
171                         ptlrpc_free_req(request);
172                         RETURN(ERR_PTR(-abs(err)));
173                 }
174                 offset = 0;
175         } else if (it->it_op == IT_UNLINK) { 
176                 struct obdo *obdo;
177                 request = (struct ptlrpc_request *)it->it_data;
178                 obdo = lustre_msg_buf(request->rq_repmsg, 1);
179                 inode = new_inode(dir->i_sb);
180                 ll_i2info(inode)->lli_obdo = obdo_alloc();
181
182                 /* XXX fix mem allocation error */
183                 memcpy(ll_i2info(inode)->lli_obdo, obdo, sizeof(*obdo));
184
185                 if (!inode) 
186                         GOTO(out_req, -ENOMEM);
187                 inode->i_mode= S_IFREG;
188                 inode->i_nlink = 1;
189                 GOTO(out_req, 0);
190         } else {
191                 struct mds_body *body;
192
193                 offset = 1;
194                 request = (struct ptlrpc_request *)it->it_data;
195                 body = lustre_msg_buf(request->rq_repmsg, 1);
196                 type = body->mode;
197                 ino = body->fid1.id;
198         }
199
200         if (S_ISREG(type)) {
201                 if (request->rq_repmsg->bufcount < offset + 2 ||
202                     request->rq_repmsg->buflens[offset + 1] !=
203                     sizeof(struct obdo))
204                         LBUG();
205
206                 md.obdo = lustre_msg_buf(request->rq_repmsg, offset + 1);
207         } else
208                 md.obdo = NULL;
209
210         md.body = lustre_msg_buf(request->rq_repmsg, offset);
211
212         inode = iget4(dir->i_sb, ino, ll_find_inode, &md);
213
214         if (it->it_op & IT_RENAME)
215                 it->it_data = dentry;
216
217  out_req:
218         ptlrpc_free_req(request);
219         if (!inode)
220                 RETURN(ERR_PTR(-ENOMEM));
221
222         EXIT;
223  negative:
224         dentry->d_op = &ll_d_ops;
225         d_add(dentry, inode);
226         return NULL;
227 }
228
229 static struct inode *ll_create_node(struct inode *dir, const char *name,
230                                     int namelen, const char *tgt, int tgtlen,
231                                     int mode, __u64 extra,
232                                     struct lookup_intent *it, struct obdo *obdo)
233 {
234         struct inode *inode;
235         struct ptlrpc_request *request = NULL;
236         struct mds_body *body;
237         int rc;
238         time_t time = CURRENT_TIME;
239         struct ll_sb_info *sbi = ll_i2sbi(dir);
240         int gid = current->fsgid;
241         struct ll_inode_md md;
242
243         ENTRY;
244
245         if (dir->i_mode & S_ISGID) {
246                 gid = dir->i_gid;
247                 if (S_ISDIR(mode))
248                         mode |= S_ISGID;
249         }
250
251         if (!it->it_disposition) {
252                 rc = mdc_create(&sbi->ll_mdc_conn, dir, name, namelen, tgt,
253                                  tgtlen, mode, current->fsuid,
254                                  gid, time, extra, obdo, &request);
255                 if (rc) {
256                         inode = ERR_PTR(rc);
257                         GOTO(out, rc);
258                 }
259                 body = lustre_msg_buf(request->rq_repmsg, 0);
260                 md.obdo = obdo;
261         } else {
262                 request = it->it_data;
263                 body = lustre_msg_buf(request->rq_repmsg, 1);
264                 md.obdo = NULL;
265         }
266
267         body->valid = OBD_MD_FLNOTOBD;
268
269         body->nlink = 1;
270         body->atime = body->ctime = body->mtime = time;
271         body->uid = current->fsuid;
272         body->gid = gid;
273         body->mode = mode;
274
275         md.body = body;
276
277         inode = iget4(dir->i_sb, body->ino, ll_find_inode, &md);
278         if (IS_ERR(inode)) {
279                 rc = PTR_ERR(inode);
280                 CERROR("new_inode -fatal: rc %d\n", rc);
281                 LBUG();
282                 GOTO(out, rc);
283         }
284
285         if (!list_empty(&inode->i_dentry)) {
286                 CERROR("new_inode -fatal: inode %d, ct %d lnk %d\n",
287                        body->ino, atomic_read(&inode->i_count),
288                        inode->i_nlink);
289                 iput(inode);
290                 LBUG();
291                 inode = ERR_PTR(-EIO);
292                 GOTO(out, -EIO);
293         }
294
295         EXIT;
296  out:
297         ptlrpc_free_req(request);
298         return inode;
299 }
300
301 int ll_mdc_unlink(struct inode *dir, struct inode *child,
302                   const char *name, int len)
303 {
304         struct ptlrpc_request *request = NULL;
305         int err;
306         struct ll_sb_info *sbi = ll_i2sbi(dir);
307
308         ENTRY;
309
310         err = mdc_unlink(&sbi->ll_mdc_conn, dir, child,
311                          name, len, &request);
312         ptlrpc_free_req(request);
313
314         RETURN(err);
315 }
316
317 int ll_mdc_link(struct dentry *src, struct inode *dir,
318                 const char *name, int len)
319 {
320         struct ptlrpc_request *request = NULL;
321         int err;
322         struct ll_sb_info *sbi = ll_i2sbi(dir);
323
324         ENTRY;
325
326         err = mdc_link(&sbi->ll_mdc_conn, src, dir, name,
327                        len, &request);
328         ptlrpc_free_req(request);
329
330         RETURN(err);
331 }
332
333 int ll_mdc_rename(struct inode *src, struct inode *tgt,
334                   struct dentry *old, struct dentry *new)
335 {
336         struct ptlrpc_request *request = NULL;
337         struct ll_sb_info *sbi = ll_i2sbi(src);
338         int err;
339
340         ENTRY;
341
342         err = mdc_rename(&sbi->ll_mdc_conn, src, tgt,
343                          old->d_name.name, old->d_name.len,
344                          new->d_name.name, new->d_name.len, &request);
345         ptlrpc_free_req(request);
346
347         RETURN(err);
348 }
349
350 /*
351  * By the time this is called, we already have created
352  * the directory cache entry for the new file, but it
353  * is so far negative - it has no inode.
354  *
355  * If the create succeeds, we fill in the inode information
356  * with d_instantiate().
357  */
358
359 static int ll_create(struct inode * dir, struct dentry * dentry, int mode)
360 {
361         int err, rc = 0;
362         struct obdo oa;
363         struct inode *inode;
364
365         if (dentry->d_it->it_disposition == 0) {
366                 memset(&oa, 0, sizeof(oa));
367                 oa.o_valid = OBD_MD_FLMODE;
368                 oa.o_mode = S_IFREG | 0600;
369                 rc = obd_create(ll_i2obdconn(dir), &oa);
370                 if (rc)
371                         RETURN(rc);
372         }
373
374         mode = mode | S_IFREG;
375         CDEBUG(D_DENTRY, "name %s mode %o o_id %lld\n",
376                dentry->d_name.name, mode, (unsigned long long)oa.o_id);
377         inode = ll_create_node(dir, dentry->d_name.name, dentry->d_name.len,
378                                NULL, 0, mode, 0, dentry->d_it, &oa);
379
380         if (IS_ERR(inode)) {
381                 rc = PTR_ERR(inode);
382                 CERROR("error creating MDS object for id %Ld: rc = %d\n",
383                        (unsigned long long)oa.o_id, rc);
384                 GOTO(out_destroy, rc);
385         }
386
387         if (dentry->d_it->it_disposition) {
388                 struct ll_inode_info *ii = ll_i2info(inode);
389                 ii->lli_flags |= OBD_FL_CREATEONOPEN;
390                 memcpy(&ii->lli_intent_lock_handle,
391                        dentry->d_it->it_lock_handle,
392                        sizeof(struct lustre_handle));
393         }
394
395         /* no directory data updates when intents rule */
396         if (dentry->d_it->it_disposition == 0)
397                 rc = ext2_add_nondir(dentry, inode);
398         else
399                 d_instantiate(dentry, inode);
400         RETURN(rc);
401
402 out_destroy:
403         err = obd_destroy(ll_i2obdconn(dir), &oa);
404         if (err)
405                 CERROR("error destroying object %Ld in error path: err = %d\n",
406                        (unsigned long long)oa.o_id, err);
407         return rc;
408 }
409
410 static int ll_mknod(struct inode *dir, struct dentry *dentry, int mode,
411                     int rdev)
412 {
413         struct inode * inode = ll_create_node(dir, dentry->d_name.name,
414                                               dentry->d_name.len, NULL, 0,
415                                               mode, rdev, NULL, NULL);
416         int err = PTR_ERR(inode);
417         if (!IS_ERR(inode))
418                 err = ext2_add_nondir(dentry, inode);
419         return err;
420 }
421
422 static int ll_symlink(struct inode *dir, struct dentry *dentry,
423                       const char *symname)
424 {
425         int err = -ENAMETOOLONG;
426         unsigned l = strlen(symname);
427         struct inode * inode;
428         struct ll_inode_info *oinfo;
429
430         if (l > LL_INLINESZ)
431                 return err;
432
433         inode = ll_create_node(dir, dentry->d_name.name,
434                                dentry->d_name.len, symname, l,
435                                S_IFLNK | S_IRWXUGO, 0, dentry->d_it, NULL);
436         err = PTR_ERR(inode);
437         if (IS_ERR(inode))
438                 return err;
439
440         oinfo = ll_i2info(inode);
441
442         memcpy(oinfo->lli_inline, symname, l);
443         inode->i_size = l-1;
444
445         err = ext2_add_nondir(dentry, inode);
446
447         if (err) {
448                 ext2_dec_count(inode);
449                 iput (inode);
450         }
451         return err;
452 }
453
454 static int ll_link(struct dentry * old_dentry, struct inode * dir,
455                    struct dentry *dentry)
456 {
457         int err;
458         struct inode *inode = old_dentry->d_inode;
459
460         if (S_ISDIR(inode->i_mode))
461                 return -EPERM;
462
463         if (inode->i_nlink >= EXT2_LINK_MAX)
464                 return -EMLINK;
465
466         err = ll_mdc_link(old_dentry, dir,
467                           dentry->d_name.name, dentry->d_name.len);
468         if (err) {
469                 EXIT;
470                 return err;
471         }
472
473         inode->i_ctime = CURRENT_TIME;
474         ext2_inc_count(inode);
475         atomic_inc(&inode->i_count);
476
477         return ext2_add_nondir(dentry, inode);
478 }
479
480 static int ll_mkdir(struct inode * dir, struct dentry * dentry, int mode)
481 {
482         struct inode * inode;
483         int err = -EMLINK;
484         ENTRY;
485
486         if (dir->i_nlink >= EXT2_LINK_MAX)
487                 goto out;
488
489         ext2_inc_count(dir);
490
491         inode = ll_create_node (dir, dentry->d_name.name,
492                                 dentry->d_name.len, NULL, 0,
493                                 S_IFDIR | mode, 0, dentry->d_it, NULL);
494         err = PTR_ERR(inode);
495         if (IS_ERR(inode))
496                 goto out_dir;
497
498         inode->i_nlink = 1;
499         ext2_inc_count(inode);
500
501         err = ext2_make_empty(inode, dir);
502         if (err)
503                 goto out_fail;
504
505         /* no directory data updates when intents rule */
506         if (dentry->d_it->it_disposition == 0) {
507                 err = ll_add_link(dentry, inode);
508                 if (err)
509                         goto out_fail;
510         }
511
512         d_instantiate(dentry, inode);
513 out:
514         EXIT;
515         return err;
516
517 out_fail:
518         ext2_dec_count(inode);
519         ext2_dec_count(inode);
520         iput(inode);
521         EXIT;
522 out_dir:
523         ext2_dec_count(dir);
524         EXIT;
525         goto out;
526 }
527
528 static int ll_unlink(struct inode * dir, struct dentry *dentry)
529 {
530         struct inode * inode = dentry->d_inode;
531         struct ext2_dir_entry_2 * de;
532         struct page * page;
533         int err = -ENOENT;
534
535         if (dentry->d_it && dentry->d_it->it_disposition) { 
536                 inode->i_nlink = 0;
537                 GOTO(out, err=0);
538         }
539
540         de = ext2_find_entry (dir, dentry, &page);
541         if (!de)
542                 goto out;
543
544         err = ll_mdc_unlink(dir, dentry->d_inode,
545                             dentry->d_name.name, dentry->d_name.len);
546         if (err)
547                 goto out;
548
549         err = ext2_delete_entry (de, page);
550         if (err)
551                 goto out;
552
553         inode->i_ctime = dir->i_ctime;
554         ext2_dec_count(inode);
555         err = 0;
556 out:
557         return err;
558 }
559
560 static int ll_rmdir(struct inode * dir, struct dentry *dentry)
561 {
562         struct inode * inode = dentry->d_inode;
563         int err = -ENOTEMPTY;
564
565         if (ext2_empty_dir(inode)) {
566                 err = ll_unlink(dir, dentry);
567                 if (!err) {
568                         inode->i_size = 0;
569                         ext2_dec_count(inode);
570                         ext2_dec_count(dir);
571                 }
572         }
573         return err;
574 }
575
576 static int ll_rename (struct inode * old_dir, struct dentry * old_dentry,
577                       struct inode * new_dir, struct dentry * new_dentry )
578 {
579         struct inode * old_inode = old_dentry->d_inode;
580         struct inode * new_inode = new_dentry->d_inode;
581         struct page * dir_page = NULL;
582         struct ext2_dir_entry_2 * dir_de = NULL;
583         struct page * old_page;
584         struct ext2_dir_entry_2 * old_de;
585         int err = -ENOENT;
586
587         if (new_dentry->d_it) {
588                 struct ptlrpc_request *req = new_dentry->d_it->it_data;
589                 err = req->rq_status;
590                 goto out;
591         }
592
593         err = ll_mdc_rename(old_dir, new_dir, old_dentry, new_dentry);
594         if (err)
595                 goto out;
596
597         old_de = ext2_find_entry (old_dir, old_dentry, &old_page);
598         if (!old_de)
599                 goto out;
600
601         if (S_ISDIR(old_inode->i_mode)) {
602                 err = -EIO;
603                 dir_de = ext2_dotdot(old_inode, &dir_page);
604                 if (!dir_de)
605                         goto out_old;
606         }
607
608         if (new_inode) {
609                 struct page *new_page;
610                 struct ext2_dir_entry_2 *new_de;
611
612                 err = -ENOTEMPTY;
613                 if (dir_de && !ext2_empty_dir (new_inode))
614                         goto out_dir;
615
616                 err = -ENOENT;
617                 new_de = ext2_find_entry (new_dir, new_dentry, &new_page);
618                 if (!new_de)
619                         goto out_dir;
620                 ext2_inc_count(old_inode);
621                 ext2_set_link(new_dir, new_de, new_page, old_inode);
622                 new_inode->i_ctime = CURRENT_TIME;
623                 if (dir_de)
624                         new_inode->i_nlink--;
625                 ext2_dec_count(new_inode);
626         } else {
627                 if (dir_de) {
628                         err = -EMLINK;
629                         if (new_dir->i_nlink >= EXT2_LINK_MAX)
630                                 goto out_dir;
631                 }
632                 ext2_inc_count(old_inode);
633                 err = ll_add_link(new_dentry, old_inode);
634                 if (err) {
635                         ext2_dec_count(old_inode);
636                         goto out_dir;
637                 }
638                 if (dir_de)
639                         ext2_inc_count(new_dir);
640         }
641
642         ext2_delete_entry (old_de, old_page);
643         ext2_dec_count(old_inode);
644
645         if (dir_de) {
646                 ext2_set_link(old_inode, dir_de, dir_page, new_dir);
647                 ext2_dec_count(old_dir);
648         }
649         return 0;
650
651 out_dir:
652         if (dir_de) {
653                 kunmap(dir_page);
654                 page_cache_release(dir_page);
655         }
656 out_old:
657         kunmap(old_page);
658         page_cache_release(old_page);
659 out:
660         return err;
661 }
662
663 struct inode_operations ll_dir_inode_operations = {
664         create:         ll_create,
665         lookup2:        ll_lookup2,
666         link:           ll_link,
667         unlink:         ll_unlink,
668         symlink:        ll_symlink,
669         mkdir:          ll_mkdir,
670         rmdir:          ll_rmdir,
671         mknod:          ll_mknod,
672         rename:         ll_rename,
673         setattr:        ll_setattr
674 };