ffs_subr.c 17.3 KB
Newer Older
1
/*-
2
3
 * SPDX-License-Identifier: BSD-3-Clause
 *
rgrimes's avatar
rgrimes 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.
emaste's avatar
emaste committed
15
 * 3. Neither the name of the University nor the names of its contributors
rgrimes's avatar
rgrimes 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
rgrimes's avatar
rgrimes committed
32
33
 */

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

rgrimes's avatar
rgrimes 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 */
rgrimes's avatar
rgrimes committed
61
#include <sys/systm.h>
62
#include <sys/lock.h>
63
64
#include <sys/malloc.h>
#include <sys/mount.h>
rgrimes's avatar
rgrimes committed
65
#include <sys/vnode.h>
66
#include <sys/bio.h>
rgrimes's avatar
rgrimes committed
67
#include <sys/buf.h>
68
69
#include <sys/ucred.h>

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

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

rgrimes's avatar
rgrimes committed
82
83
84
85
86
87
/*
 * 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
emaste's avatar
emaste committed
88
ffs_blkatoff(struct vnode *vp, off_t offset, char **res, struct buf **bpp)
rgrimes's avatar
rgrimes committed
89
90
{
	struct inode *ip;
phk's avatar
phk committed
91
	struct fs *fs;
rgrimes's avatar
rgrimes committed
92
	struct buf *bp;
93
	ufs_lbn_t lbn;
rgrimes's avatar
rgrimes committed
94
95
	int bsize, error;

phk's avatar
phk committed
96
	ip = VTOI(vp);
kib's avatar
kib committed
97
	fs = ITOFS(ip);
phk's avatar
phk committed
98
	lbn = lblkno(fs, offset);
rgrimes's avatar
rgrimes committed
99
100
	bsize = blksize(fs, ip, lbn);

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

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

kib's avatar
kib committed
124
	if (I_IS_UFS1(ip)) {
125
126
		dip1 = ip->i_din1;
		*dip1 =
127
		    *((struct ufs1_dinode *)bp->b_data + ino_to_fsbo(fs, ino));
128
129
		ip->i_mode = dip1->di_mode;
		ip->i_nlink = dip1->di_nlink;
130
		ip->i_effnlink = dip1->di_nlink;
131
132
133
134
135
136
		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);
137
	}
138
139
140
141
142
143
144
	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;
145
146
147
	dip2 = ip->i_din2;
	ip->i_mode = dip2->di_mode;
	ip->i_nlink = dip2->di_nlink;
148
	ip->i_effnlink = dip2->di_nlink;
149
150
151
152
153
	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;
154
	return (0);
155
}
156
#endif /* _KERNEL */
rgrimes's avatar
rgrimes committed
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
/*
 * Verify an inode check-hash.
 */
int
ffs_verify_dinode_ckhash(struct fs *fs, struct ufs2_dinode *dip)
{
	uint32_t save_ckhash;

	/*
	 * 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;
	if (save_ckhash != calculate_crc32c(~0L, (void *)dip, sizeof(*dip)))
		return (EINVAL);
	dip->di_ckhash = save_ckhash;
	return (0);
}

/*
 * 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));
}

200
201
202
203
204
/*
 * These are the low-level functions that actually read and write
 * the superblock and its associated data.
 */
static off_t sblock_try[] = SBLOCKSEARCH;
205
static int readsuper(void *, struct fs **, off_t, int, int,
206
207
208
209
210
211
212
213
214
215
	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.
216
 * All memory is freed when any error is returned.
217
218
219
220
221
222
223
224
225
226
227
 *
 * 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
228
ffs_sbget(void *devfd, struct fs **fsp, off_t altsblock,
229
230
231
232
    struct malloc_type *filltype,
    int (*readfunc)(void *devfd, off_t loc, void **bufp, int size))
{
	struct fs *fs;
233
	int i, error, size, blks;
234
235
	uint8_t *space;
	int32_t *lp;
236
	int chkhash;
237
238
	char *buf;

239
	fs = NULL;
240
	*fsp = NULL;
241
242
243
	chkhash = 1;
	if (altsblock >= 0) {
		if ((error = readsuper(devfd, &fs, altsblock, 1, chkhash,
244
245
246
		     readfunc)) != 0) {
			if (fs != NULL)
				UFS_FREE(fs, filltype);
247
			return (error);
248
		}
249
	} else {
250
251
		if (altsblock == STDSB_NOHASHFAIL)
			chkhash = 0;
252
		for (i = 0; sblock_try[i] != -1; i++) {
253
			if ((error = readsuper(devfd, &fs, sblock_try[i], 0,
254
			     chkhash, readfunc)) == 0)
255
				break;
256
257
258
259
			if (fs != NULL) {
				UFS_FREE(fs, filltype);
				fs = NULL;
			}
260
			if (error == ENOENT)
261
				continue;
262
			return (error);
263
264
265
266
267
268
269
270
271
272
273
274
		}
		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);
275
276
277
278
279
	/* 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);
	}
280
281
282
283
284
	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;
285
		buf = NULL;
286
		error = (*readfunc)(devfd,
287
		    dbtob(fsbtodb(fs, fs->fs_csaddr + i)), (void **)&buf, size);
288
		if (error) {
289
290
			if (buf != NULL)
				UFS_FREE(buf, filltype);
291
			UFS_FREE(fs->fs_csp, filltype);
292
			UFS_FREE(fs, filltype);
293
			return (error);
294
295
296
297
298
299
300
301
302
303
304
305
306
307
		}
		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);
308
	*fsp = fs;
309
310
311
312
313
314
315
316
	return (0);
}

/*
 * Try to read a superblock from the location specified by sblockloc.
 * Return zero on success or an errno on failure.
 */
static int
317
readsuper(void *devfd, struct fs **fsp, off_t sblockloc, int isaltsblk,
318
    int chkhash, int (*readfunc)(void *devfd, off_t loc, void **bufp, int size))
319
320
{
	struct fs *fs;
321
322
	int error, res;
	uint32_t ckhash;
323
324
325
326
327
328
329

	error = (*readfunc)(devfd, sblockloc, (void **)fsp, SBLOCKSIZE);
	if (error != 0)
		return (error);
	fs = *fsp;
	if (fs->fs_magic == FS_BAD_MAGIC)
		return (EINVAL);
330
	if (((fs->fs_magic == FS_UFS1_MAGIC && (isaltsblk ||
331
	      sblockloc <= SBLOCK_UFS1)) ||
332
	     (fs->fs_magic == FS_UFS2_MAGIC && (isaltsblk ||
333
	      sblockloc == fs->fs_sblockloc))) &&
334
335
336
	    fs->fs_ncg >= 1 &&
	    fs->fs_bsize >= MINBSIZE &&
	    fs->fs_bsize <= MAXBSIZE &&
337
338
	    fs->fs_bsize >= roundup(sizeof(struct fs), DEV_BSIZE) &&
	    fs->fs_sbsize <= SBLOCKSIZE) {
339
340
341
342
343
344
		/*
		 * 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;
345
		if (fs->fs_ckhash != (ckhash = ffs_calc_sbhash(fs))) {
346
347
#ifdef _KERNEL
			res = uprintf("Superblock check-hash failed: recorded "
348
349
350
			    "check-hash 0x%x != computed check-hash 0x%x%s\n",
			    fs->fs_ckhash, ckhash,
			    chkhash == 0 ? " (Ignored)" : "");
351
352
353
354
355
356
357
358
359
360
#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 "
361
362
363
364
365
366
367
368
				    "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;
369
370
			return (EINVAL);
		}
371
372
		/* Have to set for old filesystems that predate this field */
		fs->fs_sblockactualloc = sblockloc;
373
374
		/* Not yet any summary information */
		fs->fs_csp = NULL;
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
		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;
416
	fs->fs_ckhash = ffs_calc_sbhash(fs);
417
418
419
420
421
	if ((error = (*writefunc)(devfd, loc, fs, fs->fs_sbsize)) != 0)
		return (error);
	return (0);
}

422
423
424
/*
 * Calculate the check-hash for a superblock.
 */
425
426
uint32_t
ffs_calc_sbhash(struct fs *fs)
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
{
	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);
}

rgrimes's avatar
rgrimes committed
458
/*
rgrimes's avatar
rgrimes committed
459
 * Update the frsum fields to reflect addition or deletion
rgrimes's avatar
rgrimes committed
460
461
462
 * of some frags.
 */
void
emaste's avatar
emaste committed
463
ffs_fragacct(struct fs *fs, int fragmap, int32_t fraglist[], int cnt)
rgrimes's avatar
rgrimes committed
464
465
{
	int inblk;
phk's avatar
phk committed
466
467
	int field, subfield;
	int siz, pos;
rgrimes's avatar
rgrimes committed
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494

	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
emaste's avatar
emaste committed
495
ffs_isblock(struct fs *fs, unsigned char *cp, ufs1_daddr_t h)
rgrimes's avatar
rgrimes committed
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
{
	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:
512
#ifdef _KERNEL
rgrimes's avatar
rgrimes committed
513
		panic("ffs_isblock");
514
515
516
517
518
519
520
521
522
523
#endif
		break;
	}
	return (0);
}

/*
 * check if a block is free
 */
int
emaste's avatar
emaste committed
524
ffs_isfreeblock(struct fs *fs, u_char *cp, ufs1_daddr_t h)
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
{
 
	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;
rgrimes's avatar
rgrimes committed
541
	}
542
	return (0);
rgrimes's avatar
rgrimes committed
543
544
545
546
547
548
}

/*
 * take a block out of the map
 */
void
emaste's avatar
emaste committed
549
ffs_clrblock(struct fs *fs, u_char *cp, ufs1_daddr_t h)
rgrimes's avatar
rgrimes committed
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
{

	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:
566
#ifdef _KERNEL
rgrimes's avatar
rgrimes committed
567
		panic("ffs_clrblock");
568
569
#endif
		break;
rgrimes's avatar
rgrimes committed
570
571
572
573
574
575
576
	}
}

/*
 * put a block into the map
 */
void
emaste's avatar
emaste committed
577
ffs_setblock(struct fs *fs, unsigned char *cp, ufs1_daddr_t h)
rgrimes's avatar
rgrimes committed
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
{

	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:
595
#ifdef _KERNEL
rgrimes's avatar
rgrimes committed
596
		panic("ffs_setblock");
597
598
599
600
601
602
603
604
605
606
607
#endif
		break;
	}
}

/*
 * Update the cluster map because of an allocation or free.
 *
 * Cnt == 1 means free; cnt == -1 means allocating.
 */
void
emaste's avatar
emaste committed
608
ffs_clusteracct(struct fs *fs, struct cg *cgp, ufs1_daddr_t blkno, int cnt)
609
610
611
612
{
	int32_t *sump;
	int32_t *lp;
	u_char *freemapp, *mapp;
613
614
	int i, start, end, forw, back, map;
	u_int bit;
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635

	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++;
636
	bit = 1U << (start % NBBY);
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
	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--;
657
	bit = 1U << (start % NBBY);
658
659
660
661
662
663
664
	for (i = start; i > end; i--) {
		if ((map & bit) == 0)
			break;
		if ((i & (NBBY - 1)) != 0) {
			bit >>= 1;
		} else {
			map = *mapp--;
665
			bit = 1U << (NBBY - 1);
666
		}
rgrimes's avatar
rgrimes committed
667
	}
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
	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;
rgrimes's avatar
rgrimes committed
689
}