ffs_subr.c revision 1.30 1 /* $NetBSD: ffs_subr.c,v 1.30 2003/10/27 00:12:42 lukem Exp $ */
2
3 /*
4 * Copyright (c) 1982, 1986, 1989, 1993
5 * The Regents of the University of California. All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 * 3. Neither the name of the University nor the names of its contributors
16 * may be used to endorse or promote products derived from this software
17 * without specific prior written permission.
18 *
19 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
20 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
23 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29 * SUCH DAMAGE.
30 *
31 * @(#)ffs_subr.c 8.5 (Berkeley) 3/21/95
32 */
33
34 #if HAVE_NBTOOL_CONFIG_H
35 #include "nbtool_config.h"
36 #endif
37
38 #include <sys/cdefs.h>
39 __KERNEL_RCSID(0, "$NetBSD: ffs_subr.c,v 1.30 2003/10/27 00:12:42 lukem Exp $");
40
41 #include <sys/param.h>
42
43 /* in ffs_tables.c */
44 extern const int inside[], around[];
45 extern const u_char * const fragtbl[];
46
47 #ifndef _KERNEL
48 #include <ufs/ufs/dinode.h>
49 #include <ufs/ffs/fs.h>
50 #include <ufs/ffs/ffs_extern.h>
51 #include <ufs/ufs/ufs_bswap.h>
52 void panic __P((const char *, ...))
53 __attribute__((__noreturn__,__format__(__printf__,1,2)));
54
55 #else /* _KERNEL */
56 #include <sys/systm.h>
57 #include <sys/vnode.h>
58 #include <sys/mount.h>
59 #include <sys/buf.h>
60 #include <sys/inttypes.h>
61 #include <sys/pool.h>
62 #include <ufs/ufs/inode.h>
63 #include <ufs/ufs/ufsmount.h>
64 #include <ufs/ufs/ufs_extern.h>
65 #include <ufs/ffs/fs.h>
66 #include <ufs/ffs/ffs_extern.h>
67 #include <ufs/ufs/ufs_bswap.h>
68
69 /*
70 * Return buffer with the contents of block "offset" from the beginning of
71 * directory "ip". If "res" is non-zero, fill it in with a pointer to the
72 * remaining space in the directory.
73 */
74 int
75 ffs_blkatoff(v)
76 void *v;
77 {
78 struct vop_blkatoff_args /* {
79 struct vnode *a_vp;
80 off_t a_offset;
81 char **a_res;
82 struct buf **a_bpp;
83 } */ *ap = v;
84 struct inode *ip;
85 struct fs *fs;
86 struct buf *bp;
87 daddr_t lbn;
88 int bsize, error;
89
90 ip = VTOI(ap->a_vp);
91 fs = ip->i_fs;
92 lbn = lblkno(fs, ap->a_offset);
93 bsize = blksize(fs, ip, lbn);
94
95 *ap->a_bpp = NULL;
96 if ((error = bread(ap->a_vp, lbn, bsize, NOCRED, &bp)) != 0) {
97 brelse(bp);
98 return (error);
99 }
100 if (ap->a_res)
101 *ap->a_res = (char *)bp->b_data + blkoff(fs, ap->a_offset);
102 *ap->a_bpp = bp;
103 return (0);
104 }
105
106
107 /*
108 * Load up the contents of an inode and copy the appropriate pieces
109 * to the incore copy.
110 */
111 void
112 ffs_load_inode(bp, ip, fs, ino)
113 struct buf *bp;
114 struct inode *ip;
115 struct fs *fs;
116 ino_t ino;
117 {
118 struct ufs1_dinode *dp1;
119 struct ufs2_dinode *dp2;
120
121 if (ip->i_ump->um_fstype == UFS1) {
122 dp1 = (struct ufs1_dinode *)bp->b_data + ino_to_fsbo(fs, ino);
123 #ifdef FFS_EI
124 if (UFS_FSNEEDSWAP(fs))
125 ffs_dinode1_swap(dp1, ip->i_din.ffs1_din);
126 else
127 #endif
128 *ip->i_din.ffs1_din = *dp1;
129
130 ip->i_mode = ip->i_ffs1_mode;
131 ip->i_nlink = ip->i_ffs1_nlink;
132 ip->i_size = ip->i_ffs1_size;
133 ip->i_flags = ip->i_ffs1_flags;
134 ip->i_gen = ip->i_ffs1_gen;
135 ip->i_uid = ip->i_ffs1_uid;
136 ip->i_gid = ip->i_ffs1_gid;
137 } else {
138 dp2 = (struct ufs2_dinode *)bp->b_data + ino_to_fsbo(fs, ino);
139 #ifdef FFS_EI
140 if (UFS_FSNEEDSWAP(fs))
141 ffs_dinode2_swap(dp2, ip->i_din.ffs2_din);
142 else
143 #endif
144 *ip->i_din.ffs2_din = *dp2;
145
146 ip->i_mode = ip->i_ffs2_mode;
147 ip->i_nlink = ip->i_ffs2_nlink;
148 ip->i_size = ip->i_ffs2_size;
149 ip->i_flags = ip->i_ffs2_flags;
150 ip->i_gen = ip->i_ffs2_gen;
151 ip->i_uid = ip->i_ffs2_uid;
152 ip->i_gid = ip->i_ffs2_gid;
153 }
154 }
155
156 #endif /* _KERNEL */
157
158 /*
159 * Update the frsum fields to reflect addition or deletion
160 * of some frags.
161 */
162 void
163 ffs_fragacct(fs, fragmap, fraglist, cnt, needswap)
164 struct fs *fs;
165 int fragmap;
166 int32_t fraglist[];
167 int cnt;
168 int needswap;
169 {
170 int inblk;
171 int field, subfield;
172 int siz, pos;
173
174 inblk = (int)(fragtbl[fs->fs_frag][fragmap]) << 1;
175 fragmap <<= 1;
176 for (siz = 1; siz < fs->fs_frag; siz++) {
177 if ((inblk & (1 << (siz + (fs->fs_frag & (NBBY - 1))))) == 0)
178 continue;
179 field = around[siz];
180 subfield = inside[siz];
181 for (pos = siz; pos <= fs->fs_frag; pos++) {
182 if ((fragmap & field) == subfield) {
183 fraglist[siz] = ufs_rw32(
184 ufs_rw32(fraglist[siz], needswap) + cnt,
185 needswap);
186 pos += siz;
187 field <<= siz;
188 subfield <<= siz;
189 }
190 field <<= 1;
191 subfield <<= 1;
192 }
193 }
194 }
195
196 #if defined(_KERNEL) && defined(DIAGNOSTIC)
197 void
198 ffs_checkoverlap(bp, ip)
199 struct buf *bp;
200 struct inode *ip;
201 {
202 struct buf *ebp, *ep;
203 daddr_t start, last;
204 struct vnode *vp;
205
206 ebp = &buf[nbuf];
207 start = bp->b_blkno;
208 last = start + btodb(bp->b_bcount) - 1;
209 for (ep = buf; ep < ebp; ep++) {
210 if (ep == bp || (ep->b_flags & B_INVAL) ||
211 ep->b_vp == NULLVP)
212 continue;
213 if (VOP_BMAP(ep->b_vp, (daddr_t)0, &vp, (daddr_t)0, NULL))
214 continue;
215 if (vp != ip->i_devvp)
216 continue;
217 /* look for overlap */
218 if (ep->b_bcount == 0 || ep->b_blkno > last ||
219 ep->b_blkno + btodb(ep->b_bcount) <= start)
220 continue;
221 vprint("Disk overlap", vp);
222 printf("\tstart %" PRId64 ", end %" PRId64 " overlap start "
223 "%" PRId64 ", end %" PRId64 "\n",
224 start, last, ep->b_blkno,
225 ep->b_blkno + btodb(ep->b_bcount) - 1);
226 panic("Disk buffer overlap");
227 }
228 }
229 #endif /* _KERNEL && DIAGNOSTIC */
230
231 /*
232 * block operations
233 *
234 * check if a block is available
235 */
236 int
237 ffs_isblock(fs, cp, h)
238 struct fs *fs;
239 u_char *cp;
240 int32_t h;
241 {
242 u_char mask;
243
244 switch ((int)fs->fs_fragshift) {
245 case 3:
246 return (cp[h] == 0xff);
247 case 2:
248 mask = 0x0f << ((h & 0x1) << 2);
249 return ((cp[h >> 1] & mask) == mask);
250 case 1:
251 mask = 0x03 << ((h & 0x3) << 1);
252 return ((cp[h >> 2] & mask) == mask);
253 case 0:
254 mask = 0x01 << (h & 0x7);
255 return ((cp[h >> 3] & mask) == mask);
256 default:
257 panic("ffs_isblock: unknown fs_fragshift %d",
258 (int)fs->fs_fragshift);
259 }
260 }
261
262 /*
263 * check if a block is free
264 */
265 int
266 ffs_isfreeblock(fs, cp, h)
267 struct fs *fs;
268 u_char *cp;
269 int32_t h;
270 {
271
272 switch ((int)fs->fs_fragshift) {
273 case 3:
274 return (cp[h] == 0);
275 case 2:
276 return ((cp[h >> 1] & (0x0f << ((h & 0x1) << 2))) == 0);
277 case 1:
278 return ((cp[h >> 2] & (0x03 << ((h & 0x3) << 1))) == 0);
279 case 0:
280 return ((cp[h >> 3] & (0x01 << (h & 0x7))) == 0);
281 default:
282 panic("ffs_isfreeblock: unknown fs_fragshift %d",
283 (int)fs->fs_fragshift);
284 }
285 }
286
287 /*
288 * take a block out of the map
289 */
290 void
291 ffs_clrblock(fs, cp, h)
292 struct fs *fs;
293 u_char *cp;
294 int32_t h;
295 {
296
297 switch ((int)fs->fs_fragshift) {
298 case 3:
299 cp[h] = 0;
300 return;
301 case 2:
302 cp[h >> 1] &= ~(0x0f << ((h & 0x1) << 2));
303 return;
304 case 1:
305 cp[h >> 2] &= ~(0x03 << ((h & 0x3) << 1));
306 return;
307 case 0:
308 cp[h >> 3] &= ~(0x01 << (h & 0x7));
309 return;
310 default:
311 panic("ffs_clrblock: unknown fs_fragshift %d",
312 (int)fs->fs_fragshift);
313 }
314 }
315
316 /*
317 * put a block into the map
318 */
319 void
320 ffs_setblock(fs, cp, h)
321 struct fs *fs;
322 u_char *cp;
323 int32_t h;
324 {
325
326 switch ((int)fs->fs_fragshift) {
327 case 3:
328 cp[h] = 0xff;
329 return;
330 case 2:
331 cp[h >> 1] |= (0x0f << ((h & 0x1) << 2));
332 return;
333 case 1:
334 cp[h >> 2] |= (0x03 << ((h & 0x3) << 1));
335 return;
336 case 0:
337 cp[h >> 3] |= (0x01 << (h & 0x7));
338 return;
339 default:
340 panic("ffs_setblock: unknown fs_fragshift %d",
341 (int)fs->fs_fragshift);
342 }
343 }
344