fs/minix: Verify bitmap block counts before mounting
[~shefty/rdma-dev.git] / fs / minix / bitmap.c
1 /*
2  *  linux/fs/minix/bitmap.c
3  *
4  *  Copyright (C) 1991, 1992  Linus Torvalds
5  */
6
7 /*
8  * Modified for 680x0 by Hamish Macdonald
9  * Fixed for 680x0 by Andreas Schwab
10  */
11
12 /* bitmap.c contains the code that handles the inode and block bitmaps */
13
14 #include "minix.h"
15 #include <linux/buffer_head.h>
16 #include <linux/bitops.h>
17 #include <linux/sched.h>
18
19 static const int nibblemap[] = { 4,3,3,2,3,2,2,1,3,2,2,1,2,1,1,0 };
20
21 static DEFINE_SPINLOCK(bitmap_lock);
22
23 static unsigned long count_free(struct buffer_head *map[], unsigned blocksize, __u32 numbits)
24 {
25         unsigned i, j, sum = 0;
26         struct buffer_head *bh;
27         unsigned numblocks = minix_blocks_needed(numbits, blocksize);
28   
29         for (i=0; i<numblocks-1; i++) {
30                 if (!(bh=map[i])) 
31                         return(0);
32                 for (j=0; j<bh->b_size; j++)
33                         sum += nibblemap[bh->b_data[j] & 0xf]
34                                 + nibblemap[(bh->b_data[j]>>4) & 0xf];
35         }
36
37         if (numblocks==0 || !(bh=map[numblocks-1]))
38                 return(0);
39         i = ((numbits - (numblocks-1) * bh->b_size * 8) / 16) * 2;
40         for (j=0; j<i; j++) {
41                 sum += nibblemap[bh->b_data[j] & 0xf]
42                         + nibblemap[(bh->b_data[j]>>4) & 0xf];
43         }
44
45         i = numbits%16;
46         if (i!=0) {
47                 i = *(__u16 *)(&bh->b_data[j]) | ~((1<<i) - 1);
48                 sum += nibblemap[i & 0xf] + nibblemap[(i>>4) & 0xf];
49                 sum += nibblemap[(i>>8) & 0xf] + nibblemap[(i>>12) & 0xf];
50         }
51         return(sum);
52 }
53
54 void minix_free_block(struct inode *inode, unsigned long block)
55 {
56         struct super_block *sb = inode->i_sb;
57         struct minix_sb_info *sbi = minix_sb(sb);
58         struct buffer_head *bh;
59         int k = sb->s_blocksize_bits + 3;
60         unsigned long bit, zone;
61
62         if (block < sbi->s_firstdatazone || block >= sbi->s_nzones) {
63                 printk("Trying to free block not in datazone\n");
64                 return;
65         }
66         zone = block - sbi->s_firstdatazone + 1;
67         bit = zone & ((1<<k) - 1);
68         zone >>= k;
69         if (zone >= sbi->s_zmap_blocks) {
70                 printk("minix_free_block: nonexistent bitmap buffer\n");
71                 return;
72         }
73         bh = sbi->s_zmap[zone];
74         spin_lock(&bitmap_lock);
75         if (!minix_test_and_clear_bit(bit, bh->b_data))
76                 printk("minix_free_block (%s:%lu): bit already cleared\n",
77                        sb->s_id, block);
78         spin_unlock(&bitmap_lock);
79         mark_buffer_dirty(bh);
80         return;
81 }
82
83 int minix_new_block(struct inode * inode)
84 {
85         struct minix_sb_info *sbi = minix_sb(inode->i_sb);
86         int bits_per_zone = 8 * inode->i_sb->s_blocksize;
87         int i;
88
89         for (i = 0; i < sbi->s_zmap_blocks; i++) {
90                 struct buffer_head *bh = sbi->s_zmap[i];
91                 int j;
92
93                 spin_lock(&bitmap_lock);
94                 j = minix_find_first_zero_bit(bh->b_data, bits_per_zone);
95                 if (j < bits_per_zone) {
96                         minix_set_bit(j, bh->b_data);
97                         spin_unlock(&bitmap_lock);
98                         mark_buffer_dirty(bh);
99                         j += i * bits_per_zone + sbi->s_firstdatazone-1;
100                         if (j < sbi->s_firstdatazone || j >= sbi->s_nzones)
101                                 break;
102                         return j;
103                 }
104                 spin_unlock(&bitmap_lock);
105         }
106         return 0;
107 }
108
109 unsigned long minix_count_free_blocks(struct super_block *sb)
110 {
111         struct minix_sb_info *sbi = minix_sb(sb);
112         u32 bits = sbi->s_nzones - (sbi->s_firstdatazone + 1);
113
114         return (count_free(sbi->s_zmap, sb->s_blocksize, bits)
115                 << sbi->s_log_zone_size);
116 }
117
118 struct minix_inode *
119 minix_V1_raw_inode(struct super_block *sb, ino_t ino, struct buffer_head **bh)
120 {
121         int block;
122         struct minix_sb_info *sbi = minix_sb(sb);
123         struct minix_inode *p;
124
125         if (!ino || ino > sbi->s_ninodes) {
126                 printk("Bad inode number on dev %s: %ld is out of range\n",
127                        sb->s_id, (long)ino);
128                 return NULL;
129         }
130         ino--;
131         block = 2 + sbi->s_imap_blocks + sbi->s_zmap_blocks +
132                  ino / MINIX_INODES_PER_BLOCK;
133         *bh = sb_bread(sb, block);
134         if (!*bh) {
135                 printk("Unable to read inode block\n");
136                 return NULL;
137         }
138         p = (void *)(*bh)->b_data;
139         return p + ino % MINIX_INODES_PER_BLOCK;
140 }
141
142 struct minix2_inode *
143 minix_V2_raw_inode(struct super_block *sb, ino_t ino, struct buffer_head **bh)
144 {
145         int block;
146         struct minix_sb_info *sbi = minix_sb(sb);
147         struct minix2_inode *p;
148         int minix2_inodes_per_block = sb->s_blocksize / sizeof(struct minix2_inode);
149
150         *bh = NULL;
151         if (!ino || ino > sbi->s_ninodes) {
152                 printk("Bad inode number on dev %s: %ld is out of range\n",
153                        sb->s_id, (long)ino);
154                 return NULL;
155         }
156         ino--;
157         block = 2 + sbi->s_imap_blocks + sbi->s_zmap_blocks +
158                  ino / minix2_inodes_per_block;
159         *bh = sb_bread(sb, block);
160         if (!*bh) {
161                 printk("Unable to read inode block\n");
162                 return NULL;
163         }
164         p = (void *)(*bh)->b_data;
165         return p + ino % minix2_inodes_per_block;
166 }
167
168 /* Clear the link count and mode of a deleted inode on disk. */
169
170 static void minix_clear_inode(struct inode *inode)
171 {
172         struct buffer_head *bh = NULL;
173
174         if (INODE_VERSION(inode) == MINIX_V1) {
175                 struct minix_inode *raw_inode;
176                 raw_inode = minix_V1_raw_inode(inode->i_sb, inode->i_ino, &bh);
177                 if (raw_inode) {
178                         raw_inode->i_nlinks = 0;
179                         raw_inode->i_mode = 0;
180                 }
181         } else {
182                 struct minix2_inode *raw_inode;
183                 raw_inode = minix_V2_raw_inode(inode->i_sb, inode->i_ino, &bh);
184                 if (raw_inode) {
185                         raw_inode->i_nlinks = 0;
186                         raw_inode->i_mode = 0;
187                 }
188         }
189         if (bh) {
190                 mark_buffer_dirty(bh);
191                 brelse (bh);
192         }
193 }
194
195 void minix_free_inode(struct inode * inode)
196 {
197         struct super_block *sb = inode->i_sb;
198         struct minix_sb_info *sbi = minix_sb(inode->i_sb);
199         struct buffer_head *bh;
200         int k = sb->s_blocksize_bits + 3;
201         unsigned long ino, bit;
202
203         ino = inode->i_ino;
204         if (ino < 1 || ino > sbi->s_ninodes) {
205                 printk("minix_free_inode: inode 0 or nonexistent inode\n");
206                 return;
207         }
208         bit = ino & ((1<<k) - 1);
209         ino >>= k;
210         if (ino >= sbi->s_imap_blocks) {
211                 printk("minix_free_inode: nonexistent imap in superblock\n");
212                 return;
213         }
214
215         minix_clear_inode(inode);       /* clear on-disk copy */
216
217         bh = sbi->s_imap[ino];
218         spin_lock(&bitmap_lock);
219         if (!minix_test_and_clear_bit(bit, bh->b_data))
220                 printk("minix_free_inode: bit %lu already cleared\n", bit);
221         spin_unlock(&bitmap_lock);
222         mark_buffer_dirty(bh);
223 }
224
225 struct inode *minix_new_inode(const struct inode *dir, int mode, int *error)
226 {
227         struct super_block *sb = dir->i_sb;
228         struct minix_sb_info *sbi = minix_sb(sb);
229         struct inode *inode = new_inode(sb);
230         struct buffer_head * bh;
231         int bits_per_zone = 8 * sb->s_blocksize;
232         unsigned long j;
233         int i;
234
235         if (!inode) {
236                 *error = -ENOMEM;
237                 return NULL;
238         }
239         j = bits_per_zone;
240         bh = NULL;
241         *error = -ENOSPC;
242         spin_lock(&bitmap_lock);
243         for (i = 0; i < sbi->s_imap_blocks; i++) {
244                 bh = sbi->s_imap[i];
245                 j = minix_find_first_zero_bit(bh->b_data, bits_per_zone);
246                 if (j < bits_per_zone)
247                         break;
248         }
249         if (!bh || j >= bits_per_zone) {
250                 spin_unlock(&bitmap_lock);
251                 iput(inode);
252                 return NULL;
253         }
254         if (minix_test_and_set_bit(j, bh->b_data)) {    /* shouldn't happen */
255                 spin_unlock(&bitmap_lock);
256                 printk("minix_new_inode: bit already set\n");
257                 iput(inode);
258                 return NULL;
259         }
260         spin_unlock(&bitmap_lock);
261         mark_buffer_dirty(bh);
262         j += i * bits_per_zone;
263         if (!j || j > sbi->s_ninodes) {
264                 iput(inode);
265                 return NULL;
266         }
267         inode_init_owner(inode, dir, mode);
268         inode->i_ino = j;
269         inode->i_mtime = inode->i_atime = inode->i_ctime = CURRENT_TIME_SEC;
270         inode->i_blocks = 0;
271         memset(&minix_i(inode)->u, 0, sizeof(minix_i(inode)->u));
272         insert_inode_hash(inode);
273         mark_inode_dirty(inode);
274
275         *error = 0;
276         return inode;
277 }
278
279 unsigned long minix_count_free_inodes(struct super_block *sb)
280 {
281         struct minix_sb_info *sbi = minix_sb(sb);
282         u32 bits = sbi->s_ninodes + 1;
283
284         return count_free(sbi->s_imap, sb->s_blocksize, bits);
285 }