add SCCS header

[unix-history] / usr / src / sys / ufs / lfs / lfs_balloc.c

/*
 * Copyright (c) 1989, 1991 Regents of the University of California.
 * All rights reserved.
 *
 * %sccs.include.redist.c%
 *
 *	@(#)lfs_balloc.c	7.20 (Berkeley) %G%
 */

#include <sys/param.h>
#include <sys/buf.h>
#include <sys/proc.h>
#include <sys/vnode.h>
#include <sys/mount.h>
#include <sys/resourcevar.h>
#include <sys/specdev.h>
#include <sys/trace.h>

#include <ufs/ufs/quota.h>
#include <ufs/ufs/inode.h>
#include <ufs/ufs/ufsmount.h>

#include <ufs/lfs/lfs.h>
#include <ufs/lfs/lfs_extern.h>

/*
 * Bmap converts a the logical block number of a file to its physical block
 * number on the disk. The conversion is done by using the logical block
 * number to index into the array of block pointers described by the dinode.
 */
int
lfs_bmap(vp, bn, vpp, bnp)
	struct vnode *vp;
	register daddr_t bn;
	struct vnode **vpp;
	daddr_t *bnp;
{
	register struct inode *ip;
	register struct lfs *fs;
	register daddr_t nb;
	struct vnode *devvp;
	struct buf *bp;
	daddr_t *bap, daddr;
	daddr_t lbn_ind;
	int j, off, sh;
	int error;

	/*
	 * Check for underlying vnode requests and ensure that logical
	 * to physical mapping is requested.
	 */
	ip = VTOI(vp);
	if (vpp != NULL)
		*vpp = ip->i_devvp;
	if (bnp == NULL)
		return (0);
printf("lfs_bmap: block number %d, inode %d\n", bn, ip->i_number);
	fs = ip->i_lfs;

	/*
	 * We access all blocks in the cache, even indirect blocks by means
	 * of a logical address. Indirect blocks (single, double, triple) all
	 * have negative block numbers. The first NDADDR blocks are direct
	 * blocks, the first NIADDR negative blocks are the indirect block
	 * pointers.  The single, double and triple indirect blocks in the
	 * inode * are addressed: -1, -2 and -3 respectively.  
	 *
	 * XXX
	 * We don't handle triple indirect at all.
	 *
	 * XXX
	 * This panic shouldn't be here???
	 */
	if (bn < 0)
		panic("lfs_bmap: negative indirect block number %d", bn);

	/* The first NDADDR blocks are direct blocks. */
	if (bn < NDADDR) {
		nb = ip->i_db[bn];
		if (nb == 0) {
			*bnp = UNASSIGNED;
			return (0);
		}
		*bnp = nb;
		return (0);
	}

	/* Determine the number of levels of indirection. */
	sh = 1;
	bn -= NDADDR;
	lbn_ind = 0;
	for (j = NIADDR; j > 0; j--) {
		lbn_ind--;
		sh *= NINDIR(fs);
		if (bn < sh)
			break;
		bn -= sh;
	}
	if (j == 0)
		return (EFBIG);

	/* Fetch through the indirect blocks. */
	vp = ITOV(ip);
	devvp = VFSTOUFS(vp->v_mount)->um_devvp;
	for (off = NIADDR - j, bap = ip->i_ib; j <= NIADDR; j++) {
		if((daddr = bap[off]) == 0) {
			daddr = UNASSIGNED;
			break;
		}
		if (bp)
			brelse(bp);
		bp = getblk(vp, lbn_ind, fs->lfs_bsize);
		if (bp->b_flags & (B_DONE | B_DELWRI)) {
			trace(TR_BREADHIT, pack(vp, size), lbn_ind);
		} else {
			trace(TR_BREADMISS, pack(vp, size), lbn_ind);
			bp->b_blkno = daddr;
			bp->b_flags |= B_READ;
			bp->b_dev = devvp->v_rdev;
			(devvp->v_op->vop_strategy)(bp);
			curproc->p_stats->p_ru.ru_inblock++;	/* XXX */
			if (error = biowait(bp)) {
				brelse(bp);
				return (error);
			}
		}
		bap = bp->b_un.b_daddr;
		sh /= NINDIR(fs);
		off = (bn / sh) % NINDIR(fs);
		lbn_ind  = -(NIADDR + 1 + off);
	}
	if (bp)
		brelse(bp);

	*bnp = daddr;
	return (0);
}