ftp://ftp.kernel.org/pub/linux/kernel/v2.6/linux-2.6.6.tar.bz2
[linux-2.6.git] / fs / ext2 / dir.c
1 /*
2  *  linux/fs/ext2/dir.c
3  *
4  * Copyright (C) 1992, 1993, 1994, 1995
5  * Remy Card (card@masi.ibp.fr)
6  * Laboratoire MASI - Institut Blaise Pascal
7  * Universite Pierre et Marie Curie (Paris VI)
8  *
9  *  from
10  *
11  *  linux/fs/minix/dir.c
12  *
13  *  Copyright (C) 1991, 1992  Linus Torvalds
14  *
15  *  ext2 directory handling functions
16  *
17  *  Big-endian to little-endian byte-swapping/bitmaps by
18  *        David S. Miller (davem@caip.rutgers.edu), 1995
19  *
20  * All code that works with directory layout had been switched to pagecache
21  * and moved here. AV
22  */
23
24 #include "ext2.h"
25 #include <linux/pagemap.h>
26 #include <linux/smp_lock.h>
27
28 typedef struct ext2_dir_entry_2 ext2_dirent;
29
30 /*
31  * ext2 uses block-sized chunks. Arguably, sector-sized ones would be
32  * more robust, but we have what we have
33  */
34 static inline unsigned ext2_chunk_size(struct inode *inode)
35 {
36         return inode->i_sb->s_blocksize;
37 }
38
39 static inline void ext2_put_page(struct page *page)
40 {
41         kunmap(page);
42         page_cache_release(page);
43 }
44
45 static inline unsigned long dir_pages(struct inode *inode)
46 {
47         return (inode->i_size+PAGE_CACHE_SIZE-1)>>PAGE_CACHE_SHIFT;
48 }
49
50 /*
51  * Return the offset into page `page_nr' of the last valid
52  * byte in that page, plus one.
53  */
54 static unsigned
55 ext2_last_byte(struct inode *inode, unsigned long page_nr)
56 {
57         unsigned last_byte = inode->i_size;
58
59         last_byte -= page_nr << PAGE_CACHE_SHIFT;
60         if (last_byte > PAGE_CACHE_SIZE)
61                 last_byte = PAGE_CACHE_SIZE;
62         return last_byte;
63 }
64
65 static int ext2_commit_chunk(struct page *page, unsigned from, unsigned to)
66 {
67         struct inode *dir = page->mapping->host;
68         int err = 0;
69         dir->i_version++;
70         page->mapping->a_ops->commit_write(NULL, page, from, to);
71         if (IS_DIRSYNC(dir))
72                 err = write_one_page(page, 1);
73         else
74                 unlock_page(page);
75         return err;
76 }
77
78 static void ext2_check_page(struct page *page)
79 {
80         struct inode *dir = page->mapping->host;
81         struct super_block *sb = dir->i_sb;
82         unsigned chunk_size = ext2_chunk_size(dir);
83         char *kaddr = page_address(page);
84         u32 max_inumber = le32_to_cpu(EXT2_SB(sb)->s_es->s_inodes_count);
85         unsigned offs, rec_len;
86         unsigned limit = PAGE_CACHE_SIZE;
87         ext2_dirent *p;
88         char *error;
89
90         if ((dir->i_size >> PAGE_CACHE_SHIFT) == page->index) {
91                 limit = dir->i_size & ~PAGE_CACHE_MASK;
92                 if (limit & (chunk_size - 1))
93                         goto Ebadsize;
94                 if (!limit)
95                         goto out;
96         }
97         for (offs = 0; offs <= limit - EXT2_DIR_REC_LEN(1); offs += rec_len) {
98                 p = (ext2_dirent *)(kaddr + offs);
99                 rec_len = le16_to_cpu(p->rec_len);
100
101                 if (rec_len < EXT2_DIR_REC_LEN(1))
102                         goto Eshort;
103                 if (rec_len & 3)
104                         goto Ealign;
105                 if (rec_len < EXT2_DIR_REC_LEN(p->name_len))
106                         goto Enamelen;
107                 if (((offs + rec_len - 1) ^ offs) & ~(chunk_size-1))
108                         goto Espan;
109                 if (le32_to_cpu(p->inode) > max_inumber)
110                         goto Einumber;
111         }
112         if (offs != limit)
113                 goto Eend;
114 out:
115         SetPageChecked(page);
116         return;
117
118         /* Too bad, we had an error */
119
120 Ebadsize:
121         ext2_error(sb, "ext2_check_page",
122                 "size of directory #%lu is not a multiple of chunk size",
123                 dir->i_ino
124         );
125         goto fail;
126 Eshort:
127         error = "rec_len is smaller than minimal";
128         goto bad_entry;
129 Ealign:
130         error = "unaligned directory entry";
131         goto bad_entry;
132 Enamelen:
133         error = "rec_len is too small for name_len";
134         goto bad_entry;
135 Espan:
136         error = "directory entry across blocks";
137         goto bad_entry;
138 Einumber:
139         error = "inode out of bounds";
140 bad_entry:
141         ext2_error (sb, "ext2_check_page", "bad entry in directory #%lu: %s - "
142                 "offset=%lu, inode=%lu, rec_len=%d, name_len=%d",
143                 dir->i_ino, error, (page->index<<PAGE_CACHE_SHIFT)+offs,
144                 (unsigned long) le32_to_cpu(p->inode),
145                 rec_len, p->name_len);
146         goto fail;
147 Eend:
148         p = (ext2_dirent *)(kaddr + offs);
149         ext2_error (sb, "ext2_check_page",
150                 "entry in directory #%lu spans the page boundary"
151                 "offset=%lu, inode=%lu",
152                 dir->i_ino, (page->index<<PAGE_CACHE_SHIFT)+offs,
153                 (unsigned long) le32_to_cpu(p->inode));
154 fail:
155         SetPageChecked(page);
156         SetPageError(page);
157 }
158
159 static struct page * ext2_get_page(struct inode *dir, unsigned long n)
160 {
161         struct address_space *mapping = dir->i_mapping;
162         struct page *page = read_cache_page(mapping, n,
163                                 (filler_t*)mapping->a_ops->readpage, NULL);
164         if (!IS_ERR(page)) {
165                 wait_on_page_locked(page);
166                 kmap(page);
167                 if (!PageUptodate(page))
168                         goto fail;
169                 if (!PageChecked(page))
170                         ext2_check_page(page);
171                 if (PageError(page))
172                         goto fail;
173         }
174         return page;
175
176 fail:
177         ext2_put_page(page);
178         return ERR_PTR(-EIO);
179 }
180
181 /*
182  * NOTE! unlike strncmp, ext2_match returns 1 for success, 0 for failure.
183  *
184  * len <= EXT2_NAME_LEN and de != NULL are guaranteed by caller.
185  */
186 static inline int ext2_match (int len, const char * const name,
187                                         struct ext2_dir_entry_2 * de)
188 {
189         if (len != de->name_len)
190                 return 0;
191         if (!de->inode)
192                 return 0;
193         return !memcmp(name, de->name, len);
194 }
195
196 /*
197  * p is at least 6 bytes before the end of page
198  */
199 static inline ext2_dirent *ext2_next_entry(ext2_dirent *p)
200 {
201         return (ext2_dirent *)((char*)p + le16_to_cpu(p->rec_len));
202 }
203
204 static inline unsigned 
205 ext2_validate_entry(char *base, unsigned offset, unsigned mask)
206 {
207         ext2_dirent *de = (ext2_dirent*)(base + offset);
208         ext2_dirent *p = (ext2_dirent*)(base + (offset&mask));
209         while ((char*)p < (char*)de) {
210                 if (p->rec_len == 0)
211                         break;
212                 p = ext2_next_entry(p);
213         }
214         return (char *)p - base;
215 }
216
217 static unsigned char ext2_filetype_table[EXT2_FT_MAX] = {
218         [EXT2_FT_UNKNOWN]       = DT_UNKNOWN,
219         [EXT2_FT_REG_FILE]      = DT_REG,
220         [EXT2_FT_DIR]           = DT_DIR,
221         [EXT2_FT_CHRDEV]        = DT_CHR,
222         [EXT2_FT_BLKDEV]        = DT_BLK,
223         [EXT2_FT_FIFO]          = DT_FIFO,
224         [EXT2_FT_SOCK]          = DT_SOCK,
225         [EXT2_FT_SYMLINK]       = DT_LNK,
226 };
227
228 #define S_SHIFT 12
229 static unsigned char ext2_type_by_mode[S_IFMT >> S_SHIFT] = {
230         [S_IFREG >> S_SHIFT]    = EXT2_FT_REG_FILE,
231         [S_IFDIR >> S_SHIFT]    = EXT2_FT_DIR,
232         [S_IFCHR >> S_SHIFT]    = EXT2_FT_CHRDEV,
233         [S_IFBLK >> S_SHIFT]    = EXT2_FT_BLKDEV,
234         [S_IFIFO >> S_SHIFT]    = EXT2_FT_FIFO,
235         [S_IFSOCK >> S_SHIFT]   = EXT2_FT_SOCK,
236         [S_IFLNK >> S_SHIFT]    = EXT2_FT_SYMLINK,
237 };
238
239 static inline void ext2_set_de_type(ext2_dirent *de, struct inode *inode)
240 {
241         mode_t mode = inode->i_mode;
242         if (EXT2_HAS_INCOMPAT_FEATURE(inode->i_sb, EXT2_FEATURE_INCOMPAT_FILETYPE))
243                 de->file_type = ext2_type_by_mode[(mode & S_IFMT)>>S_SHIFT];
244         else
245                 de->file_type = 0;
246 }
247
248 static int
249 ext2_readdir (struct file * filp, void * dirent, filldir_t filldir)
250 {
251         loff_t pos = filp->f_pos;
252         struct inode *inode = filp->f_dentry->d_inode;
253         struct super_block *sb = inode->i_sb;
254         unsigned offset = pos & ~PAGE_CACHE_MASK;
255         unsigned long n = pos >> PAGE_CACHE_SHIFT;
256         unsigned long npages = dir_pages(inode);
257         unsigned chunk_mask = ~(ext2_chunk_size(inode)-1);
258         unsigned char *types = NULL;
259         int need_revalidate = (filp->f_version != inode->i_version);
260         int ret = 0;
261
262         if (pos > inode->i_size - EXT2_DIR_REC_LEN(1))
263                 goto done;
264
265         if (EXT2_HAS_INCOMPAT_FEATURE(sb, EXT2_FEATURE_INCOMPAT_FILETYPE))
266                 types = ext2_filetype_table;
267
268         for ( ; n < npages; n++, offset = 0) {
269                 char *kaddr, *limit;
270                 ext2_dirent *de;
271                 struct page *page = ext2_get_page(inode, n);
272
273                 if (IS_ERR(page))
274                         continue;
275                 kaddr = page_address(page);
276                 if (need_revalidate) {
277                         offset = ext2_validate_entry(kaddr, offset, chunk_mask);
278                         need_revalidate = 0;
279                 }
280                 de = (ext2_dirent *)(kaddr+offset);
281                 limit = kaddr + ext2_last_byte(inode, n) - EXT2_DIR_REC_LEN(1);
282                 for ( ;(char*)de <= limit; de = ext2_next_entry(de)) {
283                         if (de->rec_len == 0) {
284                                 ext2_error(sb, __FUNCTION__,
285                                         "zero-length directory entry");
286                                 ret = -EIO;
287                                 ext2_put_page(page);
288                                 goto done;
289                         }
290                         if (de->inode) {
291                                 int over;
292                                 unsigned char d_type = DT_UNKNOWN;
293
294                                 if (types && de->file_type < EXT2_FT_MAX)
295                                         d_type = types[de->file_type];
296
297                                 offset = (char *)de - kaddr;
298                                 over = filldir(dirent, de->name, de->name_len,
299                                                 (n<<PAGE_CACHE_SHIFT) | offset,
300                                                 le32_to_cpu(de->inode), d_type);
301                                 if (over) {
302                                         ext2_put_page(page);
303                                         goto done;
304                                 }
305                         }
306                 }
307                 ext2_put_page(page);
308         }
309
310 done:
311         filp->f_pos = (n << PAGE_CACHE_SHIFT) | offset;
312         filp->f_version = inode->i_version;
313         return 0;
314 }
315
316 /*
317  *      ext2_find_entry()
318  *
319  * finds an entry in the specified directory with the wanted name. It
320  * returns the page in which the entry was found, and the entry itself
321  * (as a parameter - res_dir). Page is returned mapped and unlocked.
322  * Entry is guaranteed to be valid.
323  */
324 struct ext2_dir_entry_2 * ext2_find_entry (struct inode * dir,
325                         struct dentry *dentry, struct page ** res_page)
326 {
327         const char *name = dentry->d_name.name;
328         int namelen = dentry->d_name.len;
329         unsigned reclen = EXT2_DIR_REC_LEN(namelen);
330         unsigned long start, n;
331         unsigned long npages = dir_pages(dir);
332         struct page *page = NULL;
333         struct ext2_inode_info *ei = EXT2_I(dir);
334         ext2_dirent * de;
335
336         if (npages == 0)
337                 goto out;
338
339         /* OFFSET_CACHE */
340         *res_page = NULL;
341
342         start = ei->i_dir_start_lookup;
343         if (start >= npages)
344                 start = 0;
345         n = start;
346         do {
347                 char *kaddr;
348                 page = ext2_get_page(dir, n);
349                 if (!IS_ERR(page)) {
350                         kaddr = page_address(page);
351                         de = (ext2_dirent *) kaddr;
352                         kaddr += ext2_last_byte(dir, n) - reclen;
353                         while ((char *) de <= kaddr) {
354                                 if (de->rec_len == 0) {
355                                         ext2_error(dir->i_sb, __FUNCTION__,
356                                                 "zero-length directory entry");
357                                         ext2_put_page(page);
358                                         goto out;
359                                 }
360                                 if (ext2_match (namelen, name, de))
361                                         goto found;
362                                 de = ext2_next_entry(de);
363                         }
364                         ext2_put_page(page);
365                 }
366                 if (++n >= npages)
367                         n = 0;
368         } while (n != start);
369 out:
370         return NULL;
371
372 found:
373         *res_page = page;
374         ei->i_dir_start_lookup = n;
375         return de;
376 }
377
378 struct ext2_dir_entry_2 * ext2_dotdot (struct inode *dir, struct page **p)
379 {
380         struct page *page = ext2_get_page(dir, 0);
381         ext2_dirent *de = NULL;
382
383         if (!IS_ERR(page)) {
384                 de = ext2_next_entry((ext2_dirent *) page_address(page));
385                 *p = page;
386         }
387         return de;
388 }
389
390 ino_t ext2_inode_by_name(struct inode * dir, struct dentry *dentry)
391 {
392         ino_t res = 0;
393         struct ext2_dir_entry_2 * de;
394         struct page *page;
395         
396         de = ext2_find_entry (dir, dentry, &page);
397         if (de) {
398                 res = le32_to_cpu(de->inode);
399                 kunmap(page);
400                 page_cache_release(page);
401         }
402         return res;
403 }
404
405 /* Releases the page */
406 void ext2_set_link(struct inode *dir, struct ext2_dir_entry_2 *de,
407                         struct page *page, struct inode *inode)
408 {
409         unsigned from = (char *) de - (char *) page_address(page);
410         unsigned to = from + le16_to_cpu(de->rec_len);
411         int err;
412
413         lock_page(page);
414         err = page->mapping->a_ops->prepare_write(NULL, page, from, to);
415         if (err)
416                 BUG();
417         de->inode = cpu_to_le32(inode->i_ino);
418         ext2_set_de_type (de, inode);
419         err = ext2_commit_chunk(page, from, to);
420         ext2_put_page(page);
421         dir->i_mtime = dir->i_ctime = CURRENT_TIME;
422         EXT2_I(dir)->i_flags &= ~EXT2_BTREE_FL;
423         mark_inode_dirty(dir);
424 }
425
426 /*
427  *      Parent is locked.
428  */
429 int ext2_add_link (struct dentry *dentry, struct inode *inode)
430 {
431         struct inode *dir = dentry->d_parent->d_inode;
432         const char *name = dentry->d_name.name;
433         int namelen = dentry->d_name.len;
434         unsigned chunk_size = ext2_chunk_size(dir);
435         unsigned reclen = EXT2_DIR_REC_LEN(namelen);
436         unsigned short rec_len, name_len;
437         struct page *page = NULL;
438         ext2_dirent * de;
439         unsigned long npages = dir_pages(dir);
440         unsigned long n;
441         char *kaddr;
442         unsigned from, to;
443         int err;
444
445         /*
446          * We take care of directory expansion in the same loop.
447          * This code plays outside i_size, so it locks the page
448          * to protect that region.
449          */
450         for (n = 0; n <= npages; n++) {
451                 char *dir_end;
452
453                 page = ext2_get_page(dir, n);
454                 err = PTR_ERR(page);
455                 if (IS_ERR(page))
456                         goto out;
457                 lock_page(page);
458                 kaddr = page_address(page);
459                 dir_end = kaddr + ext2_last_byte(dir, n);
460                 de = (ext2_dirent *)kaddr;
461                 kaddr += PAGE_CACHE_SIZE - reclen;
462                 while ((char *)de <= kaddr) {
463                         if ((char *)de == dir_end) {
464                                 /* We hit i_size */
465                                 name_len = 0;
466                                 rec_len = chunk_size;
467                                 de->rec_len = cpu_to_le16(chunk_size);
468                                 de->inode = 0;
469                                 goto got_it;
470                         }
471                         if (de->rec_len == 0) {
472                                 ext2_error(dir->i_sb, __FUNCTION__,
473                                         "zero-length directory entry");
474                                 err = -EIO;
475                                 goto out_unlock;
476                         }
477                         err = -EEXIST;
478                         if (ext2_match (namelen, name, de))
479                                 goto out_unlock;
480                         name_len = EXT2_DIR_REC_LEN(de->name_len);
481                         rec_len = le16_to_cpu(de->rec_len);
482                         if (!de->inode && rec_len >= reclen)
483                                 goto got_it;
484                         if (rec_len >= name_len + reclen)
485                                 goto got_it;
486                         de = (ext2_dirent *) ((char *) de + rec_len);
487                 }
488                 unlock_page(page);
489                 ext2_put_page(page);
490         }
491         BUG();
492         return -EINVAL;
493
494 got_it:
495         from = (char*)de - (char*)page_address(page);
496         to = from + rec_len;
497         err = page->mapping->a_ops->prepare_write(NULL, page, from, to);
498         if (err)
499                 goto out_unlock;
500         if (de->inode) {
501                 ext2_dirent *de1 = (ext2_dirent *) ((char *) de + name_len);
502                 de1->rec_len = cpu_to_le16(rec_len - name_len);
503                 de->rec_len = cpu_to_le16(name_len);
504                 de = de1;
505         }
506         de->name_len = namelen;
507         memcpy (de->name, name, namelen);
508         de->inode = cpu_to_le32(inode->i_ino);
509         ext2_set_de_type (de, inode);
510         err = ext2_commit_chunk(page, from, to);
511         dir->i_mtime = dir->i_ctime = CURRENT_TIME;
512         EXT2_I(dir)->i_flags &= ~EXT2_BTREE_FL;
513         mark_inode_dirty(dir);
514         /* OFFSET_CACHE */
515 out_put:
516         ext2_put_page(page);
517 out:
518         return err;
519 out_unlock:
520         unlock_page(page);
521         goto out_put;
522 }
523
524 /*
525  * ext2_delete_entry deletes a directory entry by merging it with the
526  * previous entry. Page is up-to-date. Releases the page.
527  */
528 int ext2_delete_entry (struct ext2_dir_entry_2 * dir, struct page * page )
529 {
530         struct address_space *mapping = page->mapping;
531         struct inode *inode = mapping->host;
532         char *kaddr = page_address(page);
533         unsigned from = ((char*)dir - kaddr) & ~(ext2_chunk_size(inode)-1);
534         unsigned to = ((char*)dir - kaddr) + le16_to_cpu(dir->rec_len);
535         ext2_dirent * pde = NULL;
536         ext2_dirent * de = (ext2_dirent *) (kaddr + from);
537         int err;
538
539         while ((char*)de < (char*)dir) {
540                 if (de->rec_len == 0) {
541                         ext2_error(inode->i_sb, __FUNCTION__,
542                                 "zero-length directory entry");
543                         err = -EIO;
544                         goto out;
545                 }
546                 pde = de;
547                 de = ext2_next_entry(de);
548         }
549         if (pde)
550                 from = (char*)pde - (char*)page_address(page);
551         lock_page(page);
552         err = mapping->a_ops->prepare_write(NULL, page, from, to);
553         if (err)
554                 BUG();
555         if (pde)
556                 pde->rec_len = cpu_to_le16(to-from);
557         dir->inode = 0;
558         err = ext2_commit_chunk(page, from, to);
559         inode->i_ctime = inode->i_mtime = CURRENT_TIME;
560         EXT2_I(inode)->i_flags &= ~EXT2_BTREE_FL;
561         mark_inode_dirty(inode);
562 out:
563         ext2_put_page(page);
564         return err;
565 }
566
567 /*
568  * Set the first fragment of directory.
569  */
570 int ext2_make_empty(struct inode *inode, struct inode *parent)
571 {
572         struct address_space *mapping = inode->i_mapping;
573         struct page *page = grab_cache_page(mapping, 0);
574         unsigned chunk_size = ext2_chunk_size(inode);
575         struct ext2_dir_entry_2 * de;
576         int err;
577         void *kaddr;
578
579         if (!page)
580                 return -ENOMEM;
581         err = mapping->a_ops->prepare_write(NULL, page, 0, chunk_size);
582         if (err) {
583                 unlock_page(page);
584                 goto fail;
585         }
586         kaddr = kmap_atomic(page, KM_USER0);
587         de = (struct ext2_dir_entry_2 *)kaddr;
588         de->name_len = 1;
589         de->rec_len = cpu_to_le16(EXT2_DIR_REC_LEN(1));
590         memcpy (de->name, ".\0\0", 4);
591         de->inode = cpu_to_le32(inode->i_ino);
592         ext2_set_de_type (de, inode);
593
594         de = (struct ext2_dir_entry_2 *)(kaddr + EXT2_DIR_REC_LEN(1));
595         de->name_len = 2;
596         de->rec_len = cpu_to_le16(chunk_size - EXT2_DIR_REC_LEN(1));
597         de->inode = cpu_to_le32(parent->i_ino);
598         memcpy (de->name, "..\0", 4);
599         ext2_set_de_type (de, inode);
600         kunmap_atomic(kaddr, KM_USER0);
601         err = ext2_commit_chunk(page, 0, chunk_size);
602 fail:
603         page_cache_release(page);
604         return err;
605 }
606
607 /*
608  * routine to check that the specified directory is empty (for rmdir)
609  */
610 int ext2_empty_dir (struct inode * inode)
611 {
612         struct page *page = NULL;
613         unsigned long i, npages = dir_pages(inode);
614
615         for (i = 0; i < npages; i++) {
616                 char *kaddr;
617                 ext2_dirent * de;
618                 page = ext2_get_page(inode, i);
619
620                 if (IS_ERR(page))
621                         continue;
622
623                 kaddr = page_address(page);
624                 de = (ext2_dirent *)kaddr;
625                 kaddr += ext2_last_byte(inode, i) - EXT2_DIR_REC_LEN(1);
626
627                 while ((char *)de <= kaddr) {
628                         if (de->rec_len == 0) {
629                                 ext2_error(inode->i_sb, __FUNCTION__,
630                                         "zero-length directory entry");
631                                 printk("kaddr=%p, de=%p\n", kaddr, de);
632                                 goto not_empty;
633                         }
634                         if (de->inode != 0) {
635                                 /* check for . and .. */
636                                 if (de->name[0] != '.')
637                                         goto not_empty;
638                                 if (de->name_len > 2)
639                                         goto not_empty;
640                                 if (de->name_len < 2) {
641                                         if (de->inode !=
642                                             cpu_to_le32(inode->i_ino))
643                                                 goto not_empty;
644                                 } else if (de->name[1] != '.')
645                                         goto not_empty;
646                         }
647                         de = ext2_next_entry(de);
648                 }
649                 ext2_put_page(page);
650         }
651         return 1;
652
653 not_empty:
654         ext2_put_page(page);
655         return 0;
656 }
657
658 struct file_operations ext2_dir_operations = {
659         .llseek         = generic_file_llseek,
660         .read           = generic_read_dir,
661         .readdir        = ext2_readdir,
662         .ioctl          = ext2_ioctl,
663         .fsync          = ext2_sync_file,
664 };