ffs_subr.c 18.9 KB
Newer Older
1
/*-
2
3
 * SPDX-License-Identifier: BSD-3-Clause
 *
Rodney W. Grimes's avatar
Rodney W. Grimes committed
4
5
6
7
8
9
10
11
12
13
14
 * Copyright (c) 1982, 1986, 1989, 1993
 *	The Regents of the University of California.  All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
Ed Maste's avatar
Ed Maste committed
15
 * 3. Neither the name of the University nor the names of its contributors
Rodney W. Grimes's avatar
Rodney W. Grimes committed
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
 *    may be used to endorse or promote products derived from this software
 *    without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 * SUCH DAMAGE.
 *
31
 *	@(#)ffs_subr.c	8.5 (Berkeley) 3/21/95
Rodney W. Grimes's avatar
Rodney W. Grimes committed
32
33
 */

David E. O'Brien's avatar
David E. O'Brien committed
34
35
36
#include <sys/cdefs.h>
__FBSDID("$FreeBSD$");

Rodney W. Grimes's avatar
Rodney W. Grimes committed
37
38
#include <sys/param.h>

39
#ifndef _KERNEL
40
41
42
43
44
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include <time.h>
#include <sys/errno.h>
45
#include <ufs/ufs/dinode.h>
46
#include <ufs/ffs/fs.h>
47

48
uint32_t calculate_crc32c(uint32_t, const void *, size_t);
49
uint32_t ffs_calc_sbhash(struct fs *);
50
51
52
53
struct malloc_type;
#define UFS_MALLOC(size, type, flags) malloc(size)
#define UFS_FREE(ptr, type) free(ptr)
#define UFS_TIME time(NULL)
54
55
56
57
58
/*
 * Request standard superblock location in ffs_sbget
 */
#define	STDSB			-1	/* Fail if check-hash is bad */
#define	STDSB_NOHASHFAIL	-2	/* Ignore check-hash failure */
59
60

#else /* _KERNEL */
Rodney W. Grimes's avatar
Rodney W. Grimes committed
61
#include <sys/systm.h>
62
#include <sys/gsb_crc32.h>
63
#include <sys/lock.h>
64
65
#include <sys/malloc.h>
#include <sys/mount.h>
Rodney W. Grimes's avatar
Rodney W. Grimes committed
66
#include <sys/vnode.h>
67
#include <sys/bio.h>
Rodney W. Grimes's avatar
Rodney W. Grimes committed
68
#include <sys/buf.h>
69
70
#include <sys/ucred.h>

Rodney W. Grimes's avatar
Rodney W. Grimes committed
71
72
#include <ufs/ufs/quota.h>
#include <ufs/ufs/inode.h>
73
74
75
#include <ufs/ufs/extattr.h>
#include <ufs/ufs/ufsmount.h>
#include <ufs/ufs/ufs_extern.h>
76
#include <ufs/ffs/ffs_extern.h>
77
#include <ufs/ffs/fs.h>
Rodney W. Grimes's avatar
Rodney W. Grimes committed
78

79
80
81
82
#define UFS_MALLOC(size, type, flags) malloc(size, type, flags)
#define UFS_FREE(ptr, type) free(ptr, type)
#define UFS_TIME time_second

Rodney W. Grimes's avatar
Rodney W. Grimes committed
83
84
85
86
87
88
/*
 * Return buffer with the contents of block "offset" from the beginning of
 * directory "ip".  If "res" is non-zero, fill it in with a pointer to the
 * remaining space in the directory.
 */
int
Ed Maste's avatar
Ed Maste committed
89
ffs_blkatoff(struct vnode *vp, off_t offset, char **res, struct buf **bpp)
Rodney W. Grimes's avatar
Rodney W. Grimes committed
90
91
{
	struct inode *ip;
Poul-Henning Kamp's avatar
Poul-Henning Kamp committed
92
	struct fs *fs;
Rodney W. Grimes's avatar
Rodney W. Grimes committed
93
	struct buf *bp;
94
	ufs_lbn_t lbn;
Rodney W. Grimes's avatar
Rodney W. Grimes committed
95
96
	int bsize, error;

97
	ip = VTOI(vp);
98
	fs = ITOFS(ip);
99
	lbn = lblkno(fs, offset);
Rodney W. Grimes's avatar
Rodney W. Grimes committed
100
101
	bsize = blksize(fs, ip, lbn);

102
103
	*bpp = NULL;
	error = bread(vp, lbn, bsize, NOCRED, &bp);
104
	if (error) {
Rodney W. Grimes's avatar
Rodney W. Grimes committed
105
106
107
		brelse(bp);
		return (error);
	}
108
109
110
	if (res)
		*res = (char *)bp->b_data + blkoff(fs, offset);
	*bpp = bp;
Rodney W. Grimes's avatar
Rodney W. Grimes committed
111
112
	return (0);
}
113
114
115
116
117

/*
 * Load up the contents of an inode and copy the appropriate pieces
 * to the incore copy.
 */
118
int
Ed Maste's avatar
Ed Maste committed
119
ffs_load_inode(struct buf *bp, struct inode *ip, struct fs *fs, ino_t ino)
120
{
121
122
	struct ufs1_dinode *dip1;
	struct ufs2_dinode *dip2;
123
	int error;
124

125
	if (I_IS_UFS1(ip)) {
126
127
		dip1 = ip->i_din1;
		*dip1 =
128
		    *((struct ufs1_dinode *)bp->b_data + ino_to_fsbo(fs, ino));
129
130
		ip->i_mode = dip1->di_mode;
		ip->i_nlink = dip1->di_nlink;
131
		ip->i_effnlink = dip1->di_nlink;
132
133
134
135
136
137
		ip->i_size = dip1->di_size;
		ip->i_flags = dip1->di_flags;
		ip->i_gen = dip1->di_gen;
		ip->i_uid = dip1->di_uid;
		ip->i_gid = dip1->di_gid;
		return (0);
138
	}
139
140
141
142
143
144
145
	dip2 = ((struct ufs2_dinode *)bp->b_data + ino_to_fsbo(fs, ino));
	if ((error = ffs_verify_dinode_ckhash(fs, dip2)) != 0) {
		printf("%s: inode %jd: check-hash failed\n", fs->fs_fsmnt,
		    (intmax_t)ino);
		return (error);
	}
	*ip->i_din2 = *dip2;
146
147
148
	dip2 = ip->i_din2;
	ip->i_mode = dip2->di_mode;
	ip->i_nlink = dip2->di_nlink;
149
	ip->i_effnlink = dip2->di_nlink;
150
151
152
153
154
	ip->i_size = dip2->di_size;
	ip->i_flags = dip2->di_flags;
	ip->i_gen = dip2->di_gen;
	ip->i_uid = dip2->di_uid;
	ip->i_gid = dip2->di_gid;
155
	return (0);
156
}
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205

/*
 * Verify that a filesystem block number is a valid data block.
 * This routine is only called on untrusted filesystems.
 */
int
ffs_check_blkno(struct mount *mp, ino_t inum, ufs2_daddr_t daddr, int blksize)
{
	struct fs *fs;
	struct ufsmount *ump;
	ufs2_daddr_t end_daddr;
	int cg, havemtx;

	KASSERT((mp->mnt_flag & MNT_UNTRUSTED) != 0,
	    ("ffs_check_blkno called on a trusted file system"));
	ump = VFSTOUFS(mp);
	fs = ump->um_fs;
	cg = dtog(fs, daddr);
	end_daddr = daddr + numfrags(fs, blksize);
	/*
	 * Verify that the block number is a valid data block. Also check
	 * that it does not point to an inode block or a superblock. Accept
	 * blocks that are unalloacted (0) or part of snapshot metadata
	 * (BLK_NOCOPY or BLK_SNAP).
	 *
	 * Thus, the block must be in a valid range for the filesystem and
	 * either in the space before a backup superblock (except the first
	 * cylinder group where that space is used by the bootstrap code) or
	 * after the inode blocks and before the end of the cylinder group.
	 */
	if ((uint64_t)daddr <= BLK_SNAP ||
	    ((uint64_t)end_daddr <= fs->fs_size &&
	    ((cg > 0 && end_daddr <= cgsblock(fs, cg)) ||
	    (daddr >= cgdmin(fs, cg) &&
	    end_daddr <= cgbase(fs, cg) + fs->fs_fpg))))
		return (0);
	if ((havemtx = mtx_owned(UFS_MTX(ump))) == 0)
		UFS_LOCK(ump);
	if (ppsratecheck(&ump->um_last_integritymsg,
	    &ump->um_secs_integritymsg, 1)) {
		UFS_UNLOCK(ump);
		uprintf("\n%s: inode %jd, out-of-range indirect block "
		    "number %jd\n", mp->mnt_stat.f_mntonname, inum, daddr);
		if (havemtx)
			UFS_LOCK(ump);
	} else if (!havemtx)
		UFS_UNLOCK(ump);
	return (EINTEGRITY);
}
206
#endif /* _KERNEL */
Rodney W. Grimes's avatar
Rodney W. Grimes committed
207

208
209
210
211
212
213
/*
 * Verify an inode check-hash.
 */
int
ffs_verify_dinode_ckhash(struct fs *fs, struct ufs2_dinode *dip)
{
214
	uint32_t ckhash, save_ckhash;
215
216
217
218
219
220
221
222
223
224
225
226

	/*
	 * Return success if unallocated or we are not doing inode check-hash.
	 */
	if (dip->di_mode == 0 || (fs->fs_metackhash & CK_INODE) == 0)
		return (0);
	/*
	 * Exclude di_ckhash from the crc32 calculation, e.g., always use
	 * a check-hash value of zero when calculating the check-hash.
	 */
	save_ckhash = dip->di_ckhash;
	dip->di_ckhash = 0;
227
	ckhash = calculate_crc32c(~0L, (void *)dip, sizeof(*dip));
228
	dip->di_ckhash = save_ckhash;
229
230
231
	if (save_ckhash == ckhash)
		return (0);
	return (EINVAL);
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
}

/*
 * Update an inode check-hash.
 */
void
ffs_update_dinode_ckhash(struct fs *fs, struct ufs2_dinode *dip)
{

	if (dip->di_mode == 0 || (fs->fs_metackhash & CK_INODE) == 0)
		return;
	/*
	 * Exclude old di_ckhash from the crc32 calculation, e.g., always use
	 * a check-hash value of zero when calculating the new check-hash.
	 */
	dip->di_ckhash = 0;
	dip->di_ckhash = calculate_crc32c(~0L, (void *)dip, sizeof(*dip));
}

251
252
253
254
255
/*
 * These are the low-level functions that actually read and write
 * the superblock and its associated data.
 */
static off_t sblock_try[] = SBLOCKSEARCH;
256
static int readsuper(void *, struct fs **, off_t, int, int,
257
258
259
260
261
262
263
264
265
266
	int (*)(void *, off_t, void **, int));

/*
 * Read a superblock from the devfd device.
 *
 * If an alternate superblock is specified, it is read. Otherwise the
 * set of locations given in the SBLOCKSEARCH list is searched for a
 * superblock. Memory is allocated for the superblock by the readfunc and
 * is returned. If filltype is non-NULL, additional memory is allocated
 * of type filltype and filled in with the superblock summary information.
267
 * All memory is freed when any error is returned.
268
269
270
271
272
273
274
275
276
277
278
 *
 * If a superblock is found, zero is returned. Otherwise one of the
 * following error values is returned:
 *     EIO: non-existent or truncated superblock.
 *     EIO: error reading summary information.
 *     ENOENT: no usable known superblock found.
 *     ENOSPC: failed to allocate space for the superblock.
 *     EINVAL: The previous newfs operation on this volume did not complete.
 *         The administrator must complete newfs before using this volume.
 */
int
279
ffs_sbget(void *devfd, struct fs **fsp, off_t altsblock,
280
281
282
283
    struct malloc_type *filltype,
    int (*readfunc)(void *devfd, off_t loc, void **bufp, int size))
{
	struct fs *fs;
284
	int i, error, size, blks;
285
286
	uint8_t *space;
	int32_t *lp;
287
	int chkhash;
288
289
	char *buf;

290
	fs = NULL;
291
	*fsp = NULL;
292
293
294
	chkhash = 1;
	if (altsblock >= 0) {
		if ((error = readsuper(devfd, &fs, altsblock, 1, chkhash,
295
296
297
		     readfunc)) != 0) {
			if (fs != NULL)
				UFS_FREE(fs, filltype);
298
			return (error);
299
		}
300
	} else {
301
302
		if (altsblock == STDSB_NOHASHFAIL)
			chkhash = 0;
303
		for (i = 0; sblock_try[i] != -1; i++) {
304
			if ((error = readsuper(devfd, &fs, sblock_try[i], 0,
305
			     chkhash, readfunc)) == 0)
306
				break;
307
308
309
310
			if (fs != NULL) {
				UFS_FREE(fs, filltype);
				fs = NULL;
			}
311
			if (error == ENOENT)
312
				continue;
313
			return (error);
314
315
316
317
318
319
320
321
322
323
324
325
		}
		if (sblock_try[i] == -1)
			return (ENOENT);
	}
	/*
	 * Read in the superblock summary information.
	 */
	size = fs->fs_cssize;
	blks = howmany(size, fs->fs_fsize);
	if (fs->fs_contigsumsize > 0)
		size += fs->fs_ncg * sizeof(int32_t);
	size += fs->fs_ncg * sizeof(u_int8_t);
326
327
328
329
330
	/* When running in libufs or libsa, UFS_MALLOC may fail */
	if ((space = UFS_MALLOC(size, filltype, M_WAITOK)) == NULL) {
		UFS_FREE(fs, filltype);
		return (ENOSPC);
	}
331
332
333
334
335
	fs->fs_csp = (struct csum *)space;
	for (i = 0; i < blks; i += fs->fs_frag) {
		size = fs->fs_bsize;
		if (i + fs->fs_frag > blks)
			size = (blks - i) * fs->fs_fsize;
336
		buf = NULL;
337
		error = (*readfunc)(devfd,
338
		    dbtob(fsbtodb(fs, fs->fs_csaddr + i)), (void **)&buf, size);
339
		if (error) {
340
341
			if (buf != NULL)
				UFS_FREE(buf, filltype);
342
			UFS_FREE(fs->fs_csp, filltype);
343
			UFS_FREE(fs, filltype);
344
			return (error);
345
346
347
348
349
350
351
352
353
354
355
356
357
358
		}
		memcpy(space, buf, size);
		UFS_FREE(buf, filltype);
		space += size;
	}
	if (fs->fs_contigsumsize > 0) {
		fs->fs_maxcluster = lp = (int32_t *)space;
		for (i = 0; i < fs->fs_ncg; i++)
			*lp++ = fs->fs_contigsumsize;
		space = (uint8_t *)lp;
	}
	size = fs->fs_ncg * sizeof(u_int8_t);
	fs->fs_contigdirs = (u_int8_t *)space;
	bzero(fs->fs_contigdirs, size);
359
	*fsp = fs;
360
361
362
363
364
365
366
367
	return (0);
}

/*
 * Try to read a superblock from the location specified by sblockloc.
 * Return zero on success or an errno on failure.
 */
static int
368
readsuper(void *devfd, struct fs **fsp, off_t sblockloc, int isaltsblk,
369
    int chkhash, int (*readfunc)(void *devfd, off_t loc, void **bufp, int size))
370
371
{
	struct fs *fs;
372
373
	int error, res;
	uint32_t ckhash;
374
375
376
377
378
379
380

	error = (*readfunc)(devfd, sblockloc, (void **)fsp, SBLOCKSIZE);
	if (error != 0)
		return (error);
	fs = *fsp;
	if (fs->fs_magic == FS_BAD_MAGIC)
		return (EINVAL);
381
	if (((fs->fs_magic == FS_UFS1_MAGIC && (isaltsblk ||
382
	      sblockloc <= SBLOCK_UFS1)) ||
383
	     (fs->fs_magic == FS_UFS2_MAGIC && (isaltsblk ||
384
	      sblockloc == fs->fs_sblockloc))) &&
385
386
387
	    fs->fs_ncg >= 1 &&
	    fs->fs_bsize >= MINBSIZE &&
	    fs->fs_bsize <= MAXBSIZE &&
388
389
	    fs->fs_bsize >= roundup(sizeof(struct fs), DEV_BSIZE) &&
	    fs->fs_sbsize <= SBLOCKSIZE) {
390
391
392
393
394
395
		/*
		 * If the filesystem has been run on a kernel without
		 * metadata check hashes, disable them.
		 */
		if ((fs->fs_flags & FS_METACKHASH) == 0)
			fs->fs_metackhash = 0;
396
		if (fs->fs_ckhash != (ckhash = ffs_calc_sbhash(fs))) {
397
398
#ifdef _KERNEL
			res = uprintf("Superblock check-hash failed: recorded "
399
400
401
			    "check-hash 0x%x != computed check-hash 0x%x%s\n",
			    fs->fs_ckhash, ckhash,
			    chkhash == 0 ? " (Ignored)" : "");
402
403
404
405
406
407
408
409
410
411
#else
			res = 0;
#endif
			/*
			 * Print check-hash failure if no controlling terminal
			 * in kernel or always if in user-mode (libufs).
			 */
			if (res == 0)
				printf("Superblock check-hash failed: recorded "
				    "check-hash 0x%x != computed check-hash "
412
413
414
415
416
417
418
419
				    "0x%x%s\n", fs->fs_ckhash, ckhash,
				    chkhash == 0 ? " (Ignored)" : "");
			if (chkhash == 0) {
				fs->fs_flags |= FS_NEEDSFSCK;
				fs->fs_fmod = 1;
				return (0);
			}
			fs->fs_fmod = 0;
420
421
			return (EINVAL);
		}
422
423
		/* Have to set for old filesystems that predate this field */
		fs->fs_sblockactualloc = sblockloc;
424
425
		/* Not yet any summary information */
		fs->fs_csp = NULL;
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
		return (0);
	}
	return (ENOENT);
}

/*
 * Write a superblock to the devfd device from the memory pointed to by fs.
 * Write out the superblock summary information if it is present.
 *
 * If the write is successful, zero is returned. Otherwise one of the
 * following error values is returned:
 *     EIO: failed to write superblock.
 *     EIO: failed to write superblock summary information.
 */
int
ffs_sbput(void *devfd, struct fs *fs, off_t loc,
    int (*writefunc)(void *devfd, off_t loc, void *buf, int size))
{
	int i, error, blks, size;
	uint8_t *space;

	/*
	 * If there is summary information, write it first, so if there
	 * is an error, the superblock will not be marked as clean.
	 */
	if (fs->fs_csp != NULL) {
		blks = howmany(fs->fs_cssize, fs->fs_fsize);
		space = (uint8_t *)fs->fs_csp;
		for (i = 0; i < blks; i += fs->fs_frag) {
			size = fs->fs_bsize;
			if (i + fs->fs_frag > blks)
				size = (blks - i) * fs->fs_fsize;
			if ((error = (*writefunc)(devfd,
			     dbtob(fsbtodb(fs, fs->fs_csaddr + i)),
			     space, size)) != 0)
				return (error);
			space += size;
		}
	}
	fs->fs_fmod = 0;
	fs->fs_time = UFS_TIME;
467
	fs->fs_ckhash = ffs_calc_sbhash(fs);
468
469
470
471
472
	if ((error = (*writefunc)(devfd, loc, fs, fs->fs_sbsize)) != 0)
		return (error);
	return (0);
}

473
474
475
/*
 * Calculate the check-hash for a superblock.
 */
476
477
uint32_t
ffs_calc_sbhash(struct fs *fs)
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
{
	uint32_t ckhash, save_ckhash;

	/*
	 * A filesystem that was using a superblock ckhash may be moved
	 * to an older kernel that does not support ckhashes. The
	 * older kernel will clear the FS_METACKHASH flag indicating
	 * that it does not update hashes. When the disk is moved back
	 * to a kernel capable of ckhashes it disables them on mount:
	 *
	 *	if ((fs->fs_flags & FS_METACKHASH) == 0)
	 *		fs->fs_metackhash = 0;
	 *
	 * This leaves (fs->fs_metackhash & CK_SUPERBLOCK) == 0) with an
	 * old stale value in the fs->fs_ckhash field. Thus the need to
	 * just accept what is there.
	 */
	if ((fs->fs_metackhash & CK_SUPERBLOCK) == 0)
		return (fs->fs_ckhash);

	save_ckhash = fs->fs_ckhash;
	fs->fs_ckhash = 0;
	/*
	 * If newly read from disk, the caller is responsible for
	 * verifying that fs->fs_sbsize <= SBLOCKSIZE.
	 */
	ckhash = calculate_crc32c(~0L, (void *)fs, fs->fs_sbsize);
	fs->fs_ckhash = save_ckhash;
	return (ckhash);
}

Rodney W. Grimes's avatar
Rodney W. Grimes committed
509
/*
Rodney W. Grimes's avatar
Rodney W. Grimes committed
510
 * Update the frsum fields to reflect addition or deletion
Rodney W. Grimes's avatar
Rodney W. Grimes committed
511
512
513
 * of some frags.
 */
void
Ed Maste's avatar
Ed Maste committed
514
ffs_fragacct(struct fs *fs, int fragmap, int32_t fraglist[], int cnt)
Rodney W. Grimes's avatar
Rodney W. Grimes committed
515
516
{
	int inblk;
Poul-Henning Kamp's avatar
Poul-Henning Kamp committed
517
518
	int field, subfield;
	int siz, pos;
Rodney W. Grimes's avatar
Rodney W. Grimes committed
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545

	inblk = (int)(fragtbl[fs->fs_frag][fragmap]) << 1;
	fragmap <<= 1;
	for (siz = 1; siz < fs->fs_frag; siz++) {
		if ((inblk & (1 << (siz + (fs->fs_frag % NBBY)))) == 0)
			continue;
		field = around[siz];
		subfield = inside[siz];
		for (pos = siz; pos <= fs->fs_frag; pos++) {
			if ((fragmap & field) == subfield) {
				fraglist[siz] += cnt;
				pos += siz;
				field <<= siz;
				subfield <<= siz;
			}
			field <<= 1;
			subfield <<= 1;
		}
	}
}

/*
 * block operations
 *
 * check if a block is available
 */
int
Ed Maste's avatar
Ed Maste committed
546
ffs_isblock(struct fs *fs, unsigned char *cp, ufs1_daddr_t h)
Rodney W. Grimes's avatar
Rodney W. Grimes committed
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
{
	unsigned char mask;

	switch ((int)fs->fs_frag) {
	case 8:
		return (cp[h] == 0xff);
	case 4:
		mask = 0x0f << ((h & 0x1) << 2);
		return ((cp[h >> 1] & mask) == mask);
	case 2:
		mask = 0x03 << ((h & 0x3) << 1);
		return ((cp[h >> 2] & mask) == mask);
	case 1:
		mask = 0x01 << (h & 0x7);
		return ((cp[h >> 3] & mask) == mask);
	default:
563
#ifdef _KERNEL
Rodney W. Grimes's avatar
Rodney W. Grimes committed
564
		panic("ffs_isblock");
565
566
567
568
569
570
571
572
573
574
#endif
		break;
	}
	return (0);
}

/*
 * check if a block is free
 */
int
Ed Maste's avatar
Ed Maste committed
575
ffs_isfreeblock(struct fs *fs, u_char *cp, ufs1_daddr_t h)
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
{
 
	switch ((int)fs->fs_frag) {
	case 8:
		return (cp[h] == 0);
	case 4:
		return ((cp[h >> 1] & (0x0f << ((h & 0x1) << 2))) == 0);
	case 2:
		return ((cp[h >> 2] & (0x03 << ((h & 0x3) << 1))) == 0);
	case 1:
		return ((cp[h >> 3] & (0x01 << (h & 0x7))) == 0);
	default:
#ifdef _KERNEL
		panic("ffs_isfreeblock");
#endif
		break;
Rodney W. Grimes's avatar
Rodney W. Grimes committed
592
	}
593
	return (0);
Rodney W. Grimes's avatar
Rodney W. Grimes committed
594
595
596
597
598
599
}

/*
 * take a block out of the map
 */
void
Ed Maste's avatar
Ed Maste committed
600
ffs_clrblock(struct fs *fs, u_char *cp, ufs1_daddr_t h)
Rodney W. Grimes's avatar
Rodney W. Grimes committed
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
{

	switch ((int)fs->fs_frag) {
	case 8:
		cp[h] = 0;
		return;
	case 4:
		cp[h >> 1] &= ~(0x0f << ((h & 0x1) << 2));
		return;
	case 2:
		cp[h >> 2] &= ~(0x03 << ((h & 0x3) << 1));
		return;
	case 1:
		cp[h >> 3] &= ~(0x01 << (h & 0x7));
		return;
	default:
617
#ifdef _KERNEL
Rodney W. Grimes's avatar
Rodney W. Grimes committed
618
		panic("ffs_clrblock");
619
620
#endif
		break;
Rodney W. Grimes's avatar
Rodney W. Grimes committed
621
622
623
624
625
626
627
	}
}

/*
 * put a block into the map
 */
void
Ed Maste's avatar
Ed Maste committed
628
ffs_setblock(struct fs *fs, unsigned char *cp, ufs1_daddr_t h)
Rodney W. Grimes's avatar
Rodney W. Grimes committed
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
{

	switch ((int)fs->fs_frag) {

	case 8:
		cp[h] = 0xff;
		return;
	case 4:
		cp[h >> 1] |= (0x0f << ((h & 0x1) << 2));
		return;
	case 2:
		cp[h >> 2] |= (0x03 << ((h & 0x3) << 1));
		return;
	case 1:
		cp[h >> 3] |= (0x01 << (h & 0x7));
		return;
	default:
646
#ifdef _KERNEL
Rodney W. Grimes's avatar
Rodney W. Grimes committed
647
		panic("ffs_setblock");
648
649
650
651
652
653
654
655
656
657
658
#endif
		break;
	}
}

/*
 * Update the cluster map because of an allocation or free.
 *
 * Cnt == 1 means free; cnt == -1 means allocating.
 */
void
Ed Maste's avatar
Ed Maste committed
659
ffs_clusteracct(struct fs *fs, struct cg *cgp, ufs1_daddr_t blkno, int cnt)
660
661
662
663
{
	int32_t *sump;
	int32_t *lp;
	u_char *freemapp, *mapp;
664
665
	int i, start, end, forw, back, map;
	u_int bit;
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686

	if (fs->fs_contigsumsize <= 0)
		return;
	freemapp = cg_clustersfree(cgp);
	sump = cg_clustersum(cgp);
	/*
	 * Allocate or clear the actual block.
	 */
	if (cnt > 0)
		setbit(freemapp, blkno);
	else
		clrbit(freemapp, blkno);
	/*
	 * Find the size of the cluster going forward.
	 */
	start = blkno + 1;
	end = start + fs->fs_contigsumsize;
	if (end >= cgp->cg_nclusterblks)
		end = cgp->cg_nclusterblks;
	mapp = &freemapp[start / NBBY];
	map = *mapp++;
687
	bit = 1U << (start % NBBY);
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
	for (i = start; i < end; i++) {
		if ((map & bit) == 0)
			break;
		if ((i & (NBBY - 1)) != (NBBY - 1)) {
			bit <<= 1;
		} else {
			map = *mapp++;
			bit = 1;
		}
	}
	forw = i - start;
	/*
	 * Find the size of the cluster going backward.
	 */
	start = blkno - 1;
	end = start - fs->fs_contigsumsize;
	if (end < 0)
		end = -1;
	mapp = &freemapp[start / NBBY];
	map = *mapp--;
708
	bit = 1U << (start % NBBY);
709
710
711
712
713
714
715
	for (i = start; i > end; i--) {
		if ((map & bit) == 0)
			break;
		if ((i & (NBBY - 1)) != 0) {
			bit >>= 1;
		} else {
			map = *mapp--;
716
			bit = 1U << (NBBY - 1);
717
		}
Rodney W. Grimes's avatar
Rodney W. Grimes committed
718
	}
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
	back = start - i;
	/*
	 * Account for old cluster and the possibly new forward and
	 * back clusters.
	 */
	i = back + forw + 1;
	if (i > fs->fs_contigsumsize)
		i = fs->fs_contigsumsize;
	sump[i] += cnt;
	if (back > 0)
		sump[back] -= cnt;
	if (forw > 0)
		sump[forw] -= cnt;
	/*
	 * Update cluster summary information.
	 */
	lp = &sump[fs->fs_contigsumsize];
	for (i = fs->fs_contigsumsize; i > 0; i--)
		if (*lp-- > 0)
			break;
	fs->fs_maxcluster[cgp->cg_cgx] = i;
Rodney W. Grimes's avatar
Rodney W. Grimes committed
740
}