Merge branch 'upstream-linus' of master.kernel.org:/pub/scm/linux/kernel/git/jgarzik...
[linux-2.6] / fs / sysv / super.c
1 /*
2  *  linux/fs/sysv/inode.c
3  *
4  *  minix/inode.c
5  *  Copyright (C) 1991, 1992  Linus Torvalds
6  *
7  *  xenix/inode.c
8  *  Copyright (C) 1992  Doug Evans
9  *
10  *  coh/inode.c
11  *  Copyright (C) 1993  Pascal Haible, Bruno Haible
12  *
13  *  sysv/inode.c
14  *  Copyright (C) 1993  Paul B. Monday
15  *
16  *  sysv/inode.c
17  *  Copyright (C) 1993  Bruno Haible
18  *  Copyright (C) 1997, 1998  Krzysztof G. Baranowski
19  *
20  *  This file contains code for read/parsing the superblock.
21  */
22
23 #include <linux/module.h>
24 #include <linux/init.h>
25 #include <linux/slab.h>
26 #include <linux/buffer_head.h>
27 #include "sysv.h"
28
29 /*
30  * The following functions try to recognize specific filesystems.
31  *
32  * We recognize:
33  * - Xenix FS by its magic number.
34  * - SystemV FS by its magic number.
35  * - Coherent FS by its funny fname/fpack field.
36  * - SCO AFS by s_nfree == 0xffff
37  * - V7 FS has no distinguishing features.
38  *
39  * We discriminate among SystemV4 and SystemV2 FS by the assumption that
40  * the time stamp is not < 01-01-1980.
41  */
42
43 enum {
44         JAN_1_1980 = (10*365 + 2) * 24 * 60 * 60
45 };
46
47 static void detected_xenix(struct sysv_sb_info *sbi)
48 {
49         struct buffer_head *bh1 = sbi->s_bh1;
50         struct buffer_head *bh2 = sbi->s_bh2;
51         struct xenix_super_block * sbd1;
52         struct xenix_super_block * sbd2;
53
54         if (bh1 != bh2)
55                 sbd1 = sbd2 = (struct xenix_super_block *) bh1->b_data;
56         else {
57                 /* block size = 512, so bh1 != bh2 */
58                 sbd1 = (struct xenix_super_block *) bh1->b_data;
59                 sbd2 = (struct xenix_super_block *) (bh2->b_data - 512);
60         }
61
62         sbi->s_link_max = XENIX_LINK_MAX;
63         sbi->s_fic_size = XENIX_NICINOD;
64         sbi->s_flc_size = XENIX_NICFREE;
65         sbi->s_sbd1 = (char *)sbd1;
66         sbi->s_sbd2 = (char *)sbd2;
67         sbi->s_sb_fic_count = &sbd1->s_ninode;
68         sbi->s_sb_fic_inodes = &sbd1->s_inode[0];
69         sbi->s_sb_total_free_inodes = &sbd2->s_tinode;
70         sbi->s_bcache_count = &sbd1->s_nfree;
71         sbi->s_bcache = &sbd1->s_free[0];
72         sbi->s_free_blocks = &sbd2->s_tfree;
73         sbi->s_sb_time = &sbd2->s_time;
74         sbi->s_firstdatazone = fs16_to_cpu(sbi, sbd1->s_isize);
75         sbi->s_nzones = fs32_to_cpu(sbi, sbd1->s_fsize);
76 }
77
78 static void detected_sysv4(struct sysv_sb_info *sbi)
79 {
80         struct sysv4_super_block * sbd;
81         struct buffer_head *bh1 = sbi->s_bh1;
82         struct buffer_head *bh2 = sbi->s_bh2;
83
84         if (bh1 == bh2)
85                 sbd = (struct sysv4_super_block *) (bh1->b_data + BLOCK_SIZE/2);
86         else
87                 sbd = (struct sysv4_super_block *) bh2->b_data;
88
89         sbi->s_link_max = SYSV_LINK_MAX;
90         sbi->s_fic_size = SYSV_NICINOD;
91         sbi->s_flc_size = SYSV_NICFREE;
92         sbi->s_sbd1 = (char *)sbd;
93         sbi->s_sbd2 = (char *)sbd;
94         sbi->s_sb_fic_count = &sbd->s_ninode;
95         sbi->s_sb_fic_inodes = &sbd->s_inode[0];
96         sbi->s_sb_total_free_inodes = &sbd->s_tinode;
97         sbi->s_bcache_count = &sbd->s_nfree;
98         sbi->s_bcache = &sbd->s_free[0];
99         sbi->s_free_blocks = &sbd->s_tfree;
100         sbi->s_sb_time = &sbd->s_time;
101         sbi->s_sb_state = &sbd->s_state;
102         sbi->s_firstdatazone = fs16_to_cpu(sbi, sbd->s_isize);
103         sbi->s_nzones = fs32_to_cpu(sbi, sbd->s_fsize);
104 }
105
106 static void detected_sysv2(struct sysv_sb_info *sbi)
107 {
108         struct sysv2_super_block *sbd;
109         struct buffer_head *bh1 = sbi->s_bh1;
110         struct buffer_head *bh2 = sbi->s_bh2;
111
112         if (bh1 == bh2)
113                 sbd = (struct sysv2_super_block *) (bh1->b_data + BLOCK_SIZE/2);
114         else
115                 sbd = (struct sysv2_super_block *) bh2->b_data;
116
117         sbi->s_link_max = SYSV_LINK_MAX;
118         sbi->s_fic_size = SYSV_NICINOD;
119         sbi->s_flc_size = SYSV_NICFREE;
120         sbi->s_sbd1 = (char *)sbd;
121         sbi->s_sbd2 = (char *)sbd;
122         sbi->s_sb_fic_count = &sbd->s_ninode;
123         sbi->s_sb_fic_inodes = &sbd->s_inode[0];
124         sbi->s_sb_total_free_inodes = &sbd->s_tinode;
125         sbi->s_bcache_count = &sbd->s_nfree;
126         sbi->s_bcache = &sbd->s_free[0];
127         sbi->s_free_blocks = &sbd->s_tfree;
128         sbi->s_sb_time = &sbd->s_time;
129         sbi->s_sb_state = &sbd->s_state;
130         sbi->s_firstdatazone = fs16_to_cpu(sbi, sbd->s_isize);
131         sbi->s_nzones = fs32_to_cpu(sbi, sbd->s_fsize);
132 }
133
134 static void detected_coherent(struct sysv_sb_info *sbi)
135 {
136         struct coh_super_block * sbd;
137         struct buffer_head *bh1 = sbi->s_bh1;
138
139         sbd = (struct coh_super_block *) bh1->b_data;
140
141         sbi->s_link_max = COH_LINK_MAX;
142         sbi->s_fic_size = COH_NICINOD;
143         sbi->s_flc_size = COH_NICFREE;
144         sbi->s_sbd1 = (char *)sbd;
145         sbi->s_sbd2 = (char *)sbd;
146         sbi->s_sb_fic_count = &sbd->s_ninode;
147         sbi->s_sb_fic_inodes = &sbd->s_inode[0];
148         sbi->s_sb_total_free_inodes = &sbd->s_tinode;
149         sbi->s_bcache_count = &sbd->s_nfree;
150         sbi->s_bcache = &sbd->s_free[0];
151         sbi->s_free_blocks = &sbd->s_tfree;
152         sbi->s_sb_time = &sbd->s_time;
153         sbi->s_firstdatazone = fs16_to_cpu(sbi, sbd->s_isize);
154         sbi->s_nzones = fs32_to_cpu(sbi, sbd->s_fsize);
155 }
156
157 static void detected_v7(struct sysv_sb_info *sbi)
158 {
159         struct buffer_head *bh2 = sbi->s_bh2;
160         struct v7_super_block *sbd = (struct v7_super_block *)bh2->b_data;
161
162         sbi->s_link_max = V7_LINK_MAX;
163         sbi->s_fic_size = V7_NICINOD;
164         sbi->s_flc_size = V7_NICFREE;
165         sbi->s_sbd1 = (char *)sbd;
166         sbi->s_sbd2 = (char *)sbd;
167         sbi->s_sb_fic_count = &sbd->s_ninode;
168         sbi->s_sb_fic_inodes = &sbd->s_inode[0];
169         sbi->s_sb_total_free_inodes = &sbd->s_tinode;
170         sbi->s_bcache_count = &sbd->s_nfree;
171         sbi->s_bcache = &sbd->s_free[0];
172         sbi->s_free_blocks = &sbd->s_tfree;
173         sbi->s_sb_time = &sbd->s_time;
174         sbi->s_firstdatazone = fs16_to_cpu(sbi, sbd->s_isize);
175         sbi->s_nzones = fs32_to_cpu(sbi, sbd->s_fsize);
176 }
177
178 static int detect_xenix(struct sysv_sb_info *sbi, struct buffer_head *bh)
179 {
180         struct xenix_super_block *sbd = (struct xenix_super_block *)bh->b_data;
181         if (*(__le32 *)&sbd->s_magic == cpu_to_le32(0x2b5544))
182                 sbi->s_bytesex = BYTESEX_LE;
183         else if (*(__be32 *)&sbd->s_magic == cpu_to_be32(0x2b5544))
184                 sbi->s_bytesex = BYTESEX_BE;
185         else
186                 return 0;
187         switch (fs32_to_cpu(sbi, sbd->s_type)) {
188         case 1:
189                 sbi->s_type = FSTYPE_XENIX;
190                 return 1;
191         case 2:
192                 sbi->s_type = FSTYPE_XENIX;
193                 return 2;
194         default:
195                 return 0;
196         }
197 }
198
199 static int detect_sysv(struct sysv_sb_info *sbi, struct buffer_head *bh)
200 {
201         struct super_block *sb = sbi->s_sb;
202         /* All relevant fields are at the same offsets in R2 and R4 */
203         struct sysv4_super_block * sbd;
204         u32 type;
205
206         sbd = (struct sysv4_super_block *) (bh->b_data + BLOCK_SIZE/2);
207         if (*(__le32 *)&sbd->s_magic == cpu_to_le32(0xfd187e20))
208                 sbi->s_bytesex = BYTESEX_LE;
209         else if (*(__be32 *)&sbd->s_magic == cpu_to_be32(0xfd187e20))
210                 sbi->s_bytesex = BYTESEX_BE;
211         else
212                 return 0;
213
214         type = fs32_to_cpu(sbi, sbd->s_type);
215  
216         if (fs16_to_cpu(sbi, sbd->s_nfree) == 0xffff) {
217                 sbi->s_type = FSTYPE_AFS;
218                 sbi->s_forced_ro = 1;
219                 if (!(sb->s_flags & MS_RDONLY)) {
220                         printk("SysV FS: SCO EAFS on %s detected, " 
221                                 "forcing read-only mode.\n", 
222                                 sb->s_id);
223                 }
224                 return type;
225         }
226  
227         if (fs32_to_cpu(sbi, sbd->s_time) < JAN_1_1980) {
228                 /* this is likely to happen on SystemV2 FS */
229                 if (type > 3 || type < 1)
230                         return 0;
231                 sbi->s_type = FSTYPE_SYSV2;
232                 return type;
233         }
234         if ((type > 3 || type < 1) && (type > 0x30 || type < 0x10))
235                 return 0;
236
237         /* On Interactive Unix (ISC) Version 4.0/3.x s_type field = 0x10,
238            0x20 or 0x30 indicates that symbolic links and the 14-character
239            filename limit is gone. Due to lack of information about this
240            feature read-only mode seems to be a reasonable approach... -KGB */
241
242         if (type >= 0x10) {
243                 printk("SysV FS: can't handle long file names on %s, "
244                        "forcing read-only mode.\n", sb->s_id);
245                 sbi->s_forced_ro = 1;
246         }
247
248         sbi->s_type = FSTYPE_SYSV4;
249         return type >= 0x10 ? type >> 4 : type;
250 }
251
252 static int detect_coherent(struct sysv_sb_info *sbi, struct buffer_head *bh)
253 {
254         struct coh_super_block * sbd;
255
256         sbd = (struct coh_super_block *) (bh->b_data + BLOCK_SIZE/2);
257         if ((memcmp(sbd->s_fname,"noname",6) && memcmp(sbd->s_fname,"xxxxx ",6))
258             || (memcmp(sbd->s_fpack,"nopack",6) && memcmp(sbd->s_fpack,"xxxxx\n",6)))
259                 return 0;
260         sbi->s_bytesex = BYTESEX_PDP;
261         sbi->s_type = FSTYPE_COH;
262         return 1;
263 }
264
265 static int detect_sysv_odd(struct sysv_sb_info *sbi, struct buffer_head *bh)
266 {
267         int size = detect_sysv(sbi, bh);
268
269         return size>2 ? 0 : size;
270 }
271
272 static struct {
273         int block;
274         int (*test)(struct sysv_sb_info *, struct buffer_head *);
275 } flavours[] = {
276         {1, detect_xenix},
277         {0, detect_sysv},
278         {0, detect_coherent},
279         {9, detect_sysv_odd},
280         {15,detect_sysv_odd},
281         {18,detect_sysv},
282 };
283
284 static char *flavour_names[] = {
285         [FSTYPE_XENIX]  = "Xenix",
286         [FSTYPE_SYSV4]  = "SystemV",
287         [FSTYPE_SYSV2]  = "SystemV Release 2",
288         [FSTYPE_COH]    = "Coherent",
289         [FSTYPE_V7]     = "V7",
290         [FSTYPE_AFS]    = "AFS",
291 };
292
293 static void (*flavour_setup[])(struct sysv_sb_info *) = {
294         [FSTYPE_XENIX]  = detected_xenix,
295         [FSTYPE_SYSV4]  = detected_sysv4,
296         [FSTYPE_SYSV2]  = detected_sysv2,
297         [FSTYPE_COH]    = detected_coherent,
298         [FSTYPE_V7]     = detected_v7,
299         [FSTYPE_AFS]    = detected_sysv4,
300 };
301
302 static int complete_read_super(struct super_block *sb, int silent, int size)
303 {
304         struct sysv_sb_info *sbi = SYSV_SB(sb);
305         struct inode *root_inode;
306         char *found = flavour_names[sbi->s_type];
307         u_char n_bits = size+8;
308         int bsize = 1 << n_bits;
309         int bsize_4 = bsize >> 2;
310
311         sbi->s_firstinodezone = 2;
312
313         flavour_setup[sbi->s_type](sbi);
314         
315         sbi->s_truncate = 1;
316         sbi->s_ndatazones = sbi->s_nzones - sbi->s_firstdatazone;
317         sbi->s_inodes_per_block = bsize >> 6;
318         sbi->s_inodes_per_block_1 = (bsize >> 6)-1;
319         sbi->s_inodes_per_block_bits = n_bits-6;
320         sbi->s_ind_per_block = bsize_4;
321         sbi->s_ind_per_block_2 = bsize_4*bsize_4;
322         sbi->s_toobig_block = 10 + bsize_4 * (1 + bsize_4 * (1 + bsize_4));
323         sbi->s_ind_per_block_bits = n_bits-2;
324
325         sbi->s_ninodes = (sbi->s_firstdatazone - sbi->s_firstinodezone)
326                 << sbi->s_inodes_per_block_bits;
327
328         if (!silent)
329                 printk("VFS: Found a %s FS (block size = %ld) on device %s\n",
330                        found, sb->s_blocksize, sb->s_id);
331
332         sb->s_magic = SYSV_MAGIC_BASE + sbi->s_type;
333         /* set up enough so that it can read an inode */
334         sb->s_op = &sysv_sops;
335         root_inode = iget(sb,SYSV_ROOT_INO);
336         if (!root_inode || is_bad_inode(root_inode)) {
337                 printk("SysV FS: get root inode failed\n");
338                 return 0;
339         }
340         sb->s_root = d_alloc_root(root_inode);
341         if (!sb->s_root) {
342                 iput(root_inode);
343                 printk("SysV FS: get root dentry failed\n");
344                 return 0;
345         }
346         if (sbi->s_forced_ro)
347                 sb->s_flags |= MS_RDONLY;
348         if (sbi->s_truncate)
349                 sb->s_root->d_op = &sysv_dentry_operations;
350         sb->s_dirt = 1;
351         return 1;
352 }
353
354 static int sysv_fill_super(struct super_block *sb, void *data, int silent)
355 {
356         struct buffer_head *bh1, *bh = NULL;
357         struct sysv_sb_info *sbi;
358         unsigned long blocknr;
359         int size = 0, i;
360         
361         if (1024 != sizeof (struct xenix_super_block))
362                 panic("Xenix FS: bad superblock size");
363         if (512 != sizeof (struct sysv4_super_block))
364                 panic("SystemV FS: bad superblock size");
365         if (512 != sizeof (struct sysv2_super_block))
366                 panic("SystemV FS: bad superblock size");
367         if (500 != sizeof (struct coh_super_block))
368                 panic("Coherent FS: bad superblock size");
369         if (64 != sizeof (struct sysv_inode))
370                 panic("sysv fs: bad inode size");
371
372         sbi = kzalloc(sizeof(struct sysv_sb_info), GFP_KERNEL);
373         if (!sbi)
374                 return -ENOMEM;
375
376         sbi->s_sb = sb;
377         sbi->s_block_base = 0;
378         sb->s_fs_info = sbi;
379
380         sb_set_blocksize(sb, BLOCK_SIZE);
381
382         for (i = 0; i < ARRAY_SIZE(flavours) && !size; i++) {
383                 brelse(bh);
384                 bh = sb_bread(sb, flavours[i].block);
385                 if (!bh)
386                         continue;
387                 size = flavours[i].test(SYSV_SB(sb), bh);
388         }
389
390         if (!size)
391                 goto Eunknown;
392
393         switch (size) {
394                 case 1:
395                         blocknr = bh->b_blocknr << 1;
396                         brelse(bh);
397                         sb_set_blocksize(sb, 512);
398                         bh1 = sb_bread(sb, blocknr);
399                         bh = sb_bread(sb, blocknr + 1);
400                         break;
401                 case 2:
402                         bh1 = bh;
403                         break;
404                 case 3:
405                         blocknr = bh->b_blocknr >> 1;
406                         brelse(bh);
407                         sb_set_blocksize(sb, 2048);
408                         bh1 = bh = sb_bread(sb, blocknr);
409                         break;
410                 default:
411                         goto Ebadsize;
412         }
413
414         if (bh && bh1) {
415                 sbi->s_bh1 = bh1;
416                 sbi->s_bh2 = bh;
417                 if (complete_read_super(sb, silent, size))
418                         return 0;
419         }
420
421         brelse(bh1);
422         brelse(bh);
423         sb_set_blocksize(sb, BLOCK_SIZE);
424         printk("oldfs: cannot read superblock\n");
425 failed:
426         kfree(sbi);
427         return -EINVAL;
428
429 Eunknown:
430         brelse(bh);
431         if (!silent)
432                 printk("VFS: unable to find oldfs superblock on device %s\n",
433                         sb->s_id);
434         goto failed;
435 Ebadsize:
436         brelse(bh);
437         if (!silent)
438                 printk("VFS: oldfs: unsupported block size (%dKb)\n",
439                         1<<(size-2));
440         goto failed;
441 }
442
443 static int v7_fill_super(struct super_block *sb, void *data, int silent)
444 {
445         struct sysv_sb_info *sbi;
446         struct buffer_head *bh, *bh2 = NULL;
447         struct v7_super_block *v7sb;
448         struct sysv_inode *v7i;
449
450         if (440 != sizeof (struct v7_super_block))
451                 panic("V7 FS: bad super-block size");
452         if (64 != sizeof (struct sysv_inode))
453                 panic("sysv fs: bad i-node size");
454
455         sbi = kzalloc(sizeof(struct sysv_sb_info), GFP_KERNEL);
456         if (!sbi)
457                 return -ENOMEM;
458
459         sbi->s_sb = sb;
460         sbi->s_block_base = 0;
461         sbi->s_type = FSTYPE_V7;
462         sbi->s_bytesex = BYTESEX_PDP;
463         sb->s_fs_info = sbi;
464         
465         sb_set_blocksize(sb, 512);
466
467         if ((bh = sb_bread(sb, 1)) == NULL) {
468                 if (!silent)
469                         printk("VFS: unable to read V7 FS superblock on "
470                                "device %s.\n", sb->s_id);
471                 goto failed;
472         }
473
474         /* plausibility check on superblock */
475         v7sb = (struct v7_super_block *) bh->b_data;
476         if (fs16_to_cpu(sbi, v7sb->s_nfree) > V7_NICFREE ||
477             fs16_to_cpu(sbi, v7sb->s_ninode) > V7_NICINOD ||
478             fs32_to_cpu(sbi, v7sb->s_time) == 0)
479                 goto failed;
480
481         /* plausibility check on root inode: it is a directory,
482            with a nonzero size that is a multiple of 16 */
483         if ((bh2 = sb_bread(sb, 2)) == NULL)
484                 goto failed;
485         v7i = (struct sysv_inode *)(bh2->b_data + 64);
486         if ((fs16_to_cpu(sbi, v7i->i_mode) & ~0777) != S_IFDIR ||
487             (fs32_to_cpu(sbi, v7i->i_size) == 0) ||
488             (fs32_to_cpu(sbi, v7i->i_size) & 017) != 0)
489                 goto failed;
490         brelse(bh2);
491         bh2 = NULL;
492
493         sbi->s_bh1 = bh;
494         sbi->s_bh2 = bh;
495         if (complete_read_super(sb, silent, 1))
496                 return 0;
497
498 failed:
499         brelse(bh2);
500         brelse(bh);
501         kfree(sbi);
502         return -EINVAL;
503 }
504
505 /* Every kernel module contains stuff like this. */
506
507 static int sysv_get_sb(struct file_system_type *fs_type,
508         int flags, const char *dev_name, void *data, struct vfsmount *mnt)
509 {
510         return get_sb_bdev(fs_type, flags, dev_name, data, sysv_fill_super,
511                            mnt);
512 }
513
514 static int v7_get_sb(struct file_system_type *fs_type,
515         int flags, const char *dev_name, void *data, struct vfsmount *mnt)
516 {
517         return get_sb_bdev(fs_type, flags, dev_name, data, v7_fill_super, mnt);
518 }
519
520 static struct file_system_type sysv_fs_type = {
521         .owner          = THIS_MODULE,
522         .name           = "sysv",
523         .get_sb         = sysv_get_sb,
524         .kill_sb        = kill_block_super,
525         .fs_flags       = FS_REQUIRES_DEV,
526 };
527
528 static struct file_system_type v7_fs_type = {
529         .owner          = THIS_MODULE,
530         .name           = "v7",
531         .get_sb         = v7_get_sb,
532         .kill_sb        = kill_block_super,
533         .fs_flags       = FS_REQUIRES_DEV,
534 };
535
536 extern int sysv_init_icache(void) __init;
537 extern void sysv_destroy_icache(void);
538
539 static int __init init_sysv_fs(void)
540 {
541         int error;
542
543         error = sysv_init_icache();
544         if (error)
545                 goto out;
546         error = register_filesystem(&sysv_fs_type);
547         if (error)
548                 goto destroy_icache;
549         error = register_filesystem(&v7_fs_type);
550         if (error)
551                 goto unregister;
552         return 0;
553
554 unregister:
555         unregister_filesystem(&sysv_fs_type);
556 destroy_icache:
557         sysv_destroy_icache();
558 out:
559         return error;
560 }
561
562 static void __exit exit_sysv_fs(void)
563 {
564         unregister_filesystem(&sysv_fs_type);
565         unregister_filesystem(&v7_fs_type);
566         sysv_destroy_icache();
567 }
568
569 module_init(init_sysv_fs)
570 module_exit(exit_sysv_fs)
571 MODULE_LICENSE("GPL");