Home | History | Annotate | Line # | Download | only in quotacheck
      1 /*	$NetBSD: quotacheck.c,v 1.51 2023/01/07 19:41:30 chs Exp $	*/
      2 
      3 /*
      4  * Copyright (c) 1980, 1990, 1993
      5  *	The Regents of the University of California.  All rights reserved.
      6  *
      7  * This code is derived from software contributed to Berkeley by
      8  * Robert Elz at The University of Melbourne.
      9  *
     10  * Redistribution and use in source and binary forms, with or without
     11  * modification, are permitted provided that the following conditions
     12  * are met:
     13  * 1. Redistributions of source code must retain the above copyright
     14  *    notice, this list of conditions and the following disclaimer.
     15  * 2. Redistributions in binary form must reproduce the above copyright
     16  *    notice, this list of conditions and the following disclaimer in the
     17  *    documentation and/or other materials provided with the distribution.
     18  * 3. Neither the name of the University nor the names of its contributors
     19  *    may be used to endorse or promote products derived from this software
     20  *    without specific prior written permission.
     21  *
     22  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     23  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     24  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     25  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     26  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     27  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     28  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     29  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     30  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     31  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     32  * SUCH DAMAGE.
     33  */
     34 
     35 #include <sys/cdefs.h>
     36 #ifndef lint
     37 __COPYRIGHT("@(#) Copyright (c) 1980, 1990, 1993\
     38  The Regents of the University of California.  All rights reserved.");
     39 #endif /* not lint */
     40 
     41 #ifndef lint
     42 #if 0
     43 static char sccsid[] = "@(#)quotacheck.c	8.6 (Berkeley) 4/28/95";
     44 #else
     45 __RCSID("$NetBSD: quotacheck.c,v 1.51 2023/01/07 19:41:30 chs Exp $");
     46 #endif
     47 #endif /* not lint */
     48 
     49 /*
     50  * Fix up / report on disk quotas & usage
     51  */
     52 #include <sys/param.h>
     53 #include <sys/stat.h>
     54 #include <sys/queue.h>
     55 #include <sys/statvfs.h>
     56 
     57 #include <ufs/ufs/dinode.h>
     58 #include <ufs/ufs/quota1.h>
     59 #include <ufs/ufs/ufs_bswap.h>
     60 #include <ufs/ffs/fs.h>
     61 #include <ufs/ffs/ffs_extern.h>
     62 
     63 #include <err.h>
     64 #include <fcntl.h>
     65 #include <fstab.h>
     66 #include <pwd.h>
     67 #include <grp.h>
     68 #include <errno.h>
     69 #include <unistd.h>
     70 #include <stdio.h>
     71 #include <stdlib.h>
     72 #include <string.h>
     73 #include <util.h>
     74 
     75 #include "fsutil.h"
     76 #include "quotautil.h"
     77 
     78 #ifndef FS_UFS1_MAGIC
     79 # define FS_UFS1_MAGIC		FS_MAGIC /* 0x011954 */
     80 # define FS_UFS1_MAGIC_SWAPPED	0x54190100 /* bswap32(0x011954) */
     81 # define DINODE1_SIZE		sizeof(struct dinode)
     82 # define DINODE2_SIZE		0
     83 #else
     84 # define HAVE_UFSv2	1
     85 #endif
     86 
     87 #ifndef SBLOCKSIZE
     88 # define SBLOCKSIZE	SBSIZE
     89 #endif
     90 #ifndef SBLOCKSEARCH
     91 # define SBLOCKSEARCH	{ SBSIZE, -1 }
     92 #endif
     93 
     94 static const char *quotagroup = QUOTAGROUP;
     95 
     96 static union {
     97 	struct	fs	sblk;
     98 	char	dummy[MAXBSIZE];
     99 } un;
    100 #define	sblock	un.sblk
    101 static long dev_bsize;
    102 static long maxino;
    103 
    104 struct quotaname {
    105 	long	flags;
    106 	char	grpqfname[MAXPATHLEN + 1];
    107 	char	usrqfname[MAXPATHLEN + 1];
    108 };
    109 #define	HASUSR	1
    110 #define	HASGRP	2
    111 
    112 struct fileusage {
    113 	struct	fileusage *fu_next;
    114 	u_long	fu_curinodes;
    115 	u_long	fu_curblocks;
    116 	uint32_t fu_id;		/* uid_t, gid_t */
    117 	char	fu_name[1];
    118 	/* actually bigger */
    119 };
    120 #define FUHASH 1024	/* must be power of two */
    121 static struct fileusage *fuhead[MAXQUOTAS][FUHASH];
    122 
    123 
    124 union comb_dinode {
    125 #ifdef HAVE_UFSv2
    126 	struct ufs1_dinode dp1;
    127 	struct ufs2_dinode dp2;
    128 #else
    129 	struct dinode dp1;
    130 #endif
    131 };
    132 #ifdef HAVE_UFSv2
    133 #define DIP(dp, field) \
    134 	(is_ufs2 ? (dp)->dp2.di_##field : (dp)->dp1.di_##field)
    135 #else
    136 #define DIP(dp, field) (dp)->dp1.di_##field
    137 #endif
    138 
    139 
    140 static int	aflag;		/* all file systems */
    141 static int	gflag;		/* check group quotas */
    142 static int	uflag;		/* check user quotas */
    143 static int	vflag;		/* verbose */
    144 static int	qflag;		/* quick but untidy mode */
    145 static int	fi;		/* open disk file descriptor */
    146 static uint32_t highid[MAXQUOTAS];/* highest addid()'ed identifier per type */
    147 static int needswap;	/* FS is in swapped order */
    148 static int got_siginfo = 0; /* got a siginfo signal */
    149 static int is_ufs2;
    150 
    151 
    152 static void usage(void) __attribute__((__noreturn__));
    153 static void *needchk(struct fstab *);
    154 static int chkquota(const char *, const char *, const char *, void *, pid_t *);
    155 static int update(const char *, const char *, int);
    156 static uint32_t skipforward(uint32_t, uint32_t, FILE *);
    157 static int getquotagid(void);
    158 static struct fileusage *lookup(uint32_t, int);
    159 static struct fileusage *addid(uint32_t, int, const char *);
    160 static uint32_t subsequent(uint32_t, int) ;
    161 static union comb_dinode *getnextinode(ino_t);
    162 static void setinodebuf(ino_t);
    163 static void freeinodebuf(void);
    164 static void bread(daddr_t, char *, long);
    165 static void infohandler(int sig);
    166 static void swap_dinode1(union comb_dinode *, int);
    167 #ifdef HAVE_UFSv2
    168 static void swap_dinode2(union comb_dinode *, int);
    169 #endif
    170 
    171 int
    172 main(int argc, char *argv[])
    173 {
    174 	struct fstab *fs;
    175 	struct passwd *pw;
    176 	struct group *gr;
    177 	struct quotaname *auxdata;
    178 	int i, argnum, maxrun, errs;
    179 	long done = 0;
    180 	int flags = CHECK_PREEN;
    181 	const char *name;
    182 	int ch;
    183 
    184 	errs = maxrun = 0;
    185 	while ((ch = getopt(argc, argv, "aguvqdl:")) != -1) {
    186 		switch(ch) {
    187 		case 'a':
    188 			aflag++;
    189 			break;
    190 		case 'd':
    191 			flags |= CHECK_DEBUG;
    192 			break;
    193 		case 'g':
    194 			gflag++;
    195 			break;
    196 		case 'u':
    197 			uflag++;
    198 			break;
    199 		case 'q':
    200 			qflag++;
    201 			break;
    202 		case 'v':
    203 			vflag++;
    204 			break;
    205 		case 'l':
    206 			maxrun = atoi(optarg);
    207 			break;
    208 		default:
    209 			usage();
    210 		}
    211 	}
    212 	argc -= optind;
    213 	argv += optind;
    214 	if ((argc == 0 && !aflag) || (argc > 0 && aflag) || (!aflag && maxrun))
    215 		usage();
    216 	if (!gflag && !uflag) {
    217 		gflag++;
    218 		uflag++;
    219 	}
    220 
    221 	/* If -a, we do not want to pay the cost of processing every
    222 	 * group and password entry if there are no filesystems with quotas
    223 	 */
    224 	if (aflag) {
    225 		i = 0;
    226 		while ((fs = getfsent()) != NULL) {
    227 			if (needchk(fs))
    228 				i = 1;
    229 		}
    230 		endfsent();
    231 		if (!i)	/* No filesystems with quotas */
    232 			return 0;
    233 	}
    234 
    235 	if (gflag) {
    236 		setgrent();
    237 		while ((gr = getgrent()) != 0)
    238 			(void) addid((uint32_t)gr->gr_gid, GRPQUOTA, gr->gr_name);
    239 		endgrent();
    240 	}
    241 	if (uflag) {
    242 		setpwent();
    243 		while ((pw = getpwent()) != 0)
    244 			(void) addid((uint32_t)pw->pw_uid, USRQUOTA, pw->pw_name);
    245 		endpwent();
    246 	}
    247 	if (aflag)
    248 		exit(checkfstab(flags, maxrun, needchk, chkquota));
    249 	if (setfsent() == 0)
    250 		err(1, "%s: can't open", FSTAB);
    251 	while ((fs = getfsent()) != NULL) {
    252 		const char *fsspec;
    253 		char buf[MAXPATHLEN];
    254 		fsspec = getfsspecname(buf, sizeof(buf), fs->fs_spec);
    255 		if (fsspec == NULL) {
    256 			warn("%s", buf);
    257 			continue;
    258 		}
    259 		if (((argnum = oneof(fs->fs_file, argv, argc)) >= 0 ||
    260 		    (argnum = oneof(fsspec, argv, argc)) >= 0) &&
    261 		    (auxdata = needchk(fs)) &&
    262 		    (name = blockcheck(fsspec))) {
    263 			done |= 1 << argnum;
    264 			errs += chkquota(fs->fs_type, name, fs->fs_file,
    265 			    auxdata, NULL);
    266 		}
    267 	}
    268 	endfsent();
    269 	for (i = 0; i < argc; i++)
    270 		if ((done & (1 << i)) == 0)
    271 			warnx("%s not found in %s", argv[i], FSTAB);
    272 	return errs;
    273 }
    274 
    275 static void
    276 usage(void)
    277 {
    278 	const char *p = getprogname();
    279 	(void)fprintf(stderr, "Usage: %s -a [-gquv] [-l <maxparallel>]\n"
    280 	    "\t%s [-gquv] <filesys> ...\n", p, p);
    281 	exit(1);
    282 }
    283 
    284 static void *
    285 needchk(struct fstab *fs)
    286 {
    287 	struct quotaname *qnp;
    288 	char qfnp[MAXPATHLEN];
    289 
    290 	if (strcmp(fs->fs_vfstype, "ffs") ||
    291 	    strcmp(fs->fs_type, FSTAB_RW))
    292 		return (NULL);
    293 	if ((qnp = malloc(sizeof(*qnp))) == NULL)
    294 		err(1, "%s", strerror(errno));
    295 	qnp->flags = 0;
    296 	if (gflag && hasquota(qfnp, sizeof(qfnp), fs, GRPQUOTA)) {
    297 		strlcpy(qnp->grpqfname, qfnp, sizeof(qnp->grpqfname));
    298 		qnp->flags |= HASGRP;
    299 	}
    300 	if (uflag && hasquota(qfnp, sizeof(qfnp), fs, USRQUOTA)) {
    301 		strlcpy(qnp->usrqfname, qfnp, sizeof(qnp->usrqfname));
    302 		qnp->flags |= HASUSR;
    303 	}
    304 	if (qnp->flags)
    305 		return (qnp);
    306 	free(qnp);
    307 	return (NULL);
    308 }
    309 
    310 static off_t sblock_try[] = SBLOCKSEARCH;
    311 
    312 /*
    313  * Scan the specified filesystem to check quota(s) present on it.
    314  */
    315 static int
    316 chkquota(const char *type, const char *fsname, const char *mntpt, void *v,
    317     pid_t *pid)
    318 {
    319 	struct quotaname *qnp = v;
    320 	struct fileusage *fup;
    321 	union comb_dinode *dp;
    322 	int i, mode, errs = 0, inosused;
    323 	uint32_t cg;
    324 	ino_t ino;
    325 	struct cg *cgp;
    326 	char msgbuf[4096];
    327 
    328 	if (pid != NULL) {
    329 		fflush(stdout);
    330 		switch ((*pid = fork())) {
    331 		default:
    332 			return 0;
    333 		case 0:
    334 			break;
    335 		case -1:
    336 			err(1, "Cannot fork");
    337 		}
    338 		setvbuf(stdout, msgbuf, _IOFBF, sizeof msgbuf);
    339 	}
    340 
    341 	if ((fi = open(fsname, O_RDONLY, 0)) < 0) {
    342 		warn("Cannot open %s", fsname);
    343 		if (pid != NULL)
    344 			exit(1);
    345 		return 1;
    346 	}
    347 	if (vflag) {
    348 		(void)printf("*** Checking ");
    349 		if (qnp->flags & HASUSR)
    350 			(void)printf("%s%s", qfextension[USRQUOTA],
    351 			    (qnp->flags & HASGRP) ? " and " : "");
    352 		if (qnp->flags & HASGRP)
    353 			(void)printf("%s", qfextension[GRPQUOTA]);
    354 		(void)printf(" quotas for %s (%s)\n", fsname, mntpt);
    355 		fflush(stdout);
    356 	}
    357 	signal(SIGINFO, infohandler);
    358 	sync();
    359 	dev_bsize = 1;
    360 
    361 	for (i = 0; ; i++) {
    362 		if (sblock_try[i] == -1) {
    363 			warnx("%s: superblock not found", fsname);
    364 			if (pid != NULL)
    365 				exit(1);
    366 			return 1;
    367 		}
    368 		bread(sblock_try[i], (char *)&sblock, SBLOCKSIZE);
    369 		switch (sblock.fs_magic) {
    370 #ifdef HAVE_UFSv2
    371 		case FS_UFS2EA_MAGIC:
    372 			sblock.fs_magic = FS_UFS2_MAGIC;
    373 			/*FALLTHROUGH*/
    374 		case FS_UFS2_MAGIC:
    375 			is_ufs2 = 1;
    376 			/*FALLTHROUGH*/
    377 #endif
    378 		case FS_UFS1_MAGIC:
    379 			break;
    380 #ifdef HAVE_UFSv2
    381 		case FS_UFS2EA_MAGIC_SWAPPED:
    382 			sblock.fs_magic = FS_UFS2_MAGIC_SWAPPED;
    383 			/*FALLTHROUGH*/
    384 		case FS_UFS2_MAGIC_SWAPPED:
    385 			is_ufs2 = 1;
    386 			/*FALLTHROUGH*/
    387 #endif
    388 		case FS_UFS1_MAGIC_SWAPPED:
    389 			needswap = 1;
    390 			ffs_sb_swap(&sblock, &sblock);
    391 			break;
    392 		default:
    393 			continue;
    394 		}
    395 
    396 #ifdef HAVE_UFSv2
    397 		if (is_ufs2 || sblock.fs_old_flags & FS_FLAGS_UPDATED) {
    398 			if (sblock.fs_sblockloc != sblock_try[i])
    399 				continue;
    400 		} else {
    401 			if (sblock_try[i] == SBLOCK_UFS2)
    402 				continue;
    403 		}
    404 #endif
    405 		break;
    406 	}
    407 
    408 	cgp = malloc(sblock.fs_cgsize);
    409 	if (cgp == NULL) {
    410 		warn("%s: can't allocate %d bytes of cg space", fsname,
    411 		    sblock.fs_cgsize);
    412 		if (pid != NULL)
    413 			exit(1);
    414 		return 1;
    415 	}
    416 
    417 	dev_bsize = sblock.fs_fsize / FFS_FSBTODB(&sblock, 1);
    418 	maxino = sblock.fs_ncg * sblock.fs_ipg;
    419 	for (cg = 0; cg < sblock.fs_ncg; cg++) {
    420 		ino = cg * sblock.fs_ipg;
    421 		setinodebuf(ino);
    422 #ifdef HAVE_UFSv2
    423 		if (sblock.fs_magic == FS_UFS2_MAGIC) {
    424 			bread(FFS_FSBTODB(&sblock, cgtod(&sblock, cg)), (char *)cgp,
    425 			    sblock.fs_cgsize);
    426 			if (needswap)
    427 				ffs_cg_swap(cgp, cgp, &sblock);
    428 			inosused = cgp->cg_initediblk;
    429 		} else
    430 #endif
    431 			inosused = sblock.fs_ipg;
    432 		for (i = 0; i < inosused; i++, ino++) {
    433 			if (got_siginfo) {
    434 				fprintf(stderr,
    435 				    "%s: cyl group %d of %d (%d%%)\n",
    436 				    fsname, cg, sblock.fs_ncg,
    437 				    cg * 100 / sblock.fs_ncg);
    438 				got_siginfo = 0;
    439 			}
    440 			if (ino < UFS_ROOTINO)
    441 				continue;
    442 			if ((dp = getnextinode(ino)) == NULL)
    443 				continue;
    444 			if ((mode = DIP(dp, mode) & IFMT) == 0)
    445 				continue;
    446 			if (qnp->flags & HASGRP) {
    447 				fup = addid(DIP(dp, gid), GRPQUOTA,
    448 				    (char *)0);
    449 				fup->fu_curinodes++;
    450 				if (mode == IFREG || mode == IFDIR ||
    451 				    mode == IFLNK)
    452 					fup->fu_curblocks += DIP(dp, blocks);
    453 			}
    454 			if (qnp->flags & HASUSR) {
    455 				fup = addid(DIP(dp, uid), USRQUOTA,
    456 				    (char *)0);
    457 				fup->fu_curinodes++;
    458 				if (mode == IFREG || mode == IFDIR ||
    459 				    mode == IFLNK)
    460 					fup->fu_curblocks += DIP(dp, blocks);
    461 			}
    462 		}
    463 	}
    464 	freeinodebuf();
    465 	free(cgp);
    466 	if (qnp->flags & HASUSR)
    467 		errs += update(mntpt, qnp->usrqfname, USRQUOTA);
    468 	if (qnp->flags & HASGRP)
    469 		errs += update(mntpt, qnp->grpqfname, GRPQUOTA);
    470 	close(fi);
    471 	if (pid != NULL)
    472 		exit(errs);
    473 	return errs;
    474 }
    475 
    476 /*
    477  * Update a specified quota file.
    478  */
    479 static int
    480 update(const char *fsname, const char *quotafile, int type)
    481 {
    482 	struct fileusage *fup;
    483 	FILE *qfi, *qfo;
    484 	uint32_t id, lastid, nextid;
    485 	int need_seek;
    486 	struct dqblk dqbuf;
    487 	static struct dqblk zerodqbuf;
    488 	static struct fileusage zerofileusage;
    489 	struct statvfs *fst;
    490 	int nfst, i;
    491 
    492 	nfst = getmntinfo(&fst, MNT_WAIT);
    493 	if (nfst == 0)
    494 		errx(1, "no filesystems mounted!");
    495 
    496 	for (i = 0; i < nfst; i++) {
    497 		if (strncmp(fst[i].f_fstypename, "ffs",
    498 		    sizeof(fst[i].f_fstypename)) == 0 &&
    499 		    strncmp(fst[i].f_mntonname, fsname,
    500 		    sizeof(fst[i].f_mntonname)) == 0 &&
    501 		    (fst[i].f_flag & ST_QUOTA) != 0) {
    502 			warnx("filesystem %s has quotas already turned on",
    503 			    fsname);
    504 		}
    505 	}
    506 
    507 	if ((qfo = fopen(quotafile, "r+")) == NULL) {
    508 		if (errno == ENOENT)
    509 			qfo = fopen(quotafile, "w+");
    510 		if (qfo) {
    511 			(void) fprintf(stderr,
    512 			    "quotacheck: creating quota file %s\n", quotafile);
    513 #define	MODE	(S_IRUSR|S_IWUSR|S_IRGRP)
    514 			(void) fchown(fileno(qfo), getuid(), getquotagid());
    515 			(void) fchmod(fileno(qfo), MODE);
    516 		} else {
    517 			(void) fprintf(stderr,
    518 			    "quotacheck: %s: %s\n", quotafile, strerror(errno));
    519 			return (1);
    520 		}
    521 	}
    522 	if ((qfi = fopen(quotafile, "r")) == NULL) {
    523 		(void) fprintf(stderr,
    524 		    "quotacheck: %s: %s\n", quotafile, strerror(errno));
    525 		(void) fclose(qfo);
    526 		return (1);
    527 	}
    528 	need_seek = 1;
    529 	for (lastid = highid[type], id = 0; id <= lastid; id = nextid) {
    530 		if (fread((char *)&dqbuf, sizeof(struct dqblk), 1, qfi) == 0)
    531 			dqbuf = zerodqbuf;
    532 		if ((fup = lookup(id, type)) == 0)
    533 			fup = &zerofileusage;
    534 
    535 		nextid = subsequent(id, type);
    536 		/* watch out for id == UINT32_MAX */
    537 		if (nextid > 0 && nextid != id + 1)
    538 			nextid = skipforward(id, nextid, qfi);
    539 
    540 		if (got_siginfo) {
    541 			/*
    542 			 * XXX this could try to show percentage through
    543 			 * the ID list
    544 			 */
    545 			fprintf(stderr, "%s: updating %s quotas for id=%"
    546 			    PRIu32 " (%s)\n", fsname,
    547 			    qfextension[type < MAXQUOTAS ? type : MAXQUOTAS],
    548 			    id, fup->fu_name);
    549 			got_siginfo = 0;
    550 		}
    551 		if (dqbuf.dqb_curinodes == fup->fu_curinodes &&
    552 		    dqbuf.dqb_curblocks == fup->fu_curblocks) {
    553 			fup->fu_curinodes = 0;	/* reset usage  */
    554 			fup->fu_curblocks = 0;	/* for next filesystem */
    555 
    556 			need_seek = 1;
    557 			/* infinite loop avoidance (OR do as "nextid < id"?) */
    558 			if (id == UINT32_MAX || nextid == 0) {
    559 				break;
    560 			}
    561 			continue;
    562 		}
    563 		if (vflag) {
    564 			if (aflag)
    565 				printf("%s: ", fsname);
    566 			printf("%-8s fixed:", fup->fu_name);
    567 			if (dqbuf.dqb_curinodes != fup->fu_curinodes)
    568 				(void)printf("\tinodes %d -> %ld",
    569 					dqbuf.dqb_curinodes, fup->fu_curinodes);
    570 			if (dqbuf.dqb_curblocks != fup->fu_curblocks)
    571 				(void)printf("\tblocks %d -> %ld",
    572 					dqbuf.dqb_curblocks, fup->fu_curblocks);
    573 			(void)printf("\n");
    574 		}
    575 		/*
    576 		 * Reset time limit if have a soft limit and were
    577 		 * previously under it, but are now over it.
    578 		 */
    579 		if (dqbuf.dqb_bsoftlimit &&
    580 		    dqbuf.dqb_curblocks < dqbuf.dqb_bsoftlimit &&
    581 		    fup->fu_curblocks >= dqbuf.dqb_bsoftlimit)
    582 			dqbuf.dqb_btime = 0;
    583 		if (dqbuf.dqb_isoftlimit &&
    584 		    dqbuf.dqb_curinodes < dqbuf.dqb_isoftlimit &&
    585 		    fup->fu_curinodes >= dqbuf.dqb_isoftlimit)
    586 			dqbuf.dqb_itime = 0;
    587 		dqbuf.dqb_curinodes = fup->fu_curinodes;
    588 		dqbuf.dqb_curblocks = fup->fu_curblocks;
    589 
    590 		if (need_seek) {
    591 			(void) fseeko(qfo, (off_t)id * sizeof(struct dqblk),
    592 			    SEEK_SET);
    593 			need_seek = nextid != id + 1;
    594 		}
    595 		(void) fwrite(&dqbuf, sizeof(struct dqblk), 1, qfo);
    596 
    597 		fup->fu_curinodes = 0;
    598 		fup->fu_curblocks = 0;
    599 		/* infinite loop avoidance (OR do as "nextid < id"?) */
    600 		if (id == UINT32_MAX || nextid == 0) {
    601 			break;
    602 		}
    603 	}
    604 	(void)fclose(qfi);
    605 	(void)fflush(qfo);
    606 	if (highid[type] != UINT32_MAX)
    607 		(void)ftruncate(fileno(qfo),
    608 		    (off_t)((highid[type] + 1) * sizeof(struct dqblk)));
    609 	(void)fclose(qfo);
    610 	return 0;
    611 }
    612 
    613 static uint32_t
    614 skipforward(uint32_t cur, uint32_t to, FILE *qfi)
    615 {
    616 	struct dqblk dqbuf;
    617 
    618 	if (qflag) {
    619 		(void)fseeko(qfi, (off_t)to * sizeof(struct dqblk), SEEK_SET);
    620 		return to;
    621 	}
    622 
    623 	while (++cur < to) {
    624 		/*
    625 		 * if EOF occurs, nothing left to read, we're done
    626 		 */
    627 		if (fread((char *)&dqbuf, sizeof(struct dqblk), 1, qfi) == 0)
    628 			return (to);
    629 
    630 		/*
    631 		 * If we find an entry that shows usage, before the next
    632 		 * id that has actual usage, we have to stop here, so the
    633 		 * incorrect entry can be corrected in the file
    634 		 */
    635 		if (dqbuf.dqb_curinodes != 0 || dqbuf.dqb_curblocks != 0) {
    636 			(void)fseek(qfi, -(long)sizeof(struct dqblk), SEEK_CUR);
    637 			return cur;
    638 		}
    639 	}
    640 	return to;
    641 }
    642 
    643 /*
    644  * Determine the group identifier for quota files.
    645  */
    646 static int
    647 getquotagid(void)
    648 {
    649 	struct group *gr;
    650 
    651 	if ((gr = getgrnam(quotagroup)) != NULL)
    652 		return gr->gr_gid;
    653 	return -1;
    654 }
    655 
    656 /*
    657  * Routines to manage the file usage table.
    658  *
    659  * Lookup an id of a specific type.
    660  */
    661 static struct fileusage *
    662 lookup(uint32_t id, int type)
    663 {
    664 	struct fileusage *fup;
    665 
    666 	for (fup = fuhead[type][id & (FUHASH-1)]; fup != 0; fup = fup->fu_next)
    667 		if (fup->fu_id == id)
    668 			return fup;
    669 	return NULL;
    670 }
    671 
    672 /*
    673  * Add a new file usage id if it does not already exist.
    674  */
    675 static struct fileusage *
    676 addid(uint32_t id, int type, const char *name)
    677 {
    678 	struct fileusage *fup, **fhp;
    679 	size_t len;
    680 
    681 	if ((fup = lookup(id, type)) != NULL)
    682 		return fup;
    683 	if (name)
    684 		len = strlen(name);
    685 	else
    686 		len = 10;
    687 	if ((fup = calloc(1, sizeof(*fup) + len)) == NULL)
    688 		err(1, "%s", strerror(errno));
    689 	fhp = &fuhead[type][id & (FUHASH - 1)];
    690 	fup->fu_next = *fhp;
    691 	*fhp = fup;
    692 	fup->fu_id = id;
    693 	if (id > highid[type])
    694 		highid[type] = id;
    695 	if (name)
    696 		memmove(fup->fu_name, name, len + 1);
    697 	else
    698 		(void)snprintf(fup->fu_name, len + 1, "%" PRIu32, id);
    699 	return fup;
    700 }
    701 
    702 static uint32_t
    703 subsequent(uint32_t id, int type)
    704 {
    705 	struct fileusage *fup, **iup, **cup;
    706 	uint32_t next, offset;
    707 
    708 	next = highid[type] + 1;
    709 	offset = 0;
    710 	cup = iup = &fuhead[type][id & (FUHASH-1)];
    711 	do {
    712 		++offset;
    713 		if (++cup >= &fuhead[type][FUHASH])
    714 			cup = &fuhead[type][0];
    715 		for (fup = *cup; fup != 0; fup = fup->fu_next) {
    716 			if (fup->fu_id > id && fup->fu_id <= id + offset)
    717 				return (fup->fu_id);
    718 			if (fup->fu_id > id && fup->fu_id < next)
    719 				next = fup->fu_id;
    720 		}
    721 	} while (cup != iup);
    722 
    723 	return next;
    724 }
    725 
    726 /*
    727  * Special purpose version of ginode used to optimize first pass
    728  * over all the inodes in numerical order.
    729  */
    730 static ino_t nextino, lastinum, lastvalidinum;
    731 static long readcnt, readpercg, fullcnt, inobufsize, partialcnt, partialsize;
    732 static union comb_dinode *inodebuf;
    733 #define INOBUFSIZE	56*1024	/* size of buffer to read inodes */
    734 
    735 static union comb_dinode *
    736 getnextinode(ino_t inumber)
    737 {
    738 	long size;
    739 	daddr_t dblk;
    740 	static union comb_dinode *dp;
    741 	union comb_dinode *ret;
    742 
    743 	if (inumber != nextino++ || inumber > lastvalidinum) {
    744 		errx(1, "bad inode number %llu to nextinode",
    745 		    (unsigned long long)inumber);
    746 	}
    747 
    748 	if (inumber >= lastinum) {
    749 		readcnt++;
    750 		dblk = FFS_FSBTODB(&sblock, ino_to_fsba(&sblock, lastinum));
    751 		if (readcnt % readpercg == 0) {
    752 			size = partialsize;
    753 			lastinum += partialcnt;
    754 		} else {
    755 			size = inobufsize;
    756 			lastinum += fullcnt;
    757 		}
    758 		(void)bread(dblk, (caddr_t)inodebuf, size);
    759 		if (needswap) {
    760 #ifdef HAVE_UFSv2
    761 			if (is_ufs2)
    762 				swap_dinode2(inodebuf, lastinum - inumber);
    763 			else
    764 #endif
    765 				swap_dinode1(inodebuf, lastinum - inumber);
    766 		}
    767 		dp = (union comb_dinode *)inodebuf;
    768 	}
    769 	ret = dp;
    770 	dp = (union comb_dinode *)
    771 	    ((char *)dp + (is_ufs2 ? DINODE2_SIZE : DINODE1_SIZE));
    772 	return ret;
    773 }
    774 
    775 static void
    776 setinodebuf(ino_t inum)
    777 {
    778 
    779 	if (inum % sblock.fs_ipg != 0)
    780 		errx(1, "bad inode number %llu to setinodebuf",
    781 		    (unsigned long long)inum);
    782 
    783 	lastvalidinum = inum + sblock.fs_ipg - 1;
    784 	nextino = inum;
    785 	lastinum = inum;
    786 	readcnt = 0;
    787 	if (inodebuf != NULL)
    788 		return;
    789 	inobufsize = ffs_blkroundup(&sblock, INOBUFSIZE);
    790 	fullcnt = inobufsize / (is_ufs2 ? DINODE2_SIZE : DINODE1_SIZE);
    791 	readpercg = sblock.fs_ipg / fullcnt;
    792 	partialcnt = sblock.fs_ipg % fullcnt;
    793 	partialsize = partialcnt * (is_ufs2 ? DINODE2_SIZE : DINODE1_SIZE);
    794 	if (partialcnt != 0) {
    795 		readpercg++;
    796 	} else {
    797 		partialcnt = fullcnt;
    798 		partialsize = inobufsize;
    799 	}
    800 	if (inodebuf == NULL &&
    801 	    (inodebuf = malloc((unsigned)inobufsize)) == NULL)
    802 		errx(1, "Cannot allocate space for inode buffer");
    803 	while (nextino < UFS_ROOTINO)
    804 		getnextinode(nextino);
    805 }
    806 
    807 static void
    808 freeinodebuf(void)
    809 {
    810 
    811 	free(inodebuf);
    812 	inodebuf = NULL;
    813 }
    814 
    815 
    816 #ifdef HAVE_UFSv2
    817 static void
    818 swap_dinode1(union comb_dinode *dp, int n)
    819 {
    820 	int i;
    821 	struct ufs1_dinode *dp1;
    822 
    823 	dp1 = (struct ufs1_dinode *)&dp->dp1;
    824 	for (i = 0; i < n; i++, dp1++)
    825 		ffs_dinode1_swap(dp1, dp1);
    826 }
    827 
    828 static void
    829 swap_dinode2(union comb_dinode *dp, int n)
    830 {
    831 	int i;
    832 	struct ufs2_dinode *dp2;
    833 
    834 	dp2 = (struct ufs2_dinode *)&dp->dp2;
    835 	for (i = 0; i < n; i++, dp2++)
    836 		ffs_dinode2_swap(dp2, dp2);
    837 }
    838 
    839 #else
    840 
    841 static void
    842 swap_dinode1(union comb_dinode *dp, int n)
    843 {
    844 	int i;
    845 	struct dinode *dp1;
    846 
    847 	dp1 = (struct dinode *) &dp->dp1;
    848 	for (i = 0; i < n; i++, dp1++)
    849 		ffs_dinode_swap(dp1, dp1);
    850 }
    851 
    852 #endif
    853 
    854 /*
    855  * Read specified disk blocks.
    856  */
    857 static void
    858 bread(daddr_t bno, char *buf, long cnt)
    859 {
    860 
    861 	if (lseek(fi, (off_t)bno * dev_bsize, SEEK_SET) < 0 ||
    862 	    read(fi, buf, cnt) != cnt)
    863 		err(1, "block %lld", (long long)bno);
    864 }
    865 
    866 static void
    867 infohandler(int sig)
    868 {
    869 	got_siginfo = 1;
    870 }
    871