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